pokered/engine/items/subtract_paid_money.asm

; subtracts the amount the player paid from their money
; OUTPUT: carry = 0(success) or 1(fail because there is not enough money)
SubtractAmountPaidFromMoney_::
	ld de, wPlayerMoney
	ld hl, hMoney ; total price of items
	ld c, 3 ; length of money in bytes
	call StringCmp
	ret c
	ld de, wPlayerMoney + 2
	ld hl, hMoney + 2 ; total price of items
	ld c, 3 ; length of money in bytes
	predef SubBCDPredef ; subtract total price from money
	ld a, MONEY_BOX
	ld [wTextBoxID], a
	call DisplayTextBoxID ; redraw money text box
	and a
	ret
remove two whitespaces 2020-06-06 01:50:05 +00:00			`; subtracts the amount the player paid from their money`
fix SubtractAmountPaidFromMoney comment 2020-06-04 19:32:12 +00:00			`; OUTPUT: carry = 0(success) or 1(fail because there is not enough money)`
Separate maps.asm, pics.asm, sprites.asm, and tilesets.asm from main.asm (#251) Each new file builds its own .o, along with separate main.o and home.o, which necessitates many more "exported::" labels. 2020-06-27 19:32:24 +00:00			`SubtractAmountPaidFromMoney_::`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld de, wPlayerMoney`
			`ld hl, hMoney ; total price of items`
			`ld c, 3 ; length of money in bytes`
split bank 1 into files 2016-09-18 01:17:57 +00:00			`call StringCmp`
			`ret c`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld de, wPlayerMoney + 2`
			`ld hl, hMoney + 2 ; total price of items`
			`ld c, 3 ; length of money in bytes`
split bank 1 into files 2016-09-18 01:17:57 +00:00			`predef SubBCDPredef ; subtract total price from money`
Add space between arguments in assembly instructions and remove redundant a in instructions like add a, x 2017-12-30 00:54:27 +00:00			`ld a, MONEY_BOX`
			`ld [wTextBoxID], a`
split bank 1 into files 2016-09-18 01:17:57 +00:00			`call DisplayTextBoxID ; redraw money text box`
			`and a`
			`ret`