diff options
Diffstat (limited to 'scripts/PowerPlant.asm')
| -rwxr-xr-x | scripts/PowerPlant.asm | 175 |
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 |