mirror of
https://github.com/cc65/cc65.git
synced 2024-12-23 04:30:10 +00:00
adding gotoxy.s
This commit is contained in:
parent
0ec4534bd6
commit
f6002a149c
@ -107,6 +107,7 @@ XWR0 = $10
|
||||
XWSTR0 = $14
|
||||
XTEXT = $19
|
||||
XHIRES = $1A
|
||||
XFILLM = $1C
|
||||
XMINMA = $1F
|
||||
XFREAD = $27 ; only in TELEMON 3.0
|
||||
XOPEN = $30 ; only in TELEMON 3.0
|
||||
@ -128,6 +129,10 @@ XINK = $93
|
||||
XEXPLO = $9C
|
||||
XPING = $9D
|
||||
|
||||
; ---------------------------------------------------------------------------
|
||||
; Page $200
|
||||
SCRX := $220
|
||||
SCRY := $224
|
||||
|
||||
; ---------------------------------------------------------------------------
|
||||
; Page $500
|
||||
|
15
libsrc/telestrat/gotoxy.s
Normal file
15
libsrc/telestrat/gotoxy.s
Normal file
@ -0,0 +1,15 @@
|
||||
.export _gotoxy
|
||||
|
||||
.import popa
|
||||
|
||||
.importzp sp,tmp2,tmp3,tmp1
|
||||
|
||||
.include "telestrat.inc"
|
||||
|
||||
|
||||
.proc _gotoxy
|
||||
sta SCRY
|
||||
jsr popa
|
||||
sta SCRX
|
||||
rts
|
||||
.endproc
|
Loading…
Reference in New Issue
Block a user