ref: 819b6789099947e83b7e3f0b0e2f6d39cf901807
dir: /scripts/silphco4.asm/
SilphCo4Script: call SilphCo4Script_19d21 call EnableAutoTextBoxDrawing ld hl, SilphCo4TrainerHeader0 ld de, SilphCo4ScriptPointers ld a, [wSilphCo4CurScript] call ExecuteCurMapScriptInTable ld [wSilphCo4CurScript], a ret SilphCo4Script_19d21: ld hl, wCurrentMapScriptFlags bit 5, [hl] res 5, [hl] ret z ld hl, SilphCo4GateCoords call SilphCo4Script_19d5d call SilphCo4Script_19d89 CheckEvent EVENT_SILPH_CO_4_UNLOCKED_DOOR1 jr nz, .asm_19d48 push af ld a, $54 ld [wNewTileBlockID], a lb bc, 6, 2 predef ReplaceTileBlock pop af .asm_19d48 CheckEventAfterBranchReuseA EVENT_SILPH_CO_4_UNLOCKED_DOOR2, EVENT_SILPH_CO_4_UNLOCKED_DOOR1 ret nz ld a, $54 ld [wNewTileBlockID], a lb bc, 4, 6 predef_jump ReplaceTileBlock SilphCo4GateCoords: db $06,$02 db $04,$06 db $FF SilphCo4Script_19d5d: push hl ld hl, wCardKeyDoorY ld a, [hli] ld b, a ld a, [hl] ld c, a xor a ld [$ffe0], a pop hl .asm_19d69 ld a, [hli] cp $ff jr z, .asm_19d85 push hl ld hl, $ffe0 inc [hl] pop hl cp b jr z, .asm_19d7a inc hl jr .asm_19d69 .asm_19d7a ld a, [hli] cp c jr nz, .asm_19d69 ld hl, wCardKeyDoorY xor a ld [hli], a ld [hl], a ret .asm_19d85 xor a ld [$ffe0], a ret SilphCo4Script_19d89: EventFlagAddress hl, EVENT_SILPH_CO_4_UNLOCKED_DOOR1 ld a, [$ffe0] and a ret z cp $1 jr nz, .next SetEventReuseHL EVENT_SILPH_CO_4_UNLOCKED_DOOR1 ret .next SetEventAfterBranchReuseHL EVENT_SILPH_CO_4_UNLOCKED_DOOR2, EVENT_SILPH_CO_4_UNLOCKED_DOOR1 ret SilphCo4ScriptPointers: dw CheckFightingMapTrainers dw DisplayEnemyTrainerTextAndStartBattle dw EndTrainerBattle SilphCo4TextPointers: dw SilphCo4Text1 dw SilphCo4Text2 dw SilphCo4Text3 dw SilphCo4Text4 dw PickUpItemText dw PickUpItemText dw PickUpItemText SilphCo4TrainerHeader0: dbEventFlagBit EVENT_BEAT_SILPH_CO_4F_TRAINER_0 db ($4 << 4) ; trainer's view range dwEventFlagAddress EVENT_BEAT_SILPH_CO_4F_TRAINER_0 dw SilphCo4BattleText2 ; TextBeforeBattle dw SilphCo4AfterBattleText2 ; TextAfterBattle dw SilphCo4EndBattleText2 ; TextEndBattle dw SilphCo4EndBattleText2 ; TextEndBattle SilphCo4TrainerHeader1: dbEventFlagBit EVENT_BEAT_SILPH_CO_4F_TRAINER_1 db ($3 << 4) ; trainer's view range dwEventFlagAddress EVENT_BEAT_SILPH_CO_4F_TRAINER_1 dw SilphCo4BattleText3 ; TextBeforeBattle dw SilphCo4AfterBattleText3 ; TextAfterBattle dw SilphCo4EndBattleText3 ; TextEndBattle dw SilphCo4EndBattleText3 ; TextEndBattle SilphCo4TrainerHeader2: dbEventFlagBit EVENT_BEAT_SILPH_CO_4F_TRAINER_2 db ($4 << 4) ; trainer's view range dwEventFlagAddress EVENT_BEAT_SILPH_CO_4F_TRAINER_2 dw SilphCo4BattleText4 ; TextBeforeBattle dw SilphCo4AfterBattleText4 ; TextAfterBattle dw SilphCo4EndBattleText4 ; TextEndBattle dw SilphCo4EndBattleText4 ; TextEndBattle db $ff SilphCo4Text1: TX_ASM ld hl, SilphCo4Text_19de0 ld de, SilphCo4Text_19de5 call SilphCo6Script_1a22f jp TextScriptEnd SilphCo4Text_19de0: TX_FAR _SilphCo4Text_19de0 db "@" SilphCo4Text_19de5: TX_FAR _SilphCo4Text_19de5 db "@" SilphCo4Text2: TX_ASM ld hl, SilphCo4TrainerHeader0 call TalkToTrainer jp TextScriptEnd SilphCo4BattleText2: TX_FAR _SilphCo4BattleText2 db "@" SilphCo4EndBattleText2: TX_FAR _SilphCo4EndBattleText2 db "@" SilphCo4AfterBattleText2: TX_FAR _SilphCo4AfterBattleText2 db "@" SilphCo4Text3: TX_ASM ld hl, SilphCo4TrainerHeader1 call TalkToTrainer jp TextScriptEnd SilphCo4BattleText3: TX_FAR _SilphCo4BattleText3 db "@" SilphCo4EndBattleText3: TX_FAR _SilphCo4EndBattleText3 db "@" SilphCo4AfterBattleText3: TX_FAR _SilphCo4AfterBattleText3 db "@" SilphCo4Text4: TX_ASM ld hl, SilphCo4TrainerHeader2 call TalkToTrainer jp TextScriptEnd SilphCo4BattleText4: TX_FAR _SilphCo4BattleText4 db "@" SilphCo4EndBattleText4: TX_FAR _SilphCo4EndBattleText4 db "@" SilphCo4AfterBattleText4: TX_FAR _SilphCo4AfterBattleText4 db "@"