pokered/scripts/powerplant.asm

177 lines
4.2 KiB
NASM
Raw Normal View History

PowerPlantScript:
2014-05-18 18:19:10 +00:00
call EnableAutoTextBoxDrawing
ld hl, PowerPlantTrainerHeaders
ld de, .ScriptPointers
2015-08-31 02:38:41 +00:00
ld a, [wPowerPlantCurScript]
2014-05-18 18:19:10 +00:00
call ExecuteCurMapScriptInTable
2015-08-31 02:38:41 +00:00
ld [wPowerPlantCurScript], a
2014-05-18 18:19:10 +00:00
ret
.ScriptPointers
2014-05-18 18:19:10 +00:00
dw CheckFightingMapTrainers
2014-09-14 18:29:18 +00:00
dw DisplayEnemyTrainerTextAndStartBattle
2014-05-18 18:19:10 +00:00
dw EndTrainerBattle
PowerPlantTextPointers:
dw Voltorb0Text
dw Voltorb1Text
dw Voltorb2Text
dw Voltorb3Text
dw Voltorb4Text
dw Voltorb5Text
dw Voltorb6Text
dw Voltorb7Text
dw ZapdosText
2015-07-18 15:17:29 +00:00
dw PickUpItemText
dw PickUpItemText
dw PickUpItemText
dw PickUpItemText
dw PickUpItemText
2014-05-18 18:19:10 +00:00
PowerPlantTrainerHeaders:
Voltorb0TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_0
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_0
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb1TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_1
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_1
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb2TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_2
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_2
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb3TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_3
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_3
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb4TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_4
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_4
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb5TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_5
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_5
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb6TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_6
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_6
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb7TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_7, 1
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_7, 1
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
ZapdosTrainerHeader:
dbEventFlagBit EVENT_BEAT_ZAPDOS, 1
2014-05-18 18:19:10 +00:00
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_ZAPDOS, 1
2014-05-18 18:19:10 +00:00
dw ZapdosBattleText ; TextBeforeBattle
dw ZapdosBattleText ; TextAfterBattle
dw ZapdosBattleText ; TextEndBattle
dw ZapdosBattleText ; TextEndBattle
db $ff
InitVoltorbBattle:
2014-05-18 18:19:10 +00:00
call TalkToTrainer
2015-08-31 02:38:41 +00:00
ld a, [wCurMapScript]
ld [wPowerPlantCurScript], a
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
Voltorb0Text:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, Voltorb0TrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
Voltorb1Text:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, Voltorb1TrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
Voltorb2Text:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, Voltorb2TrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
Voltorb3Text:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, Voltorb3TrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
Voltorb4Text:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, Voltorb4TrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
Voltorb5Text:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, Voltorb5TrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
Voltorb6Text:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, Voltorb6TrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
Voltorb7Text:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, Voltorb7TrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
ZapdosText:
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, ZapdosTrainerHeader
jr InitVoltorbBattle
2014-05-18 18:19:10 +00:00
VoltorbBattleText:
2014-05-18 18:19:10 +00:00
TX_FAR _VoltorbBattleText
db "@"
ZapdosBattleText:
2014-05-18 18:19:10 +00:00
TX_FAR _ZapdosBattleText
2015-07-03 19:58:50 +00:00
TX_ASM
2014-05-18 18:19:10 +00:00
ld a, ZAPDOS
call PlayCry
call WaitForSoundToFinish
jp TextScriptEnd