mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
40c17c906b
For unknown addresses, use "w<address>". Label overleads are still an issue.
23 lines
352 B
NASM
Executable file
23 lines
352 B
NASM
Executable file
GetMachinePrice: ; 7bf86 (1e:7f86)
|
|
ld a, [wcf91]
|
|
sub TM_01
|
|
ret c
|
|
ld d, a
|
|
ld hl, TechnicalMachinePrices ; $7fa7
|
|
srl a
|
|
ld c, a
|
|
ld b, 0
|
|
add hl, bc
|
|
ld a, [hl]
|
|
srl d
|
|
jr nc, .asm_7bf9d
|
|
swap a
|
|
.asm_7bf9d
|
|
and $f0
|
|
ld [H_DOWNARROWBLINKCNT2], a ; $ff8c
|
|
xor a
|
|
ld [H_DOWNARROWBLINKCNT1], a ; $ff8b
|
|
ld [$ff8d], a
|
|
ret
|
|
|
|
INCLUDE "data/tm_prices.asm"
|