You've already forked pokecrystal-board
mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-09-08 08:13:02 -07:00
Factor out GetHPPals and SetHPPals from home.asm
The remaining code in home.asm is almost all "generic", unrelated to Pokémon-specific game logic, so leaving it as-is might be neater than little home/*.asm files for each routine.
This commit is contained in:
19
home/hp_pals.asm
Normal file
19
home/hp_pals.asm
Normal file
@@ -0,0 +1,19 @@
|
||||
SetHPPal:: ; 334e
|
||||
; Set palette for hp bar pixel length e at hl.
|
||||
call GetHPPal
|
||||
ld [hl], d
|
||||
ret
|
||||
; 3353
|
||||
|
||||
GetHPPal:: ; 3353
|
||||
; Get palette for hp bar pixel length e in d.
|
||||
ld d, HP_GREEN
|
||||
ld a, e
|
||||
cp (50 * 48 / 100)
|
||||
ret nc
|
||||
inc d ; HP_YELLOW
|
||||
cp (21 * 48 / 100)
|
||||
ret nc
|
||||
inc d ; HP_RED
|
||||
ret
|
||||
; 335f
|
||||
Reference in New Issue
Block a user