pokered/scripts/rockethideout4.asm

229 lines
5 KiB
NASM
Raw Normal View History

2014-05-18 18:19:10 +00:00
RocketHideout4Script: ; 4545d (11:545d)
call RocketHideout4Script_45473
call EnableAutoTextBoxDrawing
ld hl, RocketHideout4TrainerHeader0
ld de, RocketHideout4ScriptPointers
ld a, [W_ROCKETHIDEOUT4CURSCRIPT]
call ExecuteCurMapScriptInTable
ld [W_ROCKETHIDEOUT4CURSCRIPT], a
ret
RocketHideout4Script_45473: ; 45473 (11:5473)
ld hl, wd126
2014-05-18 18:19:10 +00:00
bit 5, [hl]
res 5, [hl]
ret z
ld a, [wd81b]
2014-05-18 18:19:10 +00:00
bit 5, a
jr nz, .asm_45496
and $c
cp $c
jr z, .asm_4548c
ld a, $2d
jr .asm_45498
.asm_4548c
ld a, (SFX_02_57 - SFX_Headers_02) / 3
call PlaySound
ld hl, wd81b
2014-05-18 18:19:10 +00:00
set 5, [hl]
.asm_45496
ld a, $e
.asm_45498
ld [wd09f], a
2014-05-18 18:19:10 +00:00
ld bc, $050c
2014-09-14 18:29:18 +00:00
predef_jump ReplaceTileBlock
2014-05-18 18:19:10 +00:00
RocketHideout4Script_454a3: ; 454a3 (11:54a3)
xor a
2014-05-25 17:51:53 +00:00
ld [wJoyIgnore], a
2014-05-18 18:19:10 +00:00
ld [W_ROCKETHIDEOUT4CURSCRIPT], a
ld [W_CURMAPSCRIPT], a
ret
RocketHideout4ScriptPointers: ; 454ae (11:54ae)c
dw CheckFightingMapTrainers
2014-09-14 18:29:18 +00:00
dw DisplayEnemyTrainerTextAndStartBattle
2014-05-18 18:19:10 +00:00
dw EndTrainerBattle
dw RocketHideout4Script3
RocketHideout4Script3: ; 454b6 (11:54b6)
ld a, [W_ISINBATTLE]
cp $ff
jp z, RocketHideout4Script_454a3
call UpdateSprites
ld a, $f0
2014-05-25 17:51:53 +00:00
ld [wJoyIgnore], a
ld hl, wd81b
2014-05-18 18:19:10 +00:00
set 7, [hl]
ld a, $a
ld [H_SPRITEHEIGHT], a
call DisplayTextID
2014-09-13 07:50:56 +00:00
call GBFadeOutToBlack
ld a, HS_ROCKET_HIDEOUT_4_GIOVANNI
ld [wcc4d], a
predef HideObject
ld a, HS_ROCKET_HIDEOUT_4_ITEM_4
ld [wcc4d], a
predef ShowObject
2014-05-18 18:19:10 +00:00
call UpdateSprites
2014-09-13 07:50:56 +00:00
call GBFadeInFromBlack
2014-05-18 18:19:10 +00:00
xor a
2014-05-25 17:51:53 +00:00
ld [wJoyIgnore], a
ld hl, wd126
2014-05-18 18:19:10 +00:00
set 5, [hl]
ld a, $0
ld [W_ROCKETHIDEOUT4CURSCRIPT], a
ld [W_CURMAPSCRIPT], a
ret
RocketHideout4TextPointers: ; 45501 (11:5501)
dw RocketHideout4Text1
dw RocketHideout4Text2
dw RocketHideout4Text3
dw RocketHideout4Text4
dw Predef5CText
dw Predef5CText
dw Predef5CText
dw Predef5CText
dw Predef5CText
dw RocketHideout4Text10
RocketHideout4TrainerHeaders: ; 45515 (11:5515)
RocketHideout4TrainerHeader0: ; 45515 (11:5515)
db $2 ; flag's bit
db ($0 << 4) ; trainer's view range
dw wd81b ; flag's byte
dw RocketHideout4BattleText2 ; TextBeforeBattle
dw RocketHideout4AfterBattleText2 ; TextAfterBattle
dw RocketHideout4EndBattleText2 ; TextEndBattle
dw RocketHideout4EndBattleText2 ; TextEndBattle
2014-05-18 18:19:10 +00:00
RocketHideout4TrainerHeader2: ; 45521 (11:5521)
db $3 ; flag's bit
db ($0 << 4) ; trainer's view range
dw wd81b ; flag's byte
dw RocketHideout4BattleText3 ; TextBeforeBattle
dw RocketHideout4AfterBattleText3 ; TextAfterBattle
dw RocketHideout4EndBattleText3 ; TextEndBattle
dw RocketHideout4EndBattleText3 ; TextEndBattle
2014-05-18 18:19:10 +00:00
RocketHideout4TrainerHeader3: ; 4552d (11:552d)
db $4 ; flag's bit
db ($1 << 4) ; trainer's view range
dw wd81b ; flag's byte
dw RocketHideout4BattleText4 ; TextBeforeBattle
dw RocketHideout4AfterBattleText4 ; TextAfterBattle
dw RocketHideout4EndBattleText4 ; TextEndBattle
dw RocketHideout4EndBattleText4 ; TextEndBattle
2014-05-18 18:19:10 +00:00
db $ff
RocketHideout4Text1: ; 4553a (11:553a)
2015-07-03 19:58:50 +00:00
TX_ASM
ld a, [wd81b]
2014-05-18 18:19:10 +00:00
bit 7, a
jp nz, .asm_545571
ld hl, RocketHideout4Text_4557a
call PrintText
ld hl, wd72d
2014-05-18 18:19:10 +00:00
set 6, [hl]
set 7, [hl]
ld hl, RocketHideout4Text_4557f
ld de, RocketHideout4Text_4557f
2014-09-14 18:29:18 +00:00
call SaveEndBattleTextPointers
2014-05-18 18:19:10 +00:00
ldh a, [$8c]
2014-09-13 07:50:56 +00:00
ld [wSpriteIndex], a
2014-05-18 18:19:10 +00:00
call EngageMapTrainer
call InitBattleEnemyParameters
xor a
ldh [$b4], a
ld a, $3
ld [W_ROCKETHIDEOUT4CURSCRIPT], a
ld [W_CURMAPSCRIPT], a
jr .asm_209f0
2014-05-18 18:19:10 +00:00
.asm_545571
ld hl, RocketHideout4Text10
call PrintText
.asm_209f0
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
RocketHideout4Text_4557a: ; 4557a (11:557a)
TX_FAR _RocketHideout4Text_4557a
db "@"
RocketHideout4Text_4557f: ; 4557f (11:557f)
TX_FAR _RocketHideout4Text_4557f
db "@"
RocketHideout4Text10: ; 45584 (11:5584)
TX_FAR _RocketHideout4Text_45584
db "@"
RocketHideout4Text2: ; 45589 (11:5589)
2015-07-03 19:58:50 +00:00
TX_ASM
2014-05-18 18:19:10 +00:00
ld hl, RocketHideout4TrainerHeader0
call TalkToTrainer
jp TextScriptEnd
RocketHideout4BattleText2: ; 45593 (11:5593)
TX_FAR _RocketHideout4BattleText2
db "@"
RocketHideout4EndBattleText2: ; 45598 (11:5598)
TX_FAR _RocketHideout4EndBattleText2
db "@"
RocketHideout4AfterBattleText2: ; 4559d (11:559d)
TX_FAR _RocketHide4AfterBattleText2
db "@"
RocketHideout4Text3: ; 455a2 (11:55a2)
2015-07-03 19:58:50 +00:00
TX_ASM
2014-05-18 18:19:10 +00:00
ld hl, RocketHideout4TrainerHeader2
call TalkToTrainer
jp TextScriptEnd
RocketHideout4BattleText3: ; 455ac (11:55ac)
TX_FAR _RocketHideout4BattleText3
db "@"
RocketHideout4EndBattleText3: ; 455b1 (11:55b1)
TX_FAR _RocketHideout4EndBattleText3
db "@"
RocketHideout4AfterBattleText3: ; 455b6 (11:55b6)
TX_FAR _RocketHide4AfterBattleText3
db "@"
RocketHideout4Text4: ; 455bb (11:55bb)
2015-07-03 19:58:50 +00:00
TX_ASM
2014-05-18 18:19:10 +00:00
ld hl, RocketHideout4TrainerHeader3
call TalkToTrainer
jp TextScriptEnd
RocketHideout4BattleText4: ; 455c5 (11:55c5)
TX_FAR _RocketHideout4BattleText4
db "@"
RocketHideout4EndBattleText4: ; 455ca (11:55ca)
TX_FAR _RocketHideout4EndBattleText4
db "@"
RocketHideout4AfterBattleText4: ; 455cf (11:55cf)
2015-07-03 19:58:50 +00:00
TX_ASM
ld hl, RocketHideout4Text_455ec
2014-05-18 18:19:10 +00:00
call PrintText
ld hl, wd81b
2014-05-18 18:19:10 +00:00
bit 6, [hl]
set 6, [hl]
jr nz, .asm_455e9
ld a, HS_ROCKET_HIDEOUT_4_ITEM_5
ld [wcc4d], a
predef ShowObject
2014-05-18 18:19:10 +00:00
.asm_455e9
jp TextScriptEnd
RocketHideout4Text_455ec: ; 455ec (11:55ec)
TX_FAR _RocketHideout4Text_455ec
db "@"