pokered/scripts/rocktunnel1.asm
dannye 70dde9d96b Clean up redundant labels
fix trainer header numbering
2016-07-20 00:40:04 -05:00

213 lines
5.1 KiB
NASM
Executable file

RockTunnel1Script:
call EnableAutoTextBoxDrawing
ld hl, RockTunnel1TrainerHeader0
ld de, RockTunnel1ScriptPointers
ld a, [wRockTunnel1CurScript]
call ExecuteCurMapScriptInTable
ld [wRockTunnel1CurScript], a
ret
RockTunnel1ScriptPointers:
dw CheckFightingMapTrainers
dw DisplayEnemyTrainerTextAndStartBattle
dw EndTrainerBattle
RockTunnel1TextPointers:
dw RockTunnel1Text1
dw RockTunnel1Text2
dw RockTunnel1Text3
dw RockTunnel1Text4
dw RockTunnel1Text5
dw RockTunnel1Text6
dw RockTunnel1Text7
dw RockTunnel1Text8
RockTunnel1TrainerHeader0:
dbEventFlagBit EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_0
db ($4 << 4) ; trainer's view range
dwEventFlagAddress EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_0
dw RockTunnel1BattleText1 ; TextBeforeBattle
dw RockTunnel1AfterBattleText1 ; TextAfterBattle
dw RockTunnel1EndBattleText1 ; TextEndBattle
dw RockTunnel1EndBattleText1 ; TextEndBattle
RockTunnel1TrainerHeader1:
dbEventFlagBit EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_1
db ($4 << 4) ; trainer's view range
dwEventFlagAddress EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_1
dw RockTunnel1BattleText2 ; TextBeforeBattle
dw RockTunnel1AfterBattleText2 ; TextAfterBattle
dw RockTunnel1EndBattleText2 ; TextEndBattle
dw RockTunnel1EndBattleText2 ; TextEndBattle
RockTunnel1TrainerHeader2:
dbEventFlagBit EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_2
db ($3 << 4) ; trainer's view range
dwEventFlagAddress EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_2
dw RockTunnel1BattleText3 ; TextBeforeBattle
dw RockTunnel1AfterBattleText3 ; TextAfterBattle
dw RockTunnel1EndBattleText3 ; TextEndBattle
dw RockTunnel1EndBattleText3 ; TextEndBattle
RockTunnel1TrainerHeader3:
dbEventFlagBit EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_3
db ($3 << 4) ; trainer's view range
dwEventFlagAddress EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_3
dw RockTunnel1BattleText4 ; TextBeforeBattle
dw RockTunnel1AfterBattleText4 ; TextAfterBattle
dw RockTunnel1EndBattleText4 ; TextEndBattle
dw RockTunnel1EndBattleText4 ; TextEndBattle
RockTunnel1TrainerHeader4:
dbEventFlagBit EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_4
db ($4 << 4) ; trainer's view range
dwEventFlagAddress EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_4
dw RockTunnel1BattleText5 ; TextBeforeBattle
dw RockTunnel1AfterBattleText5 ; TextAfterBattle
dw RockTunnel1EndBattleText5 ; TextEndBattle
dw RockTunnel1EndBattleText5 ; TextEndBattle
RockTunnel1TrainerHeader5:
dbEventFlagBit EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_5
db ($4 << 4) ; trainer's view range
dwEventFlagAddress EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_5
dw RockTunnel1BattleText6 ; TextBeforeBattle
dw RockTunnel1AfterBattleText6 ; TextAfterBattle
dw RockTunnel1EndBattleText6 ; TextEndBattle
dw RockTunnel1EndBattleText6 ; TextEndBattle
RockTunnel1TrainerHeader6:
dbEventFlagBit EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_6
db ($4 << 4) ; trainer's view range
dwEventFlagAddress EVENT_BEAT_ROCK_TUNNEL_1_TRAINER_6
dw RockTunnel1BattleText7 ; TextBeforeBattle
dw RockTunnel1AfterBattleText7 ; TextAfterBattle
dw RockTunnel1EndBattleText7 ; TextEndBattle
dw RockTunnel1EndBattleText7 ; TextEndBattle
db $ff
RockTunnel1Text1:
TX_ASM
ld hl, RockTunnel1TrainerHeader0
jr RockTunnel1TalkToTrainer
RockTunnel1Text2:
TX_ASM
ld hl, RockTunnel1TrainerHeader1
jr RockTunnel1TalkToTrainer
RockTunnel1Text3:
TX_ASM
ld hl, RockTunnel1TrainerHeader2
jr RockTunnel1TalkToTrainer
RockTunnel1Text4:
TX_ASM
ld hl, RockTunnel1TrainerHeader3
jr RockTunnel1TalkToTrainer
RockTunnel1Text5:
TX_ASM
ld hl, RockTunnel1TrainerHeader4
jr RockTunnel1TalkToTrainer
RockTunnel1Text6:
TX_ASM
ld hl, RockTunnel1TrainerHeader5
jr RockTunnel1TalkToTrainer
RockTunnel1Text7:
TX_ASM
ld hl, RockTunnel1TrainerHeader6
RockTunnel1TalkToTrainer:
call TalkToTrainer
jp TextScriptEnd
RockTunnel1BattleText1:
TX_FAR _RockTunnel1BattleText1
db "@"
RockTunnel1EndBattleText1:
TX_FAR _RockTunnel1EndBattleText1
db "@"
RockTunnel1AfterBattleText1:
TX_FAR _RockTunnel1AfterBattleText1
db "@"
RockTunnel1BattleText2:
TX_FAR _RockTunnel1BattleText2
db "@"
RockTunnel1EndBattleText2:
TX_FAR _RockTunnel1EndBattleText2
db "@"
RockTunnel1AfterBattleText2:
TX_FAR _RockTunnel1AfterBattleText2
db "@"
RockTunnel1BattleText3:
TX_FAR _RockTunnel1BattleText3
db "@"
RockTunnel1EndBattleText3:
TX_FAR _RockTunnel1EndBattleText3
db "@"
RockTunnel1AfterBattleText3:
TX_FAR _RockTunnel1AfterBattleText3
db "@"
RockTunnel1BattleText4:
TX_FAR _RockTunnel1BattleText4
db "@"
RockTunnel1EndBattleText4:
TX_FAR _RockTunnel1EndBattleText4
db "@"
RockTunnel1AfterBattleText4:
TX_FAR _RockTunnel1AfterBattleText4
db "@"
RockTunnel1BattleText5:
TX_FAR _RockTunnel1BattleText5
db "@"
RockTunnel1EndBattleText5:
TX_FAR _RockTunnel1EndBattleText5
db "@"
RockTunnel1AfterBattleText5:
TX_FAR _RockTunnel1AfterBattleText5
db "@"
RockTunnel1BattleText6:
TX_FAR _RockTunnel1BattleText6
db "@"
RockTunnel1EndBattleText6:
TX_FAR _RockTunnel1EndBattleText6
db "@"
RockTunnel1AfterBattleText6:
TX_FAR _RockTunnel1AfterBattleText6
db "@"
RockTunnel1BattleText7:
TX_FAR _RockTunnel1BattleText7
db "@"
RockTunnel1EndBattleText7:
TX_FAR _RockTunnel1EndBattleText7
db "@"
RockTunnel1AfterBattleText7:
TX_FAR _RockTunnel1AfterBattleText7
db "@"
RockTunnel1Text8:
TX_FAR _RockTunnel1Text8
db "@"