mirror of
https://github.com/pret/pokered.git
synced 2024-10-22 22:55:31 +00:00
46 lines
1.1 KiB
NASM
Executable file
46 lines
1.1 KiB
NASM
Executable file
SeafoamIslandsB1F_Script:
|
|
call EnableAutoTextBoxDrawing
|
|
ld hl, wFlags_0xcd60
|
|
bit 7, [hl]
|
|
res 7, [hl]
|
|
jr z, .asm_46362
|
|
ld hl, Seafoam2HolesCoords
|
|
call CheckBoulderCoords
|
|
ret nc
|
|
EventFlagAddress hl, EVENT_SEAFOAM2_BOULDER1_DOWN_HOLE
|
|
ld a, [wCoordIndex]
|
|
cp $1
|
|
jr nz, .asm_46340
|
|
SetEventReuseHL EVENT_SEAFOAM2_BOULDER1_DOWN_HOLE
|
|
ld a, HS_SEAFOAM_ISLANDS_B1F_BOULDER_1
|
|
ld [wObjectToHide], a
|
|
ld a, HS_SEAFOAM_ISLANDS_B2F_BOULDER_1
|
|
ld [wObjectToShow], a
|
|
jr .asm_4634c
|
|
.asm_46340
|
|
SetEventAfterBranchReuseHL EVENT_SEAFOAM2_BOULDER2_DOWN_HOLE, EVENT_SEAFOAM2_BOULDER1_DOWN_HOLE
|
|
ld a, HS_SEAFOAM_ISLANDS_B1F_BOULDER_2
|
|
ld [wObjectToHide], a
|
|
ld a, HS_SEAFOAM_ISLANDS_B2F_BOULDER_2
|
|
ld [wObjectToShow], a
|
|
.asm_4634c
|
|
ld a, [wObjectToHide]
|
|
ld [wMissableObjectIndex], a
|
|
predef HideObject
|
|
ld a, [wObjectToShow]
|
|
ld [wMissableObjectIndex], a
|
|
predef_jump ShowObject
|
|
.asm_46362
|
|
ld a, SEAFOAM_ISLANDS_B2F
|
|
ld [wDungeonWarpDestinationMap], a
|
|
ld hl, Seafoam2HolesCoords
|
|
jp IsPlayerOnDungeonWarp
|
|
|
|
Seafoam2HolesCoords:
|
|
dbmapcoord 18, 6
|
|
dbmapcoord 23, 6
|
|
db -1 ; end
|
|
|
|
SeafoamIslandsB1F_TextPointers:
|
|
dw BoulderText
|
|
dw BoulderText
|