pokered/scripts/powerplant.asm

177 lines
4.3 KiB
NASM
Raw Normal View History

2014-05-18 18:19:10 +00:00
PowerPlantScript: ; 1e2c6 (7:62c6)
call EnableAutoTextBoxDrawing
ld hl, PowerPlantTrainerHeaders
ld de, PowerPlantScriptPointers
ld a, [W_POWERPLANTCURSCRIPT]
call ExecuteCurMapScriptInTable
ld [W_POWERPLANTCURSCRIPT], a
ret
PowerPlantScriptPointers: ; 1e2d9 (7:62d9)
dw CheckFightingMapTrainers
dw Func_324c
dw EndTrainerBattle
PowerPlantTextPointers: ; 1e2df (7:62df)
dw PowerPlantText1
dw PowerPlantText2
dw PowerPlantText3
dw PowerPlantText4
dw PowerPlantText5
dw PowerPlantText6
dw PowerPlantText7
dw PowerPlantText8
dw PowerPlantText9
dw Predef5CText
dw Predef5CText
dw Predef5CText
dw Predef5CText
dw Predef5CText
PowerPlantTrainerHeaders: ; 1e2fb (7:62fb)
PowerPlantTrainerHeader0: ; 1e2fb (7:62fb)
db 1 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
PowerPlantTrainerHeader1: ; 1e307 (7:6307)
db 2 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
PowerPlantTrainerHeader2: ; 1e313 (7:6313)
db 3 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
PowerPlantTrainerHeader3: ; 1e31f (7:631f)
db 4 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
PowerPlantTrainerHeader4: ; 1e32b (7:632b)
db 5 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
PowerPlantTrainerHeader5: ; 1e337 (7:6337)
db 6 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
PowerPlantTrainerHeader6: ; 1e343 (7:6343)
db 7 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
PowerPlantTrainerHeader7: ; 1e34f (7:634f)
db 8 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
PowerPlantTrainerHeader8: ; 1e35b (7:635b)
db 9 ; flag's bit
db 0 ; view range
dw wd7d3 ; flag's byte
2014-05-18 18:19:10 +00:00
dw ZapdosBattleText ; TextBeforeBattle
dw ZapdosBattleText ; TextAfterBattle
dw ZapdosBattleText ; TextEndBattle
dw ZapdosBattleText ; TextEndBattle
db $ff
asm_234cc: ; 1e368 (7:6368)
call TalkToTrainer
ld a, [W_CURMAPSCRIPT]
ld [W_POWERPLANTCURSCRIPT], a
jp TextScriptEnd
PowerPlantText1: ; 1e374 (7:6374)
db $8 ; asm
ld hl, PowerPlantTrainerHeader0 ; $62fb
jr asm_234cc ; 0x1e378 $ee
PowerPlantText2: ; 1e37a (7:637a)
db $8 ; asm
ld hl, PowerPlantTrainerHeader1 ; $6307
jr asm_234cc ; 0x1e37e $e8
PowerPlantText3: ; 1e380 (7:6380)
db $8 ; asm
ld hl, PowerPlantTrainerHeader2 ; $6313
jr asm_234cc ; 0x1e384 $e2
PowerPlantText4: ; 1e386 (7:6386)
db $8 ; asm
ld hl, PowerPlantTrainerHeader3 ; $631f
jr asm_234cc ; 0x1e38a $dc
PowerPlantText5: ; 1e38c (7:638c)
db $8 ; asm
ld hl, PowerPlantTrainerHeader4 ; $632b
jr asm_234cc ; 0x1e390 $d6
PowerPlantText6: ; 1e392 (7:6392)
db $8 ; asm
ld hl, PowerPlantTrainerHeader5 ; $6337
jr asm_234cc ; 0x1e396 $d0
PowerPlantText7: ; 1e398 (7:6398)
db $8 ; asm
ld hl, PowerPlantTrainerHeader6 ; $6343
jr asm_234cc ; 0x1e39c $ca
PowerPlantText8: ; 1e39e (7:639e)
db $8 ; asm
ld hl, PowerPlantTrainerHeader7 ; $634f
jr asm_234cc ; 0x1e3a2 $c4
PowerPlantText9: ; 1e3a4 (7:63a4)
db $8 ; asm
ld hl, PowerPlantTrainerHeader8 ; $635b
jr asm_234cc ; 0x1e3a8 $be
VoltorbBattleText: ; 1e3aa (7:63aa)
TX_FAR _VoltorbBattleText
db "@"
ZapdosBattleText: ; 1e3af (7:63af)
TX_FAR _ZapdosBattleText
db $8
ld a, ZAPDOS
call PlayCry
call WaitForSoundToFinish
jp TextScriptEnd