Renamed tgi_textheight -> tgi_gettextheight, tgi_textwidth -> tgi_gettextwidth

tgi_textstyle -> tgi_settextstyle and tgi_textscale -> tgi_settextscale.


git-svn-id: svn://svn.cc65.org/cc65/trunk@5090 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2011-07-17 18:36:12 +00:00
parent 83d67e930a
commit 9c55586569
8 changed files with 35 additions and 34 deletions

View File

@@ -25,35 +25,35 @@ widths := regbank+2
.proc _tgi_outtext
ldy _tgi_font ; Bit or vectorfont?
ldy _tgi_font ; Bit or vectorfont?
bne VectorFont
; Handle bitmapped font output
sta ptr3
stx ptr3+1 ; Pass s in ptr3 to driver
stx ptr3+1 ; Pass s in ptr3 to driver
pha
txa
pha ; Save s on stack for later
pha ; Save s on stack for later
jsr tgi_curtoxy ; Copy curx/cury into ptr1/ptr2
jsr tgi_outtext ; Call the driver
jsr tgi_curtoxy ; Copy curx/cury into ptr1/ptr2
jsr tgi_outtext ; Call the driver
pla
tax
pla ; Restore s
jsr _tgi_textwidth ; Get width of text string
pla ; Restore s
jsr _tgi_gettextwidth ; Get width of text string
; Move the graphics cursor by the amount in a/x
MoveCursor:
ldy _tgi_textdir ; Horizontal or vertical text?
beq @L1 ; Jump if horizontal
ldy _tgi_textdir ; Horizontal or vertical text?
beq @L1 ; Jump if horizontal
; Move graphics cursor for vertical text
jsr negax
ldy #2 ; Point to _tgi_cury
ldy #2 ; Point to _tgi_cury
; Move graphics cursor for horizontal text
@@ -125,7 +125,7 @@ VectorFont:
jsr MoveCursor ; Move the graphics cursor
; Next char in string
inc text
bne @L1
inc text+1