6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-06-15 02:29:32 +00:00
Code Issues Projects Releases Wiki Activity

Added a missing label to some conio cursor movement functions.

Browse Source 
It had prevented other functions, e.g. cputs(), from being linked into a program.
This commit is contained in:
Greg King 2017-06-15 16:44:46 -04:00
parent f44406c46f
commit 30f941ba39
4 changed files with 35 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
libsrc/atmos/gotoxy.s
View File

@ -1,14 +1,18 @@
; ;
; Ullrich von Bassewitz, 2003-04-13 ; 2003-04-13, Ullrich von Bassewitz
; 2017-06-15, Greg King
; ;
; void gotoxy (unsigned char x, unsigned char y); ; void gotoxy (unsigned char x, unsigned char y);
; ;
.export _gotoxy .export gotoxy, _gotoxy
.import popa .import popa
.include "atmos.inc" .include "atmos.inc"
gotoxy: jsr popa ; Get Y
.proc _gotoxy .proc _gotoxy
sta CURS_Y ; Set Y sta CURS_Y ; Set Y
@ -17,5 +21,3 @@
rts rts
.endproc .endproc

8
libsrc/creativision/gotoxy.s
View File

@ -1,15 +1,19 @@
; ;
; Ullrich von Bassewitz, 06.08.1998 ; 1998-08-06, Ullrich von Bassewitz
; 2017-06-15, Greg King
; ;
; void gotoxy (unsigned char x, unsigned char y); ; void gotoxy (unsigned char x, unsigned char y);
; ;
.export _gotoxy .export gotoxy, _gotoxy
.import setcursor .import setcursor
.import popa .import popa
.include "creativision.inc" .include "creativision.inc"
gotoxy: jsr popa ; Get Y
.proc _gotoxy .proc _gotoxy
sta CURSOR_Y ; Set Y sta CURSOR_Y ; Set Y

6
libsrc/gamate/gotoxy.s
View File

@ -9,7 +9,7 @@
.include "extzp.inc" .include "extzp.inc"
gotoxy: gotoxy:
jsr popa ; Get X jsr popa ; Get Y
_gotoxy: _gotoxy:
sta CURS_Y ; Set Y sta CURS_Y ; Set Y
@ -20,6 +20,4 @@ _gotoxy:
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
; force the init constructor to be imported ; force the init constructor to be imported
.import initconio .forceimport initconio
conio_init = initconio

35
libsrc/telestrat/gotoxy.s
View File

@ -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 .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 ; This function moves only the display cursor; it does not move the prompt position.
sta SCRY ; In telemon, there is a position for the prompt, and another for the cursor.
jsr popa
sta SCRX sta SCRY
rts jsr popa
.endproc sta SCRX
rts
.endproc