mirror of
https://github.com/pret/pokegold-spaceworld.git
synced 2026-09-29 14:02:22 -04:00
andwhyisit
375 lines
6.4 KiB
NASM
375 lines
6.4 KiB
NASM
include "constants.asm"
|
|
INCLUDE "hack/text/SilentHills.inc"
|
|
|
|
SECTION "maps/SilentHill.asm", ROMX
|
|
|
|
SilentHillScriptLoader:: ; 7669
|
|
ld hl, SilentHillScriptPointers1
|
|
call RunMapScript
|
|
call WriteBackMapScriptNumber
|
|
ret
|
|
|
|
SilentHillNPCIDs1: ; 7673
|
|
db 0
|
|
db 2
|
|
db 3
|
|
db $FF
|
|
|
|
SilentHillNPCIDs2: ; 7677
|
|
db 2
|
|
db 3
|
|
db $FF
|
|
|
|
SilentHillNPCIDs3: ; 767A
|
|
db 1
|
|
db 2
|
|
db 3
|
|
db $FF
|
|
|
|
SilentHillScriptPointers1: ; 767E
|
|
dw SilentHillScript1
|
|
dw SilentHillNPCIDs1
|
|
|
|
SilentHillScriptPointers2: ; 7682
|
|
dw SilentHillScript2
|
|
dw SilentHillNPCIDs1
|
|
|
|
SilentHillScriptPointers3: ; 7686
|
|
dw SilentHillScript3
|
|
dw SilentHillNPCIDs1
|
|
|
|
SilentHillScriptPointers4: ; 768A
|
|
dw SilentHillScript4
|
|
dw SilentHillNPCIDs2
|
|
|
|
SilentHillScriptPointers5: ; 768E
|
|
dw SilentHillScript5
|
|
dw SilentHillNPCIDs3
|
|
|
|
SilentHillScriptPointers6: ; 7692
|
|
dw SilentHillScript6
|
|
dw SilentHillNPCIDs2
|
|
|
|
SilentHillScriptPointers7: ; 7696
|
|
dw SilentHillScript7
|
|
dw SilentHillNPCIDs2
|
|
|
|
SilentHillScript1: ; 769A
|
|
ld a, [wYCoord]
|
|
cp 5
|
|
ret nz
|
|
ld a, [wXCoord]
|
|
cp 5
|
|
ret nz
|
|
ld hl, wJoypadFlags
|
|
set 4, [hl]
|
|
ld a, 02
|
|
call Function17f9
|
|
ld a, 02
|
|
ld hl, SilentHillMovement1
|
|
call LoadMovementDataPointer
|
|
ld hl, wc5ed
|
|
set 7, [hl]
|
|
ld a, 1
|
|
ld [wMapScriptNumber], a
|
|
ld a, 1
|
|
call WriteIntod637
|
|
ret
|
|
|
|
SilentHillMovement1: ; 76C8
|
|
db $0D
|
|
db $0D
|
|
db $0D
|
|
db $09
|
|
db $05
|
|
db $02
|
|
db $32
|
|
|
|
SilentHillScript2: ; 76CF
|
|
ld a, 0
|
|
ld d, RIGHT
|
|
call SetObjectFacing
|
|
ld hl, SilentHillTextRival1
|
|
call OpenTextbox
|
|
ld hl, SilentHillTextRival2
|
|
call OpenTextbox
|
|
ld hl, wJoypadFlags
|
|
set 4, [hl]
|
|
ld a, 2
|
|
ld hl, SilentHillMovement2
|
|
call LoadMovementDataPointer
|
|
ld hl, wc5ed
|
|
set 7, [hl]
|
|
ld a, 1
|
|
call WriteIntod637
|
|
ld a, 2
|
|
ld [wMapScriptNumber], a
|
|
ret
|
|
|
|
SilentHillMovement2: ; 76FF
|
|
db $00, $04, $08, $0C, $0C, $0C, $33
|
|
|
|
SilentHillScript3: ;7706
|
|
call Function1848
|
|
ld a, 3
|
|
ld [wMapScriptNumber], a
|
|
call InitUnknownBuffercc9e
|
|
ret
|
|
|
|
SilentHillScript4: ; 7712
|
|
ld a, [wXCoord]
|
|
cp 0
|
|
jr nz, .bigjump
|
|
ld a, [wYCoord]
|
|
cp 8
|
|
jr z, .jump
|
|
cp 09
|
|
jr nz, .bigjump
|
|
.jump
|
|
call Function776a
|
|
ld hl, SilentHillTextNorthExit
|
|
call OpenTextbox
|
|
ld hl, wJoypadFlags
|
|
set 4, [hl]
|
|
ld a, 3
|
|
call Function15ed
|
|
ld a, 3
|
|
call Function17f9
|
|
ld a, [wYCoord]
|
|
cp 9
|
|
jr z, .jump2
|
|
ld hl, SilentHillMovement3
|
|
jr .skip
|
|
.jump2
|
|
ld hl, SilentHillMovement4
|
|
.skip
|
|
ld a, 03
|
|
call LoadMovementDataPointer
|
|
ld hl, wc5ed
|
|
set 7, [hl]
|
|
ld a, 1
|
|
call WriteIntod637
|
|
ld a, 4
|
|
ld [wMapScriptNumber], a
|
|
ret
|
|
|
|
.bigjump
|
|
ld hl, SilentHillNPCIDs2
|
|
ld de, SilentHillSignPointers
|
|
call CallMapTextSubroutine
|
|
ret
|
|
|
|
Function776a: ; 776A
|
|
ld hl, wd41a
|
|
set 7, [hl]
|
|
ld a, 1
|
|
ld hl, wd29d
|
|
ld [hl], a
|
|
ret
|
|
|
|
SilentHillMovement3: ; 7776
|
|
db $0A, $0A, $0A, $09, $0A, $06, $02, $32
|
|
|
|
SilentHillMovement4: ; 777E
|
|
db $0A, $0A, $0A, $0A, $06, $02, $32
|
|
|
|
SilentHillScript5: ; 7785
|
|
ld a, 0
|
|
ld d, RIGHT
|
|
call SetObjectFacing
|
|
ld hl, SilentHillTextPokemonInGrassString
|
|
call OpenTextbox
|
|
ld hl, wJoypadFlags
|
|
set 4, [hl]
|
|
ld a, 3
|
|
call Function17f9
|
|
ld a, 0
|
|
call Function186a
|
|
ld b, 3
|
|
ld c, 0
|
|
call StartFollow
|
|
ld a, [wYCoord]
|
|
cp 9
|
|
jr z, .jump
|
|
ld hl, SilentHillMovement5
|
|
jr .skip
|
|
.jump
|
|
ld hl, SilentHillMovement6
|
|
.skip
|
|
ld a, 3
|
|
call LoadMovementDataPointer
|
|
ld hl, wc5ed
|
|
set 7, [hl]
|
|
ld a, 1
|
|
call WriteIntod637
|
|
ld a, 5
|
|
ld [wMapScriptNumber], a
|
|
ret
|
|
|
|
SilentHillMovement5: ; 77CC
|
|
db $0B, $0B, $0B, $0B, $0B, $0B, $08, $08, $08, $08, $0B, $0B, $0B, $0B, $0B, $0B, $0B, $0B, $05, $33
|
|
|
|
SilentHillMovement6: ; 77E0
|
|
db $0B, $0B, $0B, $0B, $0B, $0B, $08, $08, $08, $0B, $0B, $0B, $0B, $0B, $0B, $0B, $0B, $05, $33
|
|
|
|
SilentHillScript6: ; 77F3
|
|
ld hl, SilentHillNPCIDs2
|
|
ld de, SilentHillSignPointers
|
|
call CallMapTextSubroutine
|
|
ld hl, wd41b
|
|
bit 2, [hl]
|
|
ret z
|
|
ld a, $12
|
|
ld [wd29d], a
|
|
ld a, 6
|
|
ld [wMapScriptNumber], a
|
|
ret
|
|
|
|
SilentHillScript7: ; 780D
|
|
call CheckLabDoor
|
|
ret z
|
|
ld hl, SilentHillNPCIDs2
|
|
ld de, SilentHillSignPointers
|
|
call CallMapTextSubroutine
|
|
ret
|
|
|
|
CheckLabDoor: ; 781B
|
|
ld a, [wYCoord]
|
|
cp $C
|
|
ret nz
|
|
ld a, [wXCoord]
|
|
cp $E
|
|
jr z, .jump
|
|
ld a, [wXCoord]
|
|
cp $F
|
|
ret nz
|
|
.jump
|
|
ldh a, [hJoyState]
|
|
bit 6, a
|
|
ret z
|
|
ld a, 0
|
|
ld d, UP
|
|
call SetObjectFacing
|
|
ld hl, wJoypadFlags
|
|
set 6, [hl]
|
|
ld hl, SilentHillTextString1
|
|
call OpenTextbox
|
|
call LabClosed
|
|
call ClearAccumulator
|
|
ret
|
|
|
|
LabClosed: ; 784C
|
|
ld a, 0
|
|
ld hl, SilentHillMovement7
|
|
call LoadMovementDataPointer
|
|
ld hl, wc5ed
|
|
set 7, [hl]
|
|
ld a, 1
|
|
call WriteIntod637
|
|
ret
|
|
|
|
SilentHillTextString1: ; 785F
|
|
text_SilentHillsTextString1
|
|
|
|
SilentHillMovement7: ; 786F
|
|
db $04, $32
|
|
|
|
SilentHillSignPointers:: ; 7871
|
|
dw SilentHillPlayerHouseText
|
|
dw Function38c6
|
|
dw SilentHillSignText1
|
|
dw SilentHillLabText
|
|
dw SilentHillRivalHouseText
|
|
|
|
SilentHillLabText: ; 787B
|
|
ld hl, SilentHillTextString2
|
|
call OpenTextbox
|
|
ret
|
|
|
|
SilentHillTextString2: ; 7882
|
|
text_SilentHillsTextString2
|
|
|
|
SilentHillSignText1: ; 7894
|
|
ld hl, SilentHillTextString3
|
|
call OpenTextbox
|
|
ret
|
|
|
|
SilentHillTextString3: ; 789B
|
|
text_SilentHillsTextString3
|
|
|
|
SilentHillPlayerHouseText: ; 78B1
|
|
ld hl, SilentHillTextString4
|
|
call OpenTextbox
|
|
ret
|
|
|
|
SilentHillTextString4: ; 78B8
|
|
text_SilentHillsTextString4
|
|
|
|
SilentHillRivalHouseText: ; 78C3
|
|
ld hl, SilentHillTextString5
|
|
call OpenTextbox
|
|
ret
|
|
|
|
SilentHillTextString5: ; 78CA
|
|
text_SilentHillsTextString5
|
|
|
|
SilentHillTextPointers:: ; 78d5
|
|
dw SilentHillTextRival1 ; west
|
|
dw SilentHillTextNorthExit ; north
|
|
dw SilentHillTextBackpack ; npc1
|
|
dw SilentHillTextPokemonHate ; npc2
|
|
|
|
SilentHillTextRival1: ; 78DD
|
|
text_SilentHillsTextRival1
|
|
|
|
db $08
|
|
|
|
LoadMomNamePromptUnused: ; 796F
|
|
call LoadStandardMenuHeader
|
|
callab MomNamePrompt
|
|
call CloseWindow
|
|
call GetMemSGBLayout
|
|
call UpdateSprites
|
|
call UpdateTimePals
|
|
jp Function3036
|
|
|
|
MomNameMenuHeaderUnused: ; 7989
|
|
db MENU_BACKUP_TILES ; flags
|
|
menu_coords 00, 00, 10, 11
|
|
dw .MomNameMenuDataUnused
|
|
db 01 ; initial selection
|
|
|
|
.MomNameMenuDataUnused: ; 7991
|
|
db STATICMENU_CURSOR
|
|
db 04 ; items
|
|
text_MomNameMenuHeaderUnused
|
|
|
|
SilentHillTextRival2: ; 79AC - BYTE OFF
|
|
text_SilentHillsTextRival2
|
|
|
|
SilentHillTextNorthExit: ; 7A14
|
|
text_SilentHillsTextNorthExit
|
|
|
|
SilentHillTextPokemonInGrassString: ; 7A2A
|
|
text_SilentHillsTextPokemonInGrassString
|
|
|
|
SilentHillTextBackpack: ; 7A99
|
|
ld hl, SilentHillTextBackpackString
|
|
call OpenTextbox
|
|
ret
|
|
|
|
SilentHillTextBackpackString: ; 7AA0
|
|
text_SilentHillsTextBackpackString
|
|
|
|
SilentHillTextPokemonHate: ; 7AC0
|
|
ld hl, SilentHillTextPokemonHateString
|
|
call OpenTextbox
|
|
ret
|
|
|
|
SilentHillTextPokemonHateString: ; 7AC7
|
|
text_SilentHillsTextPokemonHateString
|
|
|
|
SilentHillPadding:
|
|
textpad_SilentHills
|
|
|
|
; 7AE4 |