thorn/kep-hack
1
0
Fork 0
mirror of https://github.com/thornAvery/kep-hack.git synced 2025-11-12 08:15:00 +13:00
Code Issues Actions Packages Projects Releases Wiki Activity

machine prices

Browse source
This commit is contained in:
yenatch 2013-07-05 01:41:18 -04:00
parent e2e11de410
commit c07a745e36
1 changed files with 18 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
main.asm
View file

@ -7338,7 +7338,7 @@ DisplayListMenuIDLoop: ; 2c53 (0:2c53)
and a ; is it a PC pokemon list? and a ; is it a PC pokemon list?
jr z,.pokemonList jr z,.pokemonList
push hl push hl
call Func_37df call GetItemPrice
pop hl pop hl
ld a,[W_LISTMENUID] ld a,[W_LISTMENUID]
cp a,ITEMLISTMENU cp a,ITEMLISTMENU
@ -7634,7 +7634,7 @@ PrintListMenuEntries: ; 2e5a (0:2e5a)
ld a,[de] ld a,[de]
ld de,ItemPrices ld de,ItemPrices
ld [$cf91],a ld [$cf91],a
call Func_37df ; get price call GetItemPrice ; get price
pop hl pop hl
ld bc,20 + 5 ; 1 row down and 5 columns right ld bc,20 + 5 ; 1 row down and 5 columns right
add hl,bc add hl,bc
@ -9246,7 +9246,7 @@ GetName: ; 376b (0:376b)
ret ret
; known jump sources: 2cdc (0:2cdc), 2ee0 (0:2ee0) ; known jump sources: 2cdc (0:2cdc), 2ee0 (0:2ee0)
Func_37df: ; 37df (0:37df) GetItemPrice: ; 37df (0:37df)
ld a, [H_LOADEDROMBANK] ld a, [H_LOADEDROMBANK]
push af push af
ld a, [W_LISTMENUID] ; $cf94 ld a, [W_LISTMENUID] ; $cf94
@ -9262,7 +9262,7 @@ Func_37df: ; 37df (0:37df)
ld h, [hl] ld h, [hl]
ld l, a ld l, a
ld a, [$cf91] ld a, [$cf91]
cp $c4 cp HM_01
jr nc, .asm_3812 jr nc, .asm_3812
ld bc, $3 ld bc, $3
.asm_3802 .asm_3802
@ -9281,7 +9281,7 @@ Func_37df: ; 37df (0:37df)
ld a, $1e ld a, $1e
ld [H_LOADEDROMBANK], a ld [H_LOADEDROMBANK], a
ld [$2000], a ld [$2000], a
call Func_7bf86 call GetMachinePrice
.asm_381c .asm_381c
ld de, H_DOWNARROWBLINKCNT1 ; $ff8b ld de, H_DOWNARROWBLINKCNT1 ; $ff8b
pop af pop af
@ -111173,15 +111173,15 @@ Func_7bf64: ; 7bf64 (1e:7f64)
jp Delay3 jp Delay3
; known jump sources: 3819 (0:3819) ; known jump sources: 3819 (0:3819)
Func_7bf86: ; 7bf86 (1e:7f86) GetMachinePrice: ; 7bf86 (1e:7f86)
ld a, [$cf91] ld a, [$cf91]
sub $c9 sub TM_01
ret c ret c
ld d, a ld d, a
ld hl, Unknown_7bfa7 ; $7fa7 ld hl, TechnicalMachinePrices ; $7fa7
srl a srl a
ld c, a ld c, a
ld b, $0 ld b, 0
add hl, bc add hl, bc
ld a, [hl] ld a, [hl]
srl d srl d
@ -111195,8 +111195,15 @@ Func_7bf86: ; 7bf86 (1e:7f86)
ld [$FF00+$8d], a ld [$FF00+$8d], a
ret ret
Unknown_7bfa7: ; 7bfa7 (1e:7fa7) TechnicalMachinePrices: ; 7bfa7 (1e:7fa7)
INCBIN "baserom.gbc",$7bfa7,$7c000 - $7bfa7 ; In thousands (nybbles).
db $32, $21, $34, $24, $34
db $21, $45, $55, $32, $32
db $55, $52, $54, $52, $41
db $21, $12, $42, $25, $24
db $22, $52, $24, $34, $42
; 7bfc0
SECTION "bank1F",DATA,BANK[$1F] SECTION "bank1F",DATA,BANK[$1F]