Merge pull request #196 from Rangi42/polishedmaps

Rename map files, labels, and constants to be consistent and work with Polished Map

1 files changed, 176 insertions, 0 deletions

diff --git a/scripts/PokemonTower5F.asm b/scripts/PokemonTower5F.asm
new file mode 100755
index 00000000..299261e9
--- /dev/null
+++ b/scripts/PokemonTower5F.asm
@@ -0,0 +1,176 @@
+PokemonTower5F_Script:
+	call EnableAutoTextBoxDrawing
+	ld hl, PokemonTower5TrainerHeader0
+	ld de, PokemonTower5F_ScriptPointers
+	ld a, [wPokemonTower5FCurScript]
+	call ExecuteCurMapScriptInTable
+	ld [wPokemonTower5FCurScript], a
+	ret
+
+PokemonTower5F_ScriptPointers:
+	dw PokemonTower5Script0
+	dw DisplayEnemyTrainerTextAndStartBattle
+	dw EndTrainerBattle
+
+PokemonTower5Script0:
+	ld hl, CoordsData_60992
+	call ArePlayerCoordsInArray
+	jr c, .asm_60960
+	ld hl, wd72e
+	res 4, [hl]
+	ResetEvent EVENT_IN_PURIFIED_ZONE
+	jp CheckFightingMapTrainers
+.asm_60960
+	CheckAndSetEvent EVENT_IN_PURIFIED_ZONE
+	ret nz
+	xor a
+	ld [hJoyHeld], a
+	ld a, $f0
+	ld [wJoyIgnore], a
+	ld hl, wd72e
+	set 4, [hl]
+	predef HealParty
+	call GBFadeOutToWhite
+	call Delay3
+	call Delay3
+	call GBFadeInFromWhite
+	ld a, $7
+	ld [hSpriteIndexOrTextID], a
+	call DisplayTextID
+	xor a
+	ld [wJoyIgnore], a
+	ret
+
+CoordsData_60992:
+	db $08,$0A
+	db $08,$0B
+	db $09,$0A
+	db $09,$0B
+	db $FF
+
+PokemonTower5F_TextPointers:
+	dw PokemonTower5Text1
+	dw PokemonTower5Text2
+	dw PokemonTower5Text3
+	dw PokemonTower5Text4
+	dw PokemonTower5Text5
+	dw PickUpItemText
+	dw PokemonTower5Text7
+
+PokemonTower5TrainerHeader0:
+	dbEventFlagBit EVENT_BEAT_POKEMONTOWER_5_TRAINER_0
+	db ($2 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_5_TRAINER_0
+	dw PokemonTower5BattleText1 ; TextBeforeBattle
+	dw PokemonTower5AfterBattleText1 ; TextAfterBattle
+	dw PokemonTower5EndBattleText1 ; TextEndBattle
+	dw PokemonTower5EndBattleText1 ; TextEndBattle
+
+PokemonTower5TrainerHeader1:
+	dbEventFlagBit EVENT_BEAT_POKEMONTOWER_5_TRAINER_1
+	db ($3 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_5_TRAINER_1
+	dw PokemonTower5BattleText2 ; TextBeforeBattle
+	dw PokemonTower5AfterBattleText2 ; TextAfterBattle
+	dw PokemonTower5EndBattleText2 ; TextEndBattle
+	dw PokemonTower5EndBattleText2 ; TextEndBattle
+
+PokemonTower5TrainerHeader2:
+	dbEventFlagBit EVENT_BEAT_POKEMONTOWER_5_TRAINER_2
+	db ($2 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_5_TRAINER_2
+	dw PokemonTower5BattleText3 ; TextBeforeBattle
+	dw PokemonTower5AfterBattleText3 ; TextAfterBattle
+	dw PokemonTower5EndBattleText3 ; TextEndBattle
+	dw PokemonTower5EndBattleText3 ; TextEndBattle
+
+PokemonTower5TrainerHeader3:
+	dbEventFlagBit EVENT_BEAT_POKEMONTOWER_5_TRAINER_3
+	db ($2 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_5_TRAINER_3
+	dw PokemonTower5BattleText4 ; TextBeforeBattle
+	dw PokemonTower5AfterBattleText4 ; TextAfterBattle
+	dw PokemonTower5EndBattleText4 ; TextEndBattle
+	dw PokemonTower5EndBattleText4 ; TextEndBattle
+
+	db $ff
+
+PokemonTower5Text1:
+	TX_FAR _PokemonTower5Text1
+	db "@"
+
+PokemonTower5Text2:
+	TX_ASM
+	ld hl, PokemonTower5TrainerHeader0
+	call TalkToTrainer
+	jp TextScriptEnd
+
+PokemonTower5BattleText1:
+	TX_FAR _PokemonTower5BattleText1
+	db "@"
+
+PokemonTower5EndBattleText1:
+	TX_FAR _PokemonTower5EndBattleText1
+	db "@"
+
+PokemonTower5AfterBattleText1:
+	TX_FAR _PokemonTower5AfterBattleText1
+	db "@"
+
+PokemonTower5Text3:
+	TX_ASM
+	ld hl, PokemonTower5TrainerHeader1
+	call TalkToTrainer
+	jp TextScriptEnd
+
+PokemonTower5BattleText2:
+	TX_FAR _PokemonTower5BattleText2
+	db "@"
+
+PokemonTower5EndBattleText2:
+	TX_FAR _PokemonTower5EndBattleText2
+	db "@"
+
+PokemonTower5AfterBattleText2:
+	TX_FAR _PokemonTower5AfterBattleText2
+	db "@"
+
+PokemonTower5Text4:
+	TX_ASM
+	ld hl, PokemonTower5TrainerHeader2
+	call TalkToTrainer
+	jp TextScriptEnd
+
+PokemonTower5BattleText3:
+	TX_FAR _PokemonTower5BattleText3
+	db "@"
+
+PokemonTower5EndBattleText3:
+	TX_FAR _PokemonTower5EndBattleText3
+	db "@"
+
+PokemonTower5AfterBattleText3:
+	TX_FAR _PokemonTower5AfterBattleText3
+	db "@"
+
+PokemonTower5Text5:
+	TX_ASM
+	ld hl, PokemonTower5TrainerHeader3
+	call TalkToTrainer
+	jp TextScriptEnd
+
+PokemonTower5BattleText4:
+	TX_FAR _PokemonTower5BattleText4
+	db "@"
+
+PokemonTower5EndBattleText4:
+	TX_FAR _PokemonTower5EndBattleText4
+	db "@"
+
+PokemonTower5AfterBattleText4:
+	TX_FAR _PokemonTower5AfterBattleText4
+	db "@"
+
+PokemonTower5Text7:
+	TX_FAR _PokemonTower5Text7
+	db "@"