diff options
author | dannye <33dannye@gmail.com> | 2020-05-20 19:40:33 -0500 |
---|---|---|
committer | dannye <33dannye@gmail.com> | 2020-05-20 20:02:53 -0500 |
commit | 10f9559eab8c93b94abb8ae8d1083704ad4e169a (patch) | |
tree | 7dbe7b152dde8a6e9b56664b5b8cdfc0d6be1253 /scripts/cinnabarisland.asm | |
parent | b8954732a3eaa3a784a6e3eaaa68977a9ccd9816 (diff) |
Sync with pokered
Diffstat (limited to 'scripts/cinnabarisland.asm')
-rwxr-xr-x | scripts/cinnabarisland.asm | 85 |
1 files changed, 0 insertions, 85 deletions
diff --git a/scripts/cinnabarisland.asm b/scripts/cinnabarisland.asm deleted file mode 100755 index c608f53d..00000000 --- a/scripts/cinnabarisland.asm +++ /dev/null @@ -1,85 +0,0 @@ -CinnabarIslandScript: - call EnableAutoTextBoxDrawing - ld hl, wCurrentMapScriptFlags - set 5, [hl] - ResetEvent EVENT_MANSION_SWITCH_ON - ResetEvent EVENT_LAB_STILL_REVIVING_FOSSIL - ld hl, CinnabarIslandScriptPointers - ld a, [wCinnabarIslandCurScript] - jp JumpTable - -CinnabarIslandScriptPointers: - 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 [wSpritePlayerStateData1FacingDirection], 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 - -CinnabarIslandTextPointers: - 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 "@" |