pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2024-11-16 11:27:33 -08:00
Code Issues Packages Projects Releases Wiki Activity

add in PrintNumber_AdvancePointer and Divide from pokered

Browse Source
This commit is contained in:
Bryan Bishop 2012-05-31 01:47:19 -05:00
parent 7dd189b62e
commit 7fd15ecfb4
1 changed files with 25 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
main.asm
View File

@ -311,7 +311,11 @@ Multiply: ; 0x3119
INCBIN "baserom.gbc",$3119,$3124 - $3119 INCBIN "baserom.gbc",$3119,$3124 - $3119
; 0x3124 ; 0x3124
INCBIN "baserom.gbc",$3124,$313d - $3124 Divide: ; 0x3124
INCBIN "baserom.gbc",$3124,$3136 - $3124
; 0x3136
INCBIN "baserom.gbc",$3136,$313d - $3136
PrintLetterDelay: ; 313d PrintLetterDelay: ; 313d
; This function is used to wait a short period after printing a letter to the ; This function is used to wait a short period after printing a letter to the
@ -699,7 +703,10 @@ SpecialsPointers: ; 0xc029
dbw $24,$4a88 dbw $24,$4a88
dbw $03,$4224 dbw $03,$4224
INCBIN "baserom.gbc",$c224,$c644 - $c224 INCBIN "baserom.gbc",$c224,$c5d2 - $c224
PrintNumber_PrintDigit: ; c5d2
INCBIN "baserom.gbc",$c5d2,$c644 - $c5d2
PrintNumber_PrintLeadingZero: ; c644 PrintNumber_PrintLeadingZero: ; c644
; prints a leading zero unless they are turned off in the flags ; prints a leading zero unless they are turned off in the flags
@ -708,7 +715,22 @@ PrintNumber_PrintLeadingZero: ; c644
ld [hl], "0" ld [hl], "0"
ret ret
INCBIN "baserom.gbc",$c64a,$ffff - $c64a PrintNumber_AdvancePointer: ; c64a
; increments the pointer unless leading zeroes are not being printed,
; the number is left-aligned, and no nonzero digits have been printed yet
bit 7, d ; print leading zeroes?
jr nz, .incrementPointer\@
bit 6, d ; left alignment or right alignment?
jr z, .incrementPointer\@
ld a, [$ffb3] ; was H_PASTLEADINGZEROES
and a
ret z
.incrementPointer\@
inc hl
ret
; 0xc658
INCBIN "baserom.gbc",$c658,$ffff - $c658
SECTION "bank4",DATA,BANK[$4] SECTION "bank4",DATA,BANK[$4]