summaryrefslogtreecommitdiff
path: root/scripts/PowerPlant.asm
diff options
context:
space:
mode:
authorRangi <remy.oukaour+rangi42@gmail.com>2019-01-01 15:06:23 -0500
committerRangi <remy.oukaour+rangi42@gmail.com>2019-01-01 23:33:10 -0500
commitc7796024590fec48ac79756793c1a6e3b54daf8f (patch)
tree0d61caa7ebe429995a61e800d1d78c3a82aec886 /scripts/PowerPlant.asm
parent90430e6dee9e207dc0b618d07566f83617343f60 (diff)
Rename map files, labels, and constants to be consistent and work with Polished Map
Diffstat (limited to 'scripts/PowerPlant.asm')
-rwxr-xr-xscripts/PowerPlant.asm175
1 files changed, 175 insertions, 0 deletions
diff --git a/scripts/PowerPlant.asm b/scripts/PowerPlant.asm
new file mode 100755
index 00000000..35b4893f
--- /dev/null
+++ b/scripts/PowerPlant.asm
@@ -0,0 +1,175 @@
+PowerPlant_Script:
+ call EnableAutoTextBoxDrawing
+ ld hl, Voltorb0TrainerHeader
+ ld de, PowerPlant_ScriptPointers
+ ld a, [wPowerPlantCurScript]
+ call ExecuteCurMapScriptInTable
+ ld [wPowerPlantCurScript], a
+ ret
+
+PowerPlant_ScriptPointers
+ dw CheckFightingMapTrainers
+ dw DisplayEnemyTrainerTextAndStartBattle
+ dw EndTrainerBattle
+
+PowerPlant_TextPointers:
+ dw Voltorb0Text
+ dw Voltorb1Text
+ dw Voltorb2Text
+ dw Voltorb3Text
+ dw Voltorb4Text
+ dw Voltorb5Text
+ dw Voltorb6Text
+ dw Voltorb7Text
+ dw ZapdosText
+ dw PickUpItemText
+ dw PickUpItemText
+ dw PickUpItemText
+ dw PickUpItemText
+ dw PickUpItemText
+
+Voltorb0TrainerHeader:
+ dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_0
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_0
+ dw VoltorbBattleText ; TextBeforeBattle
+ dw VoltorbBattleText ; TextAfterBattle
+ dw VoltorbBattleText ; TextEndBattle
+ dw VoltorbBattleText ; TextEndBattle
+
+Voltorb1TrainerHeader:
+ dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_1
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_1
+ dw VoltorbBattleText ; TextBeforeBattle
+ dw VoltorbBattleText ; TextAfterBattle
+ dw VoltorbBattleText ; TextEndBattle
+ dw VoltorbBattleText ; TextEndBattle
+
+Voltorb2TrainerHeader:
+ dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_2
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_2
+ dw VoltorbBattleText ; TextBeforeBattle
+ dw VoltorbBattleText ; TextAfterBattle
+ dw VoltorbBattleText ; TextEndBattle
+ dw VoltorbBattleText ; TextEndBattle
+
+Voltorb3TrainerHeader:
+ dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_3
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_3
+ dw VoltorbBattleText ; TextBeforeBattle
+ dw VoltorbBattleText ; TextAfterBattle
+ dw VoltorbBattleText ; TextEndBattle
+ dw VoltorbBattleText ; TextEndBattle
+
+Voltorb4TrainerHeader:
+ dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_4
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_4
+ dw VoltorbBattleText ; TextBeforeBattle
+ dw VoltorbBattleText ; TextAfterBattle
+ dw VoltorbBattleText ; TextEndBattle
+ dw VoltorbBattleText ; TextEndBattle
+
+Voltorb5TrainerHeader:
+ dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_5
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_5
+ dw VoltorbBattleText ; TextBeforeBattle
+ dw VoltorbBattleText ; TextAfterBattle
+ dw VoltorbBattleText ; TextEndBattle
+ dw VoltorbBattleText ; TextEndBattle
+
+Voltorb6TrainerHeader:
+ dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_6
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_6
+ dw VoltorbBattleText ; TextBeforeBattle
+ dw VoltorbBattleText ; TextAfterBattle
+ dw VoltorbBattleText ; TextEndBattle
+ dw VoltorbBattleText ; TextEndBattle
+
+Voltorb7TrainerHeader:
+ dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_7, 1
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_7, 1
+ dw VoltorbBattleText ; TextBeforeBattle
+ dw VoltorbBattleText ; TextAfterBattle
+ dw VoltorbBattleText ; TextEndBattle
+ dw VoltorbBattleText ; TextEndBattle
+
+ZapdosTrainerHeader:
+ dbEventFlagBit EVENT_BEAT_ZAPDOS, 1
+ db 0 ; view range
+ dwEventFlagAddress EVENT_BEAT_ZAPDOS, 1
+ dw ZapdosBattleText ; TextBeforeBattle
+ dw ZapdosBattleText ; TextAfterBattle
+ dw ZapdosBattleText ; TextEndBattle
+ dw ZapdosBattleText ; TextEndBattle
+
+ db $ff
+
+InitVoltorbBattle:
+ call TalkToTrainer
+ ld a, [wCurMapScript]
+ ld [wPowerPlantCurScript], a
+ jp TextScriptEnd
+
+Voltorb0Text:
+ TX_ASM
+ ld hl, Voltorb0TrainerHeader
+ jr InitVoltorbBattle
+
+Voltorb1Text:
+ TX_ASM
+ ld hl, Voltorb1TrainerHeader
+ jr InitVoltorbBattle
+
+Voltorb2Text:
+ TX_ASM
+ ld hl, Voltorb2TrainerHeader
+ jr InitVoltorbBattle
+
+Voltorb3Text:
+ TX_ASM
+ ld hl, Voltorb3TrainerHeader
+ jr InitVoltorbBattle
+
+Voltorb4Text:
+ TX_ASM
+ ld hl, Voltorb4TrainerHeader
+ jr InitVoltorbBattle
+
+Voltorb5Text:
+ TX_ASM
+ ld hl, Voltorb5TrainerHeader
+ jr InitVoltorbBattle
+
+Voltorb6Text:
+ TX_ASM
+ ld hl, Voltorb6TrainerHeader
+ jr InitVoltorbBattle
+
+Voltorb7Text:
+ TX_ASM
+ ld hl, Voltorb7TrainerHeader
+ jr InitVoltorbBattle
+
+ZapdosText:
+ TX_ASM
+ ld hl, ZapdosTrainerHeader
+ jr InitVoltorbBattle
+
+VoltorbBattleText:
+ TX_FAR _VoltorbBattleText
+ db "@"
+
+ZapdosBattleText:
+ TX_FAR _ZapdosBattleText
+ TX_ASM
+ ld a, ZAPDOS
+ call PlayCry
+ call WaitForSoundToFinish
+ jp TextScriptEnd