adding gotoxy.s
This commit is contained in:
parent
0ec4534bd6
commit
f6002a149c
2 changed files with 20 additions and 0 deletions
|
@ -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…
Add table
Reference in a new issue