mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
56 lines
1.1 KiB
NASM
Executable file
56 lines
1.1 KiB
NASM
Executable file
Route16HouseScript: ; 1e5f8 (7:65f8)
|
|
jp EnableAutoTextBoxDrawing
|
|
|
|
Route16HouseTextPointers: ; 1e5fb (7:65fb)
|
|
dw Route16HouseText1
|
|
dw Route16HouseText2
|
|
|
|
Route16HouseText1: ; 1e5ff (7:65ff)
|
|
db $08 ; asm
|
|
ld a, [wd7e0]
|
|
bit 6, a
|
|
ld hl, HM02ExplanationText
|
|
jr nz, .asm_13616 ; 0x1e608
|
|
ld hl, Route16HouseText3
|
|
call PrintText
|
|
ld bc, (HM_02 << 8) | 1
|
|
call GiveItem
|
|
jr nc, .BagFull
|
|
ld hl, wd7e0
|
|
set 6, [hl]
|
|
ld hl, ReceivedHM02Text
|
|
jr .asm_13616 ; 0x1e620
|
|
.BagFull
|
|
ld hl, HM02NoRoomText
|
|
.asm_13616 ; 0x1e625
|
|
call PrintText
|
|
jp TextScriptEnd
|
|
|
|
Route16HouseText3: ; 1e62b (7:662b)
|
|
TX_FAR _Route16HouseText3
|
|
db "@"
|
|
|
|
ReceivedHM02Text: ; 1e630 (7:6630)
|
|
TX_FAR _ReceivedHM02Text
|
|
db $11, "@"
|
|
|
|
HM02ExplanationText: ; 1e636 (7:6636)
|
|
TX_FAR _HM02ExplanationText
|
|
db "@"
|
|
|
|
HM02NoRoomText: ; 1e63b (7:663b)
|
|
TX_FAR _HM02NoRoomText
|
|
db "@"
|
|
|
|
Route16HouseText2: ; 1e640 (7:6640)
|
|
db $08 ; asm
|
|
ld hl, Route16HouseText_1e652
|
|
call PrintText
|
|
ld a, FEAROW
|
|
call PlayCry
|
|
call WaitForSoundToFinish
|
|
jp TextScriptEnd
|
|
|
|
Route16HouseText_1e652: ; 1e652 (7:6652)
|
|
TX_FAR _Route16HouseText_1e652
|
|
db "@"
|