pokered/scripts/SilphCo6F.asm

204 lines
5.1 KiB
NASM
Raw Normal View History

SilphCo6F_Script:
call SilphCo6F_GateCallbackScript
2014-05-18 18:19:10 +00:00
call EnableAutoTextBoxDrawing
ld hl, SilphCo6TrainerHeaders
ld de, SilphCo6F_ScriptPointers
ld a, [wSilphCo6FCurScript]
2014-05-18 18:19:10 +00:00
call ExecuteCurMapScriptInTable
ld [wSilphCo6FCurScript], a
2014-05-18 18:19:10 +00:00
ret
SilphCo6F_GateCallbackScript:
2016-01-03 19:17:10 +00:00
ld hl, wCurrentMapScriptFlags
bit BIT_CUR_MAP_LOADED_1, [hl]
res BIT_CUR_MAP_LOADED_1, [hl]
2014-05-18 18:19:10 +00:00
ret z
ld hl, .GateCoordinates
call SilphCo4F_SetCardKeyDoorYScript
call SilphCo6F_UnlockedDoorEventScript
2015-07-21 17:36:03 +00:00
CheckEvent EVENT_SILPH_CO_6_UNLOCKED_DOOR
2014-05-18 18:19:10 +00:00
ret nz
ld a, $5f
2015-07-24 21:39:45 +00:00
ld [wNewTileBlockID], a
2015-08-05 21:20:29 +00:00
lb bc, 6, 2
2014-09-14 18:29:18 +00:00
predef_jump ReplaceTileBlock
2014-05-18 18:19:10 +00:00
.GateCoordinates:
dbmapcoord 2, 6
db -1 ; end
2014-05-18 18:19:10 +00:00
SilphCo6F_UnlockedDoorEventScript:
ldh a, [hUnlockedSilphCoDoors]
2014-05-18 18:19:10 +00:00
and a
ret z
2015-07-21 17:36:03 +00:00
SetEvent EVENT_SILPH_CO_6_UNLOCKED_DOOR
2014-05-18 18:19:10 +00:00
ret
SilphCo6F_ScriptPointers:
def_script_pointers
dw_const CheckFightingMapTrainers, SCRIPT_SILPHCO6F_DEFAULT
dw_const DisplayEnemyTrainerTextAndStartBattle, SCRIPT_SILPHCO6F_START_BATTLE
dw_const EndTrainerBattle, SCRIPT_SILPHCO6F_END_BATTLE
2014-05-18 18:19:10 +00:00
SilphCo6F_TextPointers:
def_text_pointers
dw_const SilphCo6FSilphWorkerM1Text, TEXT_SILPHCO6F_SILPH_WORKER_M1
dw_const SilphCo6FSilphWorkerM2Text, TEXT_SILPHCO6F_SILPH_WORKER_M2
dw_const SilphCo6FSilphWorkerF1Text, TEXT_SILPHCO6F_SILPH_WORKER_F1
dw_const SilphCo6FSilphWorkerF2Text, TEXT_SILPHCO6F_SILPH_WORKER_F2
dw_const SilphCo6FSilphWorkerM3Text, TEXT_SILPHCO6F_SILPH_WORKER_M3
dw_const SilphCo6FRocket1Text, TEXT_SILPHCO6F_ROCKET1
dw_const SilphCo6FScientistText, TEXT_SILPHCO6F_SCIENTIST
dw_const SilphCo6FRocket2Text, TEXT_SILPHCO6F_ROCKET2
dw_const PickUpItemText, TEXT_SILPHCO6F_HP_UP
dw_const PickUpItemText, TEXT_SILPHCO6F_X_ACCURACY
2014-05-18 18:19:10 +00:00
SilphCo6TrainerHeaders:
def_trainers 6
2016-06-12 00:24:04 +00:00
SilphCo6TrainerHeader0:
trainer EVENT_BEAT_SILPH_CO_6F_TRAINER_0, 2, SilphCo6FRocket1BattleText, SilphCo6Rocket1EndBattleText, SilphCo6Rocket1AfterBattleText
SilphCo6TrainerHeader1:
trainer EVENT_BEAT_SILPH_CO_6F_TRAINER_1, 3, SilphCo6FScientistBattleText, SilphCo6FScientistEndBattleText, SilphCo6FScientistAfterBattleText
SilphCo6TrainerHeader2:
trainer EVENT_BEAT_SILPH_CO_6F_TRAINER_2, 2, SilphCo6FRocket2BattleText, SilphCo6FRocket2EndBattleText, SilphCo6FRocket2AfterBattleText
db -1 ; end
2014-05-18 18:19:10 +00:00
SilphCo6FBeatGiovanniPrintDEOrPrintHLScript:
2015-07-21 17:36:03 +00:00
CheckEvent EVENT_BEAT_SILPH_CO_GIOVANNI
jr nz, .beat_giovanni
jr .print_text
.beat_giovanni
2014-05-18 18:19:10 +00:00
ld h, d
ld l, e
.print_text
2014-05-18 18:19:10 +00:00
jp PrintText
SilphCo6FSilphWorkerM1Text:
text_asm
ld hl, .TookOverTheBuildingText
ld de, .BackToWorkText
call SilphCo6FBeatGiovanniPrintDEOrPrintHLScript
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
.TookOverTheBuildingText:
text_far _SilphCo6FSilphWorkerM1TookOverTheBuildingText
text_end
2014-05-18 18:19:10 +00:00
.BackToWorkText:
text_far _SilphCo6FSilphWorkerM1BackToWorkText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FSilphWorkerM2Text:
text_asm
ld hl, .HelpMePleaseText
ld de, .WeGotEngagedText
call SilphCo6FBeatGiovanniPrintDEOrPrintHLScript
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
.HelpMePleaseText:
text_far _SilphCo6FSilphWorkerMHelpMePleaseText
text_end
2014-05-18 18:19:10 +00:00
.WeGotEngagedText:
text_far _SilphCo6FSilphWorkerMWeGotEngagedText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FSilphWorkerF1Text:
text_asm
ld hl, .SuchACowardText
ld de, .HaveToMarryHimText
call SilphCo6FBeatGiovanniPrintDEOrPrintHLScript
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
.SuchACowardText:
text_far _SilphCo6FSilphWorkerF1SuchACowardText
text_end
2014-05-18 18:19:10 +00:00
.HaveToMarryHimText:
text_far _SilphCo6FSilphWorkerF1HaveToMarryHimText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FSilphWorkerF2Text:
text_asm
ld hl, .TeamRocketConquerWorldText
ld de, .TeamRocketRanText
call SilphCo6FBeatGiovanniPrintDEOrPrintHLScript
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
.TeamRocketConquerWorldText:
text_far _SilphCo6FSilphWorkerF2TeamRocketConquerWorldText
text_end
2014-05-18 18:19:10 +00:00
.TeamRocketRanText:
text_far _SilphCo6FSilphWorkerF2TeamRocketRanText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FSilphWorkerM3Text:
text_asm
ld hl, .TargetedSilphText
ld de, .WorkForSilphText
call SilphCo6FBeatGiovanniPrintDEOrPrintHLScript
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
.TargetedSilphText:
text_far _SilphCo6FSilphWorkerM3TargetedSilphText
text_end
2014-05-18 18:19:10 +00:00
.WorkForSilphText:
text_far _SilphCo6FSilphWorkerM3WorkForSilphText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FRocket1Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, SilphCo6TrainerHeader0
call TalkToTrainer
jp TextScriptEnd
SilphCo6FRocket1BattleText:
text_far _SilphCo6FRocket1BattleText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6Rocket1EndBattleText:
text_far _SilphCo6Rocket1EndBattleText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6Rocket1AfterBattleText:
text_far _SilphCo6Rocket1AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FScientistText:
text_asm
ld hl, SilphCo6TrainerHeader1
2014-05-18 18:19:10 +00:00
call TalkToTrainer
jp TextScriptEnd
SilphCo6FScientistBattleText:
text_far _SilphCo6FScientistBattleText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FScientistEndBattleText:
text_far _SilphCo6FScientistEndBattleText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FScientistAfterBattleText:
text_far _SilphCo6FScientistAfterBattleText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FRocket2Text:
text_asm
ld hl, SilphCo6TrainerHeader2
2014-05-18 18:19:10 +00:00
call TalkToTrainer
jp TextScriptEnd
SilphCo6FRocket2BattleText:
text_far _SilphCo6FRocket2BattleText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FRocket2EndBattleText:
text_far _SilphCo6FRocket2EndBattleText
text_end
2014-05-18 18:19:10 +00:00
SilphCo6FRocket2AfterBattleText:
text_far _SilphCo6FRocket2AfterBattleText
text_end