mirror of
https://github.com/thornAvery/kep-hack.git
synced 2026-02-07 16:15:23 +13:00
Rename map files, labels, and constants to be consistent and work with Polished Map
This commit is contained in:
parent
90430e6dee
commit
c779602459
1398 changed files with 6631 additions and 6166 deletions
85
scripts/CinnabarIsland.asm
Executable file
85
scripts/CinnabarIsland.asm
Executable file
|
|
@ -0,0 +1,85 @@
|
|||
CinnabarIsland_Script:
|
||||
call EnableAutoTextBoxDrawing
|
||||
ld hl, wCurrentMapScriptFlags
|
||||
set 5, [hl]
|
||||
ResetEvent EVENT_MANSION_SWITCH_ON
|
||||
ResetEvent EVENT_LAB_STILL_REVIVING_FOSSIL
|
||||
ld hl, CinnabarIsland_ScriptPointers
|
||||
ld a, [wCinnabarIslandCurScript]
|
||||
jp CallFunctionInTable
|
||||
|
||||
CinnabarIsland_ScriptPointers:
|
||||
dw CinnabarIslandScript0
|
||||
dw CinnabarIslandScript1
|
||||
|
||||
CinnabarIslandScript0:
|
||||
ld b, SECRET_KEY
|
||||
call IsItemInBag
|
||||
ret nz
|
||||
ld a, [wYCoord]
|
||||
cp $4
|
||||
ret nz
|
||||
ld a, [wXCoord]
|
||||
cp $12
|
||||
ret nz
|
||||
ld a, PLAYER_DIR_UP
|
||||
ld [wPlayerMovingDirection], a
|
||||
ld a, $8
|
||||
ld [hSpriteIndexOrTextID], a
|
||||
call DisplayTextID
|
||||
xor a
|
||||
ld [hJoyHeld], a
|
||||
ld a, $1
|
||||
ld [wSimulatedJoypadStatesIndex], a
|
||||
ld a, D_DOWN
|
||||
ld [wSimulatedJoypadStatesEnd], a
|
||||
call StartSimulatingJoypadStates
|
||||
xor a
|
||||
ld [wSpriteStateData1 + 9], a
|
||||
ld [wJoyIgnore], a
|
||||
ld a, $1
|
||||
ld [wCinnabarIslandCurScript], a
|
||||
ret
|
||||
|
||||
CinnabarIslandScript1:
|
||||
ld a, [wSimulatedJoypadStatesIndex]
|
||||
and a
|
||||
ret nz
|
||||
call Delay3
|
||||
ld a, $0
|
||||
ld [wCinnabarIslandCurScript], a
|
||||
ret
|
||||
|
||||
CinnabarIsland_TextPointers:
|
||||
dw CinnabarIslandText1
|
||||
dw CinnabarIslandText2
|
||||
dw CinnabarIslandText3
|
||||
dw MartSignText
|
||||
dw PokeCenterSignText
|
||||
dw CinnabarIslandText6
|
||||
dw CinnabarIslandText7
|
||||
dw CinnabarIslandText8
|
||||
|
||||
CinnabarIslandText8:
|
||||
TX_FAR _CinnabarIslandText8
|
||||
db "@"
|
||||
|
||||
CinnabarIslandText1:
|
||||
TX_FAR _CinnabarIslandText1
|
||||
db "@"
|
||||
|
||||
CinnabarIslandText2:
|
||||
TX_FAR _CinnabarIslandText2
|
||||
db "@"
|
||||
|
||||
CinnabarIslandText3:
|
||||
TX_FAR _CinnabarIslandText3
|
||||
db "@"
|
||||
|
||||
CinnabarIslandText6:
|
||||
TX_FAR _CinnabarIslandText6
|
||||
db "@"
|
||||
|
||||
CinnabarIslandText7:
|
||||
TX_FAR _CinnabarIslandText7
|
||||
db "@"
|
||||
Loading…
Add table
Add a link
Reference in a new issue