mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
206 lines
4.1 KiB
NASM
Executable file
206 lines
4.1 KiB
NASM
Executable file
RocketHideout3Script:
|
|
call EnableAutoTextBoxDrawing
|
|
ld hl, RocketHideout3TrainerHeader0
|
|
ld de, RocketHideout3ScriptPointers
|
|
ld a, [wRocketHideout3CurScript]
|
|
call ExecuteCurMapScriptInTable
|
|
ld [wRocketHideout3CurScript], a
|
|
ret
|
|
|
|
RocketHideout3ScriptPointers:
|
|
dw RocketHideout3Script0
|
|
dw DisplayEnemyTrainerTextAndStartBattle
|
|
dw EndTrainerBattle
|
|
dw RocketHideout3Script3
|
|
|
|
RocketHideout3Script0:
|
|
ld a, [wYCoord]
|
|
ld b, a
|
|
ld a, [wXCoord]
|
|
ld c, a
|
|
ld hl, RocketHideout3ArrowTilePlayerMovement
|
|
call DecodeArrowMovementRLE
|
|
cp $ff
|
|
jp z, CheckFightingMapTrainers
|
|
ld hl, wd736
|
|
set 7, [hl]
|
|
call StartSimulatingJoypadStates
|
|
ld a, SFX_ARROW_TILES
|
|
call PlaySound
|
|
ld a, $ff
|
|
ld [wJoyIgnore], a
|
|
ld a, $3
|
|
ld [wCurMapScript], a
|
|
ret
|
|
|
|
;format:
|
|
;db y,x
|
|
;dw pointer to movement
|
|
RocketHideout3ArrowTilePlayerMovement:
|
|
db $d,$a
|
|
dw RocketHideout3ArrowMovement6
|
|
db $13,$a
|
|
dw RocketHideout3ArrowMovement1
|
|
db $12,$b
|
|
dw RocketHideout3ArrowMovement2
|
|
db $b,$c
|
|
dw RocketHideout3ArrowMovement3
|
|
db $11,$c
|
|
dw RocketHideout3ArrowMovement4
|
|
db $14,$c
|
|
dw RocketHideout3ArrowMovement5
|
|
db $10,$d
|
|
dw RocketHideout3ArrowMovement6
|
|
db $b,$e
|
|
dw RocketHideout3ArrowMovement7
|
|
db $f,$e
|
|
dw RocketHideout3ArrowMovement6
|
|
db $11,$e
|
|
dw RocketHideout3ArrowMovement8
|
|
db $13,$e
|
|
dw RocketHideout3ArrowMovement9
|
|
db $10,$f
|
|
dw RocketHideout3ArrowMovement7
|
|
db $12,$f
|
|
dw RocketHideout3ArrowMovement10
|
|
db $d,$10
|
|
dw RocketHideout3ArrowMovement11
|
|
db $c,$11
|
|
dw RocketHideout3ArrowMovement10
|
|
db $10,$12
|
|
dw RocketHideout3ArrowMovement12
|
|
db $FF
|
|
|
|
;format: direction, count
|
|
;each list is read starting from the $FF and working backwards
|
|
RocketHideout3ArrowMovement1:
|
|
db D_RIGHT,$04
|
|
db D_UP,$04
|
|
db D_RIGHT,$04
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement2:
|
|
db D_DOWN,$04
|
|
db D_RIGHT,$04
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement3:
|
|
db D_LEFT,$02
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement4:
|
|
db D_RIGHT,$04
|
|
db D_UP,$02
|
|
db D_RIGHT,$02
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement5:
|
|
db D_RIGHT,$04
|
|
db D_UP,$02
|
|
db D_RIGHT,$02
|
|
db D_UP,$03
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement6:
|
|
db D_RIGHT,$04
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement7:
|
|
db D_RIGHT,$02
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement8:
|
|
db D_RIGHT,$04
|
|
db D_UP,$02
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement9:
|
|
db D_RIGHT,$04
|
|
db D_UP,$04
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement10:
|
|
db D_DOWN,$04
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement11:
|
|
db D_UP,$02
|
|
db $FF
|
|
|
|
RocketHideout3ArrowMovement12:
|
|
db D_UP,$01
|
|
db $FF
|
|
|
|
RocketHideout3Script3:
|
|
ld a, [wSimulatedJoypadStatesIndex]
|
|
and a
|
|
jp nz, LoadSpinnerArrowTiles
|
|
xor a
|
|
ld [wJoyIgnore], a
|
|
ld hl, wd736
|
|
res 7, [hl]
|
|
ld a, $0
|
|
ld [wCurMapScript], a
|
|
ret
|
|
|
|
RocketHideout3TextPointers:
|
|
dw RocketHideout3Text1
|
|
dw RocketHideout3Text2
|
|
dw PickUpItemText
|
|
dw PickUpItemText
|
|
|
|
RocketHideout3TrainerHeader0:
|
|
dbEventFlagBit EVENT_BEAT_ROCKET_HIDEOUT_3_TRAINER_0
|
|
db ($2 << 4) ; trainer's view range
|
|
dwEventFlagAddress EVENT_BEAT_ROCKET_HIDEOUT_3_TRAINER_0
|
|
dw RocketHideout3BattleText2 ; TextBeforeBattle
|
|
dw RocketHideout3AfterBattleTxt2 ; TextAfterBattle
|
|
dw RocketHideout3EndBattleText2 ; TextEndBattle
|
|
dw RocketHideout3EndBattleText2 ; TextEndBattle
|
|
|
|
RocketHideout3TrainerHeader1:
|
|
dbEventFlagBit EVENT_BEAT_ROCKET_HIDEOUT_3_TRAINER_1
|
|
db ($4 << 4) ; trainer's view range
|
|
dwEventFlagAddress EVENT_BEAT_ROCKET_HIDEOUT_3_TRAINER_1
|
|
dw RocketHideout3BattleTxt ; TextBeforeBattle
|
|
dw RocketHideout3AfterBattleText3 ; TextAfterBattle
|
|
dw RocketHideout3EndBattleText3 ; TextEndBattle
|
|
dw RocketHideout3EndBattleText3 ; TextEndBattle
|
|
|
|
db $ff
|
|
|
|
RocketHideout3Text1:
|
|
TX_ASM
|
|
ld hl, RocketHideout3TrainerHeader0
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
RocketHideout3BattleText2:
|
|
TX_FAR _RocketHideout3BattleText2
|
|
db "@"
|
|
|
|
RocketHideout3EndBattleText2:
|
|
TX_FAR _RocketHideout3EndBattleText2
|
|
db "@"
|
|
|
|
RocketHideout3AfterBattleTxt2:
|
|
TX_FAR _RocketHideout3AfterBattleTxt2
|
|
db "@"
|
|
|
|
RocketHideout3Text2:
|
|
TX_ASM
|
|
ld hl, RocketHideout3TrainerHeader1
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
RocketHideout3BattleTxt:
|
|
TX_FAR _RocketHideout3BattleTxt
|
|
db "@"
|
|
|
|
RocketHideout3EndBattleText3:
|
|
TX_FAR _RocketHideout3EndBattleText3
|
|
db "@"
|
|
|
|
RocketHideout3AfterBattleText3:
|
|
TX_FAR _RocketHide3AfterBattleText3
|
|
db "@"
|