2014-05-18 18:19:10 +00:00
|
|
|
PokemonTower6Script: ; 60aef (18:4aef)
|
|
|
|
call EnableAutoTextBoxDrawing
|
|
|
|
ld hl, PokemonTower6TrainerHeaders
|
|
|
|
ld de, PokemonTower6ScriptPointers
|
|
|
|
ld a, [W_POKEMONTOWER6CURSCRIPT]
|
|
|
|
call ExecuteCurMapScriptInTable
|
|
|
|
ld [W_POKEMONTOWER6CURSCRIPT], a
|
|
|
|
ret
|
|
|
|
|
|
|
|
Func_60b02: ; 60b02 (18:4b02)
|
|
|
|
xor a
|
2014-05-25 17:51:53 +00:00
|
|
|
ld [wJoyIgnore], a
|
2014-05-18 18:19:10 +00:00
|
|
|
ld [W_POKEMONTOWER6CURSCRIPT], a
|
|
|
|
ld [W_CURMAPSCRIPT], a
|
|
|
|
ret
|
|
|
|
|
|
|
|
PokemonTower6ScriptPointers: ; 60b0d (18:4b0d)
|
|
|
|
dw PokemonTower6Script0
|
|
|
|
dw Func_324c
|
|
|
|
dw EndTrainerBattle
|
|
|
|
dw PokemonTower6Script3
|
|
|
|
dw PokemonTower6Script4
|
|
|
|
|
|
|
|
PokemonTower6Script0: ; 60b17 (18:4b17)
|
2014-05-26 21:04:56 +00:00
|
|
|
ld a, [wd768]
|
2014-05-18 18:19:10 +00:00
|
|
|
bit 7, a
|
|
|
|
jp nz, CheckFightingMapTrainers
|
|
|
|
ld hl, CoordsData_60b45 ; $4b45
|
|
|
|
call ArePlayerCoordsInArray
|
|
|
|
jp nc, CheckFightingMapTrainers
|
|
|
|
xor a
|
2014-05-25 17:51:53 +00:00
|
|
|
ld [hJoyHeld], a
|
2014-05-18 18:19:10 +00:00
|
|
|
ld a, $6
|
|
|
|
ld [H_DOWNARROWBLINKCNT2], a ; $ff8c
|
|
|
|
call DisplayTextID
|
|
|
|
ld a, MAROWAK
|
2014-05-26 21:04:56 +00:00
|
|
|
ld [W_CUROPPONENT], a ; wd059
|
2014-05-18 18:19:10 +00:00
|
|
|
ld a, 30
|
2014-05-26 21:04:56 +00:00
|
|
|
ld [W_CURENEMYLVL], a ; W_CURENEMYLVL
|
2014-05-18 18:19:10 +00:00
|
|
|
ld a, $4
|
|
|
|
ld [W_POKEMONTOWER6CURSCRIPT], a
|
|
|
|
ld [W_CURMAPSCRIPT], a
|
|
|
|
ret
|
|
|
|
|
|
|
|
CoordsData_60b45: ; 60b45 (18:4b45)
|
|
|
|
db $10,$0A,$FF
|
|
|
|
|
|
|
|
PokemonTower6Script4: ; 60b48 (18:4b48)
|
2014-05-26 21:04:56 +00:00
|
|
|
ld a, [W_ISINBATTLE] ; W_ISINBATTLE
|
2014-05-18 18:19:10 +00:00
|
|
|
cp $ff
|
|
|
|
jp z, Func_60b02
|
|
|
|
ld a, $ff
|
2014-05-25 17:51:53 +00:00
|
|
|
ld [wJoyIgnore], a
|
2014-05-26 21:04:56 +00:00
|
|
|
ld a, [wd72d]
|
2014-05-18 18:19:10 +00:00
|
|
|
bit 6, a
|
|
|
|
ret nz
|
|
|
|
call UpdateSprites
|
|
|
|
ld a, $f0
|
2014-05-25 17:51:53 +00:00
|
|
|
ld [wJoyIgnore], a
|
2014-05-26 21:04:56 +00:00
|
|
|
ld a, [wcf0b]
|
2014-05-18 18:19:10 +00:00
|
|
|
and a
|
|
|
|
jr nz, .asm_60b82
|
2014-05-26 21:04:56 +00:00
|
|
|
ld hl, wd768
|
2014-05-18 18:19:10 +00:00
|
|
|
set 7, [hl]
|
|
|
|
ld a, $7
|
|
|
|
ld [H_DOWNARROWBLINKCNT2], a ; $ff8c
|
|
|
|
call DisplayTextID
|
|
|
|
xor a
|
2014-05-25 17:51:53 +00:00
|
|
|
ld [wJoyIgnore], a
|
2014-05-18 18:19:10 +00:00
|
|
|
ld a, $0
|
|
|
|
ld [W_POKEMONTOWER6CURSCRIPT], a
|
|
|
|
ld [W_CURMAPSCRIPT], a
|
|
|
|
ret
|
|
|
|
.asm_60b82
|
|
|
|
ld a, $1
|
2014-05-26 21:04:56 +00:00
|
|
|
ld [wcd38], a
|
2014-05-18 18:19:10 +00:00
|
|
|
ld a, $10
|
2014-05-26 21:04:56 +00:00
|
|
|
ld [wccd3], a
|
2014-05-18 18:19:10 +00:00
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
ld [wSpriteStateData2 + $06], a
|
|
|
|
ld [wcd3b], a
|
|
|
|
ld hl, wd730
|
2014-05-18 18:19:10 +00:00
|
|
|
set 7, [hl]
|
|
|
|
ld a, $3
|
|
|
|
ld [W_POKEMONTOWER6CURSCRIPT], a
|
|
|
|
ld [W_CURMAPSCRIPT], a
|
|
|
|
ret
|
|
|
|
|
|
|
|
PokemonTower6Script3: ; 60ba1 (18:4ba1)
|
2014-05-26 21:04:56 +00:00
|
|
|
ld a, [wcd38]
|
2014-05-18 18:19:10 +00:00
|
|
|
and a
|
|
|
|
ret nz
|
|
|
|
call Delay3
|
|
|
|
xor a
|
|
|
|
ld [W_POKEMONTOWER6CURSCRIPT], a
|
|
|
|
ld [W_CURMAPSCRIPT], a
|
|
|
|
ret
|
|
|
|
|
|
|
|
PokemonTower6TextPointers: ; 60bb1 (18:4bb1)
|
|
|
|
dw PokemonTower6Text1
|
|
|
|
dw PokemonTower6Text2
|
|
|
|
dw PokemonTower6Text3
|
|
|
|
dw Predef5CText
|
|
|
|
dw Predef5CText
|
|
|
|
dw PokemonTower6Text6
|
|
|
|
dw PokemonTower6Text7
|
|
|
|
|
|
|
|
PokemonTower6TrainerHeaders: ; 60bbf (18:4bbf)
|
|
|
|
PokemonTower6TrainerHeader0: ; 60bbf (18:4bbf)
|
|
|
|
db $1 ; flag's bit
|
|
|
|
db ($3 << 4) ; trainer's view range
|
2014-05-26 21:04:56 +00:00
|
|
|
dw wd768 ; flag's byte
|
2014-05-18 18:19:10 +00:00
|
|
|
dw PokemonTower6BattleText1 ; 0x4c29 TextBeforeBattle
|
|
|
|
dw PokemonTower6AfterBattleText1 ; 0x4c33 TextAfterBattle
|
|
|
|
dw PokemonTower6EndBattleText1 ; 0x4c2e TextEndBattle
|
|
|
|
dw PokemonTower6EndBattleText1 ; 0x4c2e TextEndBattle
|
|
|
|
|
|
|
|
PokemonTower6TrainerHeader1: ; 60bcb (18:4bcb)
|
|
|
|
db $2 ; flag's bit
|
|
|
|
db ($3 << 4) ; trainer's view range
|
2014-05-26 21:04:56 +00:00
|
|
|
dw wd768 ; flag's byte
|
2014-05-18 18:19:10 +00:00
|
|
|
dw PokemonTower6BattleText2 ; 0x4c38 TextBeforeBattle
|
|
|
|
dw PokemonTower6AfterBattleText2 ; 0x4c42 TextAfterBattle
|
|
|
|
dw PokemonTower6EndBattleText2 ; 0x4c3d TextEndBattle
|
|
|
|
dw PokemonTower6EndBattleText2 ; 0x4c3d TextEndBattle
|
|
|
|
|
|
|
|
PokemonTower6TrainerHeader2: ; 60bd7 (18:4bd7)
|
|
|
|
db $3 ; flag's bit
|
|
|
|
db ($2 << 4) ; trainer's view range
|
2014-05-26 21:04:56 +00:00
|
|
|
dw wd768 ; flag's byte
|
2014-05-18 18:19:10 +00:00
|
|
|
dw PokemonTower6BattleText3 ; 0x4c47 TextBeforeBattle
|
|
|
|
dw PokemonTower6AfterBattleText3 ; 0x4c51 TextAfterBattle
|
|
|
|
dw PokemonTower6EndBattleText3 ; 0x4c4c TextEndBattle
|
|
|
|
dw PokemonTower6EndBattleText3 ; 0x4c4c TextEndBattle
|
|
|
|
|
|
|
|
db $ff
|
|
|
|
|
|
|
|
PokemonTower6Text1: ; 60be4 (18:4be4)
|
|
|
|
db $08 ; asm
|
|
|
|
ld hl, PokemonTower6TrainerHeader0
|
|
|
|
call TalkToTrainer
|
|
|
|
jp TextScriptEnd
|
|
|
|
|
|
|
|
PokemonTower6Text2: ; 60bee (18:4bee)
|
|
|
|
db $08 ; asm
|
|
|
|
ld hl, PokemonTower6TrainerHeader1
|
|
|
|
call TalkToTrainer
|
|
|
|
jp TextScriptEnd
|
|
|
|
|
|
|
|
PokemonTower6Text3: ; 60bf8 (18:4bf8)
|
|
|
|
db $08 ; asm
|
|
|
|
ld hl, PokemonTower6TrainerHeader2
|
|
|
|
call TalkToTrainer
|
|
|
|
jp TextScriptEnd
|
|
|
|
|
|
|
|
PokemonTower6Text7: ; 60c02 (18:4c02)
|
|
|
|
db $8
|
|
|
|
ld hl, PokemonTower2Text_60c1f
|
|
|
|
call PrintText
|
|
|
|
ld a, MAROWAK
|
|
|
|
call PlayCry
|
|
|
|
call WaitForSoundToFinish
|
|
|
|
ld c, $1e
|
|
|
|
call DelayFrames
|
|
|
|
ld hl, PokemonTower2Text_60c24
|
|
|
|
call PrintText
|
|
|
|
jp TextScriptEnd
|
|
|
|
|
|
|
|
PokemonTower2Text_60c1f: ; 60c1f (18:4c1f)
|
|
|
|
TX_FAR _PokemonTower2Text_60c1f
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower2Text_60c24: ; 60c24 (18:4c24)
|
|
|
|
TX_FAR _PokemonTower2Text_60c24
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6BattleText1: ; 60c29 (18:4c29)
|
|
|
|
TX_FAR _PokemonTower6BattleText1
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6EndBattleText1: ; 60c2e (18:4c2e)
|
|
|
|
TX_FAR _PokemonTower6EndBattleText1
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6AfterBattleText1: ; 60c33 (18:4c33)
|
|
|
|
TX_FAR _PokemonTower6AfterBattleText1
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6BattleText2: ; 60c38 (18:4c38)
|
|
|
|
TX_FAR _PokemonTower6BattleText2
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6EndBattleText2: ; 60c3d (18:4c3d)
|
|
|
|
TX_FAR _PokemonTower6EndBattleText2
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6AfterBattleText2: ; 60c42 (18:4c42)
|
|
|
|
TX_FAR _PokemonTower6AfterBattleText2
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6BattleText3: ; 60c47 (18:4c47)
|
|
|
|
TX_FAR _PokemonTower6BattleText3
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6EndBattleText3: ; 60c4c (18:4c4c)
|
|
|
|
TX_FAR _PokemonTower6EndBattleText3
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6AfterBattleText3: ; 60c51 (18:4c51)
|
|
|
|
TX_FAR _PokemonTower6AfterBattleText3
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
PokemonTower6Text6: ; 60c56 (18:4c56)
|
|
|
|
TX_FAR _PokemonTower6Text6
|
|
|
|
db "@"
|