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:
Remy Oukaour
2017-12-25 13:40:10 -05:00
parent da2b01a36c
commit e34e68095d
71 changed files with 435 additions and 398 deletions

View File

@@ -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

View File

@@ -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

View File

@@ -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

View File

@@ -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]

View File

@@ -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

View File

@@ -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

View File

@@ -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

View File

@@ -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]