Start of TGI changes. Untested, may not work.
git-svn-id: svn://svn.cc65.org/cc65/trunk@4404 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -8,6 +8,7 @@
|
||||
.include "tgi-kernel.inc"
|
||||
.include "tgi-error.inc"
|
||||
|
||||
.import pushax
|
||||
.importzp ptr1
|
||||
|
||||
.proc _tgi_init
|
||||
@@ -45,13 +46,11 @@
|
||||
|
||||
; Set the text style
|
||||
|
||||
lda #TGI_TEXT_HORIZONTAL
|
||||
sta _tgi_textdir
|
||||
ldx #1
|
||||
stx _tgi_textmagx
|
||||
ldy #1
|
||||
sty _tgi_textmagy
|
||||
jsr tgi_textstyle ; Tell the driver about the text style
|
||||
lda #<$100
|
||||
ldx #>$100
|
||||
jsr pushax ; Width scale
|
||||
jsr pushax ; Heigh scale
|
||||
jsr _tgi_textstyle ; A = Direction = TEXT_VERTICAL
|
||||
|
||||
; Clear the screen
|
||||
|
||||
|
||||
Reference in New Issue
Block a user