mirror of
https://github.com/pret/pokered.git
synced 2024-10-24 23:37:09 +00:00
96 lines
1.8 KiB
NASM
96 lines
1.8 KiB
NASM
|
ViridianMartScript: ; 1d46e (7:546e)
|
||
|
call ViridianMartScript_1d47d
|
||
|
call EnableAutoTextBoxDrawing
|
||
|
ld hl, ViridianMartScriptPointers
|
||
|
ld a, [W_VIRIDIANMARKETCURSCRIPT]
|
||
|
jp CallFunctionInTable
|
||
|
|
||
|
ViridianMartScript_1d47d: ; 1d47d (7:547d)
|
||
|
ld a, [$d74e]
|
||
|
bit 0, a
|
||
|
jr nz, .asm_1d489 ; 0x1d482 $5
|
||
|
ld hl, ViridianMartTextPointers ; $54e0
|
||
|
jr .asm_1d48c ; 0x1d487 $3
|
||
|
.asm_1d489
|
||
|
ld hl, ViridianMartTextPointers + $a ; $54ea ; starts at ViridianMartText6
|
||
|
.asm_1d48c
|
||
|
ld a, l
|
||
|
ld [W_MAPTEXTPTR], a
|
||
|
ld a, h
|
||
|
ld [W_MAPTEXTPTR+1], a
|
||
|
ret
|
||
|
|
||
|
ViridianMartScriptPointers: ; 1d495 (7:5495)
|
||
|
dw ViridianMartScript0
|
||
|
dw ViridianMartScript1
|
||
|
dw ViridianMartScript2
|
||
|
|
||
|
ViridianMartScript0: ; 1d49b (7:549b)
|
||
|
call UpdateSprites
|
||
|
ld a, $4
|
||
|
ld [$ff8c], a
|
||
|
call DisplayTextID
|
||
|
ld hl, $ccd3
|
||
|
ld de, RLEMovement1d4bb
|
||
|
call DecodeRLEList
|
||
|
dec a
|
||
|
ld [$cd38], a
|
||
|
call Func_3486
|
||
|
ld a, $1
|
||
|
ld [W_VIRIDIANMARKETCURSCRIPT], a
|
||
|
ret
|
||
|
|
||
|
RLEMovement1d4bb: ; 1d4bb (7:54bb)
|
||
|
db $20, $01
|
||
|
db $40, $02
|
||
|
db $ff
|
||
|
|
||
|
ViridianMartScript1: ; 1d4c0 (7:54c0)
|
||
|
ld a, [$cd38]
|
||
|
and a
|
||
|
ret nz
|
||
|
call Delay3
|
||
|
ld a, $5
|
||
|
ld [$ff8c], a
|
||
|
call DisplayTextID
|
||
|
ld bc, (OAKS_PARCEL << 8) + 1
|
||
|
call GiveItem
|
||
|
ld hl, $d74e
|
||
|
set 1, [hl]
|
||
|
ld a, $2
|
||
|
ld [W_VIRIDIANMARKETCURSCRIPT], a
|
||
|
; fallthrough
|
||
|
ViridianMartScript2: ; 1d4df (7:54df)
|
||
|
ret
|
||
|
|
||
|
ViridianMartTextPointers: ; 1d4e0 (7:54e0)
|
||
|
dw ViridianMartText1
|
||
|
dw ViridianMartText2
|
||
|
dw ViridianMartText3
|
||
|
dw ViridianMartText4
|
||
|
dw ViridianMartText5
|
||
|
dw ViridianMartText6
|
||
|
dw ViridianMartText2
|
||
|
dw ViridianMartText3
|
||
|
|
||
|
ViridianMartText1: ; 1d4f0 (7:54f0)
|
||
|
TX_FAR _ViridianMartText1
|
||
|
db "@"
|
||
|
|
||
|
ViridianMartText4: ; 1d4f5 (7:54f5)
|
||
|
TX_FAR _ViridianMartText4
|
||
|
db "@"
|
||
|
|
||
|
ViridianMartText5: ; 1d4fa (7:54fa)
|
||
|
TX_FAR ViridianMartParcelQuestText
|
||
|
db $11
|
||
|
db "@"
|
||
|
|
||
|
ViridianMartText2: ; 1d500 (7:5500)
|
||
|
TX_FAR _ViridianMartText2
|
||
|
db "@"
|
||
|
|
||
|
ViridianMartText3: ; 1d505 (7:5505)
|
||
|
TX_FAR _ViridianMartText3
|
||
|
db "@"
|