6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-06-07 07:29:33 +00:00
Code Issues Projects Releases Wiki Activity

Fix width calculation for bitmap font output. Use new 8x16 multiplication

Browse Source 
routines to save some cycles.


git-svn-id: svn://svn.cc65.org/cc65/trunk@5080 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz 2011-07-10 14:59:29 +00:00
parent 655ffe5dcd
commit ca9d802d1e
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
libsrc/tgi/tgi_textwidth.s
View File

@ -8,7 +8,7 @@
.include "zeropage.inc"
.import _strlen, _toascii
.import umul16x16r32
.import umul8x16r16
;-----------------------------------------------------------------------------
; Aliases for zero page locations
@ -36,12 +36,13 @@ Text := ptr3
; Return the width of the string for the bitmap font
jsr _strlen
ldy _tgi_charwidth
sta ptr1
stx ptr1+1
lda _tgi_charwidth
ldx #0
jmp umul16x16r32
jsr _strlen
jsr umul8x16r16
ldy _tgi_textscalew+2 ; Get rounded scale factor
sta ptr1
jmp umul8x16r16
; Return the width of the string for the vector font. To save some code, we
; will add up all the character widths and then multiply by the scale factor.
@ -77,7 +78,7 @@ Text := ptr3
tay
lda (WTab),y ; Get width of this char
clc
adc Width
adc Width
sta Width
bcc @L3
inc Width+1