adding gotoxy.s

2017-02-25 21:32:06 +01:00
parent 0ec4534bd6
commit f6002a149c
2 changed files with 20 additions and 0 deletions
--- a/libsrc/telestrat/gotoxy.s
+++ b/libsrc/telestrat/gotoxy.s
@@ -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