thorn/kep-hack
1
0
Fork 0
mirror of https://github.com/thornAvery/kep-hack.git synced 2026-02-21 06:38:40 +13:00
Code Issues Projects Releases Packages Wiki Activity Actions

Brunswick Glade

Browse source 
This adds the intermittent area before Brunswick Grotto, where you'll encounter Galarian Zapdos periodically.

It seems the hide/show constants are desynchronised again, as the copies in the glade won't disappear.
This commit is contained in:
Llinos Evans 2023-07-14 13:49:36 +01:00
parent 3ef4cea23d
commit 1c1b3063bf
15 changed files with 154 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

104
scripts/BrunswickGlade.asm Normal file
View file

@ -0,0 +1,104 @@
BrunswickGlade_Script:
jp EnableAutoTextBoxDrawing
BrunswickGlade_TextPointers:
dw GZapRun1
dw GZapRun2
dw GZapRun3
dw BrunswickGladeSign1
GZapRun1:
text_far _BirdBattleText
text_asm
ld a, ZAPDOS_G
call PlayCry
call WaitForSoundToFinish
ld a, $ff
ld [wJoyIgnore], a
call GBFadeOutToBlack
ld a, SFX_RUN
call PlaySound
ld a, HS_GLADE_GZAP_1
ld [wMissableObjectIndex], a
predef HideObject
ld a, HS_GLADE_GZAP_2
ld [wMissableObjectIndex], a
predef ShowObject
call UpdateSprites
call Delay3
call GBFadeInFromBlack
ld a, 0
ld [wJoyIgnore], a
ld hl, GZapGladeRunText
call PrintText
jp TextScriptEnd
GZapRun2:
text_far _BirdBattleText
text_asm
ld a, ZAPDOS_G
call PlayCry
call WaitForSoundToFinish
ld a, $ff
ld [wJoyIgnore], a
call GBFadeOutToBlack
ld a, SFX_RUN
call PlaySound
ld a, HS_GLADE_GZAP_2
ld [wMissableObjectIndex], a
predef HideObject
ld a, HS_GLADE_GZAP_3
ld [wMissableObjectIndex], a
predef ShowObject
call UpdateSprites
call Delay3
call GBFadeInFromBlack
ld a, 0
ld [wJoyIgnore], a
ld hl, GZapGladeRunText
call PrintText
jp TextScriptEnd
GZapRun3:
text_far _BirdBattleText
text_asm
ld a, ZAPDOS_G
call PlayCry
call WaitForSoundToFinish
ld a, $ff
ld [wJoyIgnore], a
call GBFadeOutToBlack
ld a, SFX_RUN
call PlaySound
ld a, HS_GLADE_GZAP_3
ld [wMissableObjectIndex], a
predef HideObject
ld a, HS_BRUNSWICK_ZAPDOS_G_2
ld [wMissableObjectIndex], a
predef ShowObject
call UpdateSprites
call Delay3
call GBFadeInFromBlack
ld a, 0
ld [wJoyIgnore], a
ld hl, GZapGladeRunText
call PrintText
jp TextScriptEnd
GZapGladeRunText:
text "It ran away"
line "again..."
done
text_end
BrunswickGladeSign1:
text "BRUNSWICK GLADE"
line "The lush..."
para "The sign has been"
line "kicked in. It's"
cont "impossible to"
cont "read..."
done
text_end

5
scripts/BrunswickTrail.asm
View file

@ -87,9 +87,14 @@ GZapFound:
ld a, $ff
ld [wJoyIgnore], a
call GBFadeOutToBlack
ld a, SFX_RUN
call PlaySound
ld a, HS_BRUNSWICK_ZAPDOS_G_1
ld [wMissableObjectIndex], a
predef HideObject
ld a, HS_GLADE_GZAP_1
ld [wMissableObjectIndex], a
predef ShowObject
call UpdateSprites
call Delay3
call GBFadeInFromBlack