pokered/engine/battle/4.asm

Func_128d8: ; 128d8 (4:68d8)
	ld a, [W_YCOORD] ; wd361
	ld b, a
	ld a, [W_CURMAPHEIGHT] ; wd368
	call Func_128ea
	ret z
	ld a, [W_XCOORD] ; wd362
	ld b, a
	ld a, [W_CURMAPWIDTH] ; wd369

Func_128ea: ; 128ea (4:68ea)
	add a
	cp b
	ret z
	inc b
	ret

DrawHP: ; 128ef (4:68ef)
	call GetPredefRegisters
	ld a, $1
	jr asm_128fb

Func_128f6: ; 128f6 (4:68f6)
	call GetPredefRegisters
	ld a, $2
asm_128fb: ; 128fb (4:68fb)
	ld [wListMenuID], a ; wListMenuID
	push hl
	ld a, [wcf99]
	ld b, a
	ld a, [wcf9a]
	ld c, a
	or b
	jr nz, .asm_12913
	xor a
	ld c, a
	ld e, a
	ld a, $6
	ld d, a
	jp Func_12924
.asm_12913
	ld a, [wcfba]
	ld d, a
	ld a, [wcfbb]
	ld e, a
	predef HPBarLength
	ld a, $6
	ld d, a
	ld c, a

Func_12924: ; 12924 (4:6924)
	pop hl
	push de
	push hl
	push hl
	call DrawHPBar
	pop hl
	ld a, [$fff6]
	bit 0, a
	jr z, .asm_12937
	ld bc, $9
	jr .asm_1293a
.asm_12937
	ld bc, $15
.asm_1293a
	add hl, bc
	ld de, wcf99
	ld bc, $203
	call PrintNumber
	ld a, "/"
	ld [hli], a
	ld de, wcfba
	ld bc, $203
	call PrintNumber
	pop hl
	pop de
	ret
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`Func_128d8: ; 128d8 (4:68d8)`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [W_YCOORD] ; wd361`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld b, a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [W_CURMAPHEIGHT] ; wd368`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call Func_128ea`
			`ret z`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [W_XCOORD] ; wd362`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld b, a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [W_CURMAPWIDTH] ; wd369`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00
			`Func_128ea: ; 128ea (4:68ea)`
			`add a`
			`cp b`
			`ret z`
			`inc b`
			`ret`

Use macros to define predefs. 2014-06-16 20:25:46 +00:00			`DrawHP: ; 128ef (4:68ef)`
Comment some bank 0 functions, and add wram labels for Predef. 2014-05-23 22:11:09 +00:00			`call GetPredefRegisters`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, $1`
			`jr asm_128fb`

			`Func_128f6: ; 128f6 (4:68f6)`
Comment some bank 0 functions, and add wram labels for Predef. 2014-05-23 22:11:09 +00:00			`call GetPredefRegisters`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, $2`
			`asm_128fb: ; 128fb (4:68fb)`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld [wListMenuID], a ; wListMenuID`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`push hl`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [wcf99]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld b, a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [wcf9a]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld c, a`
			`or b`
			`jr nz, .asm_12913`
			`xor a`
			`ld c, a`
			`ld e, a`
			`ld a, $6`
			`ld d, a`
			`jp Func_12924`
			`.asm_12913`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [wcfba]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld d, a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [wcfbb]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld e, a`
Use macros for predef calls/jumps instead of static ids. 2014-06-16 20:57:26 +00:00			`predef HPBarLength`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, $6`
			`ld d, a`
			`ld c, a`

			`Func_12924: ; 12924 (4:6924)`
			`pop hl`
			`push de`
			`push hl`
			`push hl`
			`call DrawHPBar`
			`pop hl`
			`ld a, [$fff6]`
			`bit 0, a`
			`jr z, .asm_12937`
			`ld bc, $9`
			`jr .asm_1293a`
			`.asm_12937`
			`ld bc, $15`
			`.asm_1293a`
			`add hl, bc`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld de, wcf99`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld bc, $203`
			`call PrintNumber`
			`ld a, "/"`
			`ld [hli], a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld de, wcfba`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld bc, $203`
			`call PrintNumber`
			`pop hl`
			`pop de`
			`ret`