You've already forked pokecrystal-board
mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-09-08 08:13:02 -07:00
Resolve #428: Use HIGH(X) and LOW(X) instead of X / $100 and X % $100 or X >> 8 and X & $ff
This commit is contained in:
@@ -72,16 +72,16 @@ OldDMATransfer:: ; dfd
|
||||
call DelayFrame
|
||||
; add $100 to hl and de
|
||||
ld a, l
|
||||
add $100 % $100
|
||||
add LOW($100)
|
||||
ld l, a
|
||||
ld a, h
|
||||
adc $100 / $100
|
||||
adc HIGH($100)
|
||||
ld h, a
|
||||
ld a, e
|
||||
add $100 % $100
|
||||
add LOW($100)
|
||||
ld e, a
|
||||
ld a, d
|
||||
adc $100 / $100
|
||||
adc HIGH($100)
|
||||
ld d, a
|
||||
jr .loop
|
||||
|
||||
|
||||
@@ -106,11 +106,11 @@ UpdateGameTimer:: ; 20ad
|
||||
|
||||
; Cap the timer after 1000 hours.
|
||||
ld a, h
|
||||
cp 1000 / $100
|
||||
cp HIGH(1000)
|
||||
jr c, .ok
|
||||
|
||||
ld a, l
|
||||
cp 1000 % $100
|
||||
cp LOW(1000)
|
||||
jr c, .ok
|
||||
|
||||
ld hl, GameTimeCap
|
||||
|
||||
@@ -141,9 +141,9 @@ Init:: ; 17d
|
||||
|
||||
farcall InitCGBPals
|
||||
|
||||
ld a, VBGMap1 / $100
|
||||
ld a, HIGH(VBGMap1)
|
||||
ld [hBGMapAddress + 1], a
|
||||
xor a ; VBGMap1 % $100
|
||||
xor a ; LOW(VBGMap1)
|
||||
ld [hBGMapAddress], a
|
||||
|
||||
farcall StartClock
|
||||
@@ -201,7 +201,7 @@ ClearWRAM:: ; 25a
|
||||
push af
|
||||
ld [rSVBK], a
|
||||
xor a
|
||||
ld hl, $d000
|
||||
ld hl, wRAM1Start
|
||||
ld bc, $1000
|
||||
call ByteFill
|
||||
pop af
|
||||
|
||||
@@ -23,7 +23,7 @@ LCD:: ; 552
|
||||
push bc
|
||||
ld a, [rLY]
|
||||
ld c, a
|
||||
ld b, LYOverrides >> 8
|
||||
ld b, HIGH(LYOverrides)
|
||||
ld a, [bc]
|
||||
ld b, a
|
||||
ld a, [hLCDCPointer]
|
||||
|
||||
@@ -1241,10 +1241,10 @@ ScrollMapUp:: ; 2748
|
||||
ld h, a
|
||||
ld bc, $0200
|
||||
add hl, bc
|
||||
; cap d at VBGMap1 / $100
|
||||
; cap d at HIGH(VBGMap0)
|
||||
ld a, h
|
||||
and %00000011
|
||||
or VBGMap0 / $100
|
||||
or HIGH(VBGMap0)
|
||||
ld e, l
|
||||
ld d, a
|
||||
call UpdateBGMapRow
|
||||
@@ -1369,10 +1369,10 @@ UpdateBGMapColumn:: ; 27f8
|
||||
ld e, a
|
||||
jr nc, .skip
|
||||
inc d
|
||||
; cap d at VBGMap1 / $100
|
||||
; cap d at HIGH(VBGMap0)
|
||||
ld a, d
|
||||
and $3
|
||||
or VBGMap0 / $100
|
||||
or HIGH(VBGMap0)
|
||||
ld d, a
|
||||
|
||||
.skip
|
||||
|
||||
@@ -4,9 +4,9 @@ InitMovementBuffer:: ; 1b1e
|
||||
ld [wMovementBufferCount], a
|
||||
ld a, $0 ; useless
|
||||
ld [wUnusedMovementBufferBank], a
|
||||
ld a, MovementBuffer % $100
|
||||
ld a, LOW(MovementBuffer)
|
||||
ld [wUnusedMovementBufferPointer], a
|
||||
ld a, MovementBuffer / $100
|
||||
ld a, HIGH(MovementBuffer)
|
||||
ld [wUnusedMovementBufferPointer + 1], a
|
||||
ret
|
||||
; 1b35
|
||||
|
||||
@@ -24,18 +24,18 @@ ForceUpdateCGBPals:: ; c37
|
||||
|
||||
ld a, [rSVBK]
|
||||
push af
|
||||
ld a, 5 ; BANK(BGPals)
|
||||
ld a, BANK(BGPals)
|
||||
ld [rSVBK], a
|
||||
|
||||
ld hl, BGPals ; 5:d080
|
||||
ld hl, BGPals
|
||||
|
||||
; copy 8 pals to bgpd
|
||||
ld a, %10000000 ; auto increment, index 0
|
||||
ld [rBGPI], a
|
||||
ld c, rBGPD % $100
|
||||
ld b, 4 ; NUM_PALS / 2
|
||||
ld c, LOW(rBGPD)
|
||||
ld b, 8 / 2
|
||||
.bgp
|
||||
rept 2 palettes
|
||||
rept (1 palettes) * 2
|
||||
ld a, [hli]
|
||||
ld [$ff00+c], a
|
||||
endr
|
||||
@@ -43,15 +43,15 @@ endr
|
||||
dec b
|
||||
jr nz, .bgp
|
||||
|
||||
; hl is now 5:d0c0 OBPals
|
||||
; hl is now OBPals
|
||||
|
||||
; copy 8 pals to obpd
|
||||
ld a, %10000000 ; auto increment, index 0
|
||||
ld [rOBPI], a
|
||||
ld c, rOBPD % $100
|
||||
ld b, 4 ; NUM_PALS / 2
|
||||
ld c, LOW(rOBPD)
|
||||
ld b, 8 / 2
|
||||
.obp
|
||||
rept 2 palettes
|
||||
rept (1 palettes) * 2
|
||||
ld a, [hli]
|
||||
ld [$ff00+c], a
|
||||
endr
|
||||
@@ -90,7 +90,7 @@ DmgToCgbBGPals:: ; c9f
|
||||
ld a, [rSVBK]
|
||||
push af
|
||||
|
||||
ld a, 5 ; gfx
|
||||
ld a, BANK(BGPals)
|
||||
ld [rSVBK], a
|
||||
|
||||
; copy & reorder bg pal buffer
|
||||
@@ -138,7 +138,7 @@ DmgToCgbObjPals:: ; ccb
|
||||
ld a, [rSVBK]
|
||||
push af
|
||||
|
||||
ld a, 5
|
||||
ld a, BANK(OBPals)
|
||||
ld [rSVBK], a
|
||||
|
||||
; copy & reorder obj pal buffer
|
||||
@@ -178,11 +178,11 @@ DmgToCgbObjPal0:: ; cf8
|
||||
|
||||
ld a, [rSVBK]
|
||||
push af
|
||||
ld a, 5 ; gfx
|
||||
ld a, BANK(OBPals)
|
||||
ld [rSVBK], a
|
||||
|
||||
ld hl, OBPals
|
||||
ld de, UnknOBPals
|
||||
ld hl, OBPals palette 0
|
||||
ld de, UnknOBPals palette 0
|
||||
ld a, [rOBP0]
|
||||
ld b, a
|
||||
ld c, 1
|
||||
@@ -216,11 +216,11 @@ DmgToCgbObjPal1:: ; d24
|
||||
|
||||
ld a, [rSVBK]
|
||||
push af
|
||||
ld a, 5 ; gfx
|
||||
ld a, BANK(OBPals)
|
||||
ld [rSVBK], a
|
||||
|
||||
ld hl, OBPals + 1 palettes
|
||||
ld de, UnknOBPals + 1 palettes
|
||||
ld hl, OBPals palette 1
|
||||
ld de, UnknOBPals palette 1
|
||||
ld a, [rOBP1]
|
||||
ld b, a
|
||||
ld c, 1
|
||||
@@ -325,10 +325,10 @@ Special_ReloadSpritesNoPalettes:: ; d91
|
||||
ret z
|
||||
ld a, [rSVBK]
|
||||
push af
|
||||
ld a, 5 ; BANK(BGPals)
|
||||
ld a, BANK(BGPals)
|
||||
ld [rSVBK], a
|
||||
ld hl, BGPals
|
||||
ld bc, $40 + $10
|
||||
ld bc, (8 palettes) + (2 palettes)
|
||||
xor a
|
||||
call ByteFill
|
||||
pop af
|
||||
|
||||
@@ -143,9 +143,9 @@ UpdateBGMap:: ; 164c
|
||||
ld h, a
|
||||
push hl
|
||||
|
||||
xor a
|
||||
xor a ; LOW(VBGMap1)
|
||||
ld [hBGMapAddress], a
|
||||
ld a, VBGMap1 >> 8
|
||||
ld a, HIGH(VBGMap1)
|
||||
ld [hBGMapAddress + 1], a
|
||||
|
||||
ld a, [hBGMapMode]
|
||||
|
||||
Reference in New Issue
Block a user