Merge branch 'master' into master

2017-10-22 23:11:18 +02:00
parent 93f202850a 4da1d3232f
commit af1c7f0c8b
267 changed files with 9426 additions and 5145 deletions
--- a/libsrc/telestrat/gotoxy.s
+++ b/libsrc/telestrat/gotoxy.s
@@ -1,19 +1,26 @@
 ;
-; jede jede@oric.org 2017-02-25
+; 2017-02-25, jede <jede@oric.org>
+; 2017-06-15, Greg King
+;
+; void gotoxy (unsigned char x, unsigned char y);
 ;
-    .export    _gotoxy
-	
-    .import    popa
-	
-    .importzp  sp

-    .include   "telestrat.inc"
+        .export         gotoxy, _gotoxy
+
+        .import         popa
+        .importzp       sp
+
+        .include        "telestrat.inc"
+
+gotoxy: jsr     popa            ; Get Y

 .proc _gotoxy
-   ; This function move only cursor for display, it does not move the prompt position
-   ; in telemon, there is position for prompt, and another for the cursor
-   sta    SCRY
-   jsr    popa
-   sta    SCRX
-   rts
-.endproc	
+
+; This function moves only the display cursor; it does not move the prompt position.
+; In telemon, there is a position for the prompt, and another for the cursor.
+
+        sta     SCRY
+        jsr     popa
+        sta     SCRX
+        rts
+.endproc