mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
212 lines
4.5 KiB
NASM
Executable file
212 lines
4.5 KiB
NASM
Executable file
PokemonTower6F_Script:
|
|
call EnableAutoTextBoxDrawing
|
|
ld hl, PokemonTower6TrainerHeader0
|
|
ld de, PokemonTower6F_ScriptPointers
|
|
ld a, [wPokemonTower6FCurScript]
|
|
call ExecuteCurMapScriptInTable
|
|
ld [wPokemonTower6FCurScript], a
|
|
ret
|
|
|
|
PokemonTower6Script_60b02:
|
|
xor a
|
|
ld [wJoyIgnore], a
|
|
ld [wPokemonTower6FCurScript], a
|
|
ld [wCurMapScript], a
|
|
ret
|
|
|
|
PokemonTower6F_ScriptPointers:
|
|
dw PokemonTower6Script0
|
|
dw DisplayEnemyTrainerTextAndStartBattle
|
|
dw EndTrainerBattle
|
|
dw PokemonTower6Script3
|
|
dw PokemonTower6Script4
|
|
|
|
PokemonTower6Script0:
|
|
CheckEvent EVENT_BEAT_GHOST_MAROWAK
|
|
jp nz, CheckFightingMapTrainers
|
|
ld hl, CoordsData_60b45
|
|
call ArePlayerCoordsInArray
|
|
jp nc, CheckFightingMapTrainers
|
|
xor a
|
|
ldh [hJoyHeld], a
|
|
ld a, $6
|
|
ldh [hSpriteIndexOrTextID], a
|
|
call DisplayTextID
|
|
ld a, MAROWAK
|
|
ld [wCurOpponent], a
|
|
ld a, 30
|
|
ld [wCurEnemyLVL], a
|
|
ld a, $4
|
|
ld [wPokemonTower6FCurScript], a
|
|
ld [wCurMapScript], a
|
|
ret
|
|
|
|
CoordsData_60b45:
|
|
db $10,$0A,$FF
|
|
|
|
PokemonTower6Script4:
|
|
ld a, [wIsInBattle]
|
|
cp $ff
|
|
jp z, PokemonTower6Script_60b02
|
|
ld a, $ff
|
|
ld [wJoyIgnore], a
|
|
ld a, [wd72d]
|
|
bit 6, a
|
|
ret nz
|
|
call UpdateSprites
|
|
ld a, $f0
|
|
ld [wJoyIgnore], a
|
|
ld a, [wBattleResult]
|
|
and a
|
|
jr nz, .asm_60b82
|
|
SetEvent EVENT_BEAT_GHOST_MAROWAK
|
|
ld a, $7
|
|
ldh [hSpriteIndexOrTextID], a
|
|
call DisplayTextID
|
|
xor a
|
|
ld [wJoyIgnore], a
|
|
ld a, $0
|
|
ld [wPokemonTower6FCurScript], a
|
|
ld [wCurMapScript], a
|
|
ret
|
|
.asm_60b82
|
|
ld a, $1
|
|
ld [wSimulatedJoypadStatesIndex], a
|
|
ld a, $10
|
|
ld [wSimulatedJoypadStatesEnd], a
|
|
xor a
|
|
ld [wSpritePlayerStateData2MovementByte1], a
|
|
ld [wOverrideSimulatedJoypadStatesMask], a
|
|
ld hl, wd730
|
|
set 7, [hl]
|
|
ld a, $3
|
|
ld [wPokemonTower6FCurScript], a
|
|
ld [wCurMapScript], a
|
|
ret
|
|
|
|
PokemonTower6Script3:
|
|
ld a, [wSimulatedJoypadStatesIndex]
|
|
and a
|
|
ret nz
|
|
call Delay3
|
|
xor a
|
|
ld [wPokemonTower6FCurScript], a
|
|
ld [wCurMapScript], a
|
|
ret
|
|
|
|
PokemonTower6F_TextPointers:
|
|
dw PokemonTower6Text1
|
|
dw PokemonTower6Text2
|
|
dw PokemonTower6Text3
|
|
dw PickUpItemText
|
|
dw PickUpItemText
|
|
dw PokemonTower6Text6
|
|
dw PokemonTower6Text7
|
|
|
|
PokemonTower6TrainerHeader0:
|
|
dbEventFlagBit EVENT_BEAT_POKEMONTOWER_6_TRAINER_0
|
|
db ($3 << 4) ; trainer's view range
|
|
dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_6_TRAINER_0
|
|
dw PokemonTower6BattleText1 ; TextBeforeBattle
|
|
dw PokemonTower6AfterBattleText1 ; TextAfterBattle
|
|
dw PokemonTower6EndBattleText1 ; TextEndBattle
|
|
dw PokemonTower6EndBattleText1 ; TextEndBattle
|
|
|
|
PokemonTower6TrainerHeader1:
|
|
dbEventFlagBit EVENT_BEAT_POKEMONTOWER_6_TRAINER_1
|
|
db ($3 << 4) ; trainer's view range
|
|
dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_6_TRAINER_1
|
|
dw PokemonTower6BattleText2 ; TextBeforeBattle
|
|
dw PokemonTower6AfterBattleText2 ; TextAfterBattle
|
|
dw PokemonTower6EndBattleText2 ; TextEndBattle
|
|
dw PokemonTower6EndBattleText2 ; TextEndBattle
|
|
|
|
PokemonTower6TrainerHeader2:
|
|
dbEventFlagBit EVENT_BEAT_POKEMONTOWER_6_TRAINER_2
|
|
db ($2 << 4) ; trainer's view range
|
|
dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_6_TRAINER_2
|
|
dw PokemonTower6BattleText3 ; TextBeforeBattle
|
|
dw PokemonTower6AfterBattleText3 ; TextAfterBattle
|
|
dw PokemonTower6EndBattleText3 ; TextEndBattle
|
|
dw PokemonTower6EndBattleText3 ; TextEndBattle
|
|
|
|
db $ff
|
|
|
|
PokemonTower6Text1:
|
|
text_asm
|
|
ld hl, PokemonTower6TrainerHeader0
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
PokemonTower6Text2:
|
|
text_asm
|
|
ld hl, PokemonTower6TrainerHeader1
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
PokemonTower6Text3:
|
|
text_asm
|
|
ld hl, PokemonTower6TrainerHeader2
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
PokemonTower6Text7:
|
|
text_asm
|
|
ld hl, PokemonTower2Text_60c1f
|
|
call PrintText
|
|
ld a, MAROWAK
|
|
call PlayCry
|
|
call WaitForSoundToFinish
|
|
ld c, 30
|
|
call DelayFrames
|
|
ld hl, PokemonTower2Text_60c24
|
|
call PrintText
|
|
jp TextScriptEnd
|
|
|
|
PokemonTower2Text_60c1f:
|
|
text_far _PokemonTower2Text_60c1f
|
|
text_end
|
|
|
|
PokemonTower2Text_60c24:
|
|
text_far _PokemonTower2Text_60c24
|
|
text_end
|
|
|
|
PokemonTower6BattleText1:
|
|
text_far _PokemonTower6BattleText1
|
|
text_end
|
|
|
|
PokemonTower6EndBattleText1:
|
|
text_far _PokemonTower6EndBattleText1
|
|
text_end
|
|
|
|
PokemonTower6AfterBattleText1:
|
|
text_far _PokemonTower6AfterBattleText1
|
|
text_end
|
|
|
|
PokemonTower6BattleText2:
|
|
text_far _PokemonTower6BattleText2
|
|
text_end
|
|
|
|
PokemonTower6EndBattleText2:
|
|
text_far _PokemonTower6EndBattleText2
|
|
text_end
|
|
|
|
PokemonTower6AfterBattleText2:
|
|
text_far _PokemonTower6AfterBattleText2
|
|
text_end
|
|
|
|
PokemonTower6BattleText3:
|
|
text_far _PokemonTower6BattleText3
|
|
text_end
|
|
|
|
PokemonTower6EndBattleText3:
|
|
text_far _PokemonTower6EndBattleText3
|
|
text_end
|
|
|
|
PokemonTower6AfterBattleText3:
|
|
text_far _PokemonTower6AfterBattleText3
|
|
text_end
|
|
|
|
PokemonTower6Text6:
|
|
text_far _PokemonTower6Text6
|
|
text_end
|