From 3cf945bad4fdf40c528147a8d1fd9c5565425232 Mon Sep 17 00:00:00 2001
From: Marcus Huderle <huderlem@gmail.com>
Date: Sat, 24 Jan 2015 12:41:20 -0800
Subject: Better documenting for GetMachinePrice and TechnicalMachinePrices.

---
 home.asm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'home.asm')

diff --git a/home.asm b/home.asm
index 133eb83b..3f6cbd34 100644
--- a/home.asm
+++ b/home.asm
@@ -3335,6 +3335,8 @@ GetName:: ; 376b (0:376b)
 	ret
 
 GetItemPrice:: ; 37df (0:37df)
+; Stores item's price as BCD in [H_DOWNARROWBLINKCNT1] and [[H_DOWNARROWBLINKCNT2]
+; Input: [wcf91] = item id
 	ld a, [H_LOADEDROMBANK]
 	push af
 	ld a, [wListMenuID] ; wListMenuID
@@ -3349,9 +3351,9 @@ GetItemPrice:: ; 37df (0:37df)
 	ld a, [hli]
 	ld h, [hl]
 	ld l, a
-	ld a, [wcf91]
+	ld a, [wcf91] ; a contains item id
 	cp HM_01
-	jr nc, .asm_3812
+	jr nc, .getTMPrice
 	ld bc, $3
 .asm_3802
 	add hl, bc
@@ -3365,7 +3367,7 @@ GetItemPrice:: ; 37df (0:37df)
 	ld a, [hl]
 	ld [H_DOWNARROWBLINKCNT1], a ; $ff8b
 	jr .asm_381c
-.asm_3812
+.getTMPrice
 	ld a, Bank(GetMachinePrice)
 	ld [H_LOADEDROMBANK], a
 	ld [$2000], a
-- 
cgit v1.3.1-sl0p