You've already forked pokecrystal-board
mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-09-08 08:13:02 -07:00
Use labels instead of constants for HRAM
Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld
This commit is contained in:
@@ -1,17 +1,17 @@
|
||||
GetEmote2bpp:
|
||||
ld a, $1
|
||||
ld [rVBK], a
|
||||
ldh [rVBK], a
|
||||
call Get2bpp
|
||||
xor a
|
||||
ld [rVBK], a
|
||||
ldh [rVBK], a
|
||||
ret
|
||||
|
||||
_ReplaceKrisSprite::
|
||||
call GetPlayerSprite
|
||||
ld a, [wUsedSprites]
|
||||
ld [hUsedSpriteIndex], a
|
||||
ldh [hUsedSpriteIndex], a
|
||||
ld a, [wUsedSprites + 1]
|
||||
ld [hUsedSpriteTile], a
|
||||
ldh [hUsedSpriteTile], a
|
||||
call GetUsedSprite
|
||||
ret
|
||||
|
||||
@@ -533,10 +533,10 @@ GetUsedSprites:
|
||||
ld a, [hli]
|
||||
and a
|
||||
jr z, .done
|
||||
ld [hUsedSpriteIndex], a
|
||||
ldh [hUsedSpriteIndex], a
|
||||
|
||||
ld a, [hli]
|
||||
ld [hUsedSpriteTile], a
|
||||
ldh [hUsedSpriteTile], a
|
||||
|
||||
bit 7, a
|
||||
jr z, .dont_set
|
||||
@@ -558,9 +558,9 @@ GetUsedSprites:
|
||||
ret
|
||||
|
||||
GetUsedSprite:
|
||||
ld a, [hUsedSpriteIndex]
|
||||
ldh a, [hUsedSpriteIndex]
|
||||
call SafeGetSprite
|
||||
ld a, [hUsedSpriteTile]
|
||||
ldh a, [hUsedSpriteTile]
|
||||
call .GetTileAddr
|
||||
push hl
|
||||
push de
|
||||
@@ -589,7 +589,7 @@ endr
|
||||
bit 6, a
|
||||
jr nz, .done
|
||||
|
||||
ld a, [hUsedSpriteIndex]
|
||||
ldh a, [hUsedSpriteIndex]
|
||||
call _DoesSpriteHaveFacings
|
||||
jr c, .done
|
||||
|
||||
@@ -618,7 +618,7 @@ endr
|
||||
ret
|
||||
|
||||
.CopyToVram:
|
||||
ld a, [rVBK]
|
||||
ldh a, [rVBK]
|
||||
push af
|
||||
ld a, [wSpriteFlags]
|
||||
bit 5, a
|
||||
@@ -627,10 +627,10 @@ endr
|
||||
ld a, $0
|
||||
|
||||
.bankswitch
|
||||
ld [rVBK], a
|
||||
ldh [rVBK], a
|
||||
call Get2bpp
|
||||
pop af
|
||||
ld [rVBK], a
|
||||
ldh [rVBK], a
|
||||
ret
|
||||
|
||||
LoadEmote::
|
||||
|
||||
Reference in New Issue
Block a user