Fix some comments and inmediates

This commit is contained in:
mid-kid 2020-02-21 15:56:47 +01:00
parent 345b585a78
commit 2a8c969bc7
2 changed files with 9 additions and 9 deletions

View File

@ -1821,10 +1821,10 @@ SubtractHP:
GetSixteenthMaxHP: GetSixteenthMaxHP:
call GetQuarterMaxHP call GetQuarterMaxHP
; quarter result ; quarter result
srl c srl c
srl c srl c
; round up ; at least 1
ld a, c ld a, c
and a and a
jr nz, .ok jr nz, .ok
@ -1838,7 +1838,7 @@ GetEighthMaxHP:
; assumes nothing can have 1024 or more hp ; assumes nothing can have 1024 or more hp
; halve result ; halve result
srl c srl c
; round up ; at least 1
ld a, c ld a, c
and a and a
jr nz, .end jr nz, .end
@ -1857,7 +1857,7 @@ GetQuarterMaxHP:
rr c rr c
; assumes nothing can have 1024 or more hp ; assumes nothing can have 1024 or more hp
; round up ; at least 1
ld a, c ld a, c
and a and a
jr nz, .end jr nz, .end
@ -1873,7 +1873,7 @@ GetHalfMaxHP:
srl b srl b
rr c rr c
; floor = 1 ; at least 1
ld a, c ld a, c
or b or b
jr nz, .end jr nz, .end

View File

@ -146,7 +146,7 @@ PrintPCBox:
ld hl, hVBlank ld hl, hVBlank
ld a, [hl] ld a, [hl]
push af push af
ld [hl], 4 ld [hl], $4
xor a xor a
ldh [hBGMapMode], a ldh [hBGMapMode], a
@ -295,7 +295,7 @@ PrintMail:
ld hl, hVBlank ld hl, hVBlank
ld a, [hl] ld a, [hl]
push af push af
ld [hl], %0100 ld [hl], $4
ld a, 18 / 2 ld a, 18 / 2
ld [wPrinterQueueLength], a ld [wPrinterQueueLength], a
@ -338,7 +338,7 @@ PrintPartymon:
ld hl, hVBlank ld hl, hVBlank
ld a, [hl] ld a, [hl]
push af push af
ld [hl], %0100 ld [hl], $4
ld a, 16 / 2 ld a, 16 / 2
ld [wPrinterQueueLength], a ld [wPrinterQueueLength], a
@ -396,7 +396,7 @@ _PrintDiploma:
ld hl, hVBlank ld hl, hVBlank
ld a, [hl] ld a, [hl]
push af push af
ld [hl], %0100 ld [hl], $4
ln a, 1, 0 ; to be loaded to wPrinterMargins ln a, 1, 0 ; to be loaded to wPrinterMargins
call Printer_PrepareTilemapForPrint call Printer_PrepareTilemapForPrint