Fix cputdirect

This commit is contained in:
jede
2021-03-01 23:19:30 +01:00
parent abef6566e7
commit 185c451000

View File

@@ -4,7 +4,7 @@
; void cputc (char c); ; void cputc (char c);
; ;
.export _cputc, _cputcxy, display_conio, CHARCOLOR, OLD_CHARCOLOR, BGCOLOR, OLD_BGCOLOR .export _cputc, _cputcxy, cputdirect, display_conio, CHARCOLOR, OLD_CHARCOLOR, BGCOLOR, OLD_BGCOLOR
.import update_adscr .import update_adscr
@@ -12,6 +12,7 @@
.include "telestrat.inc" .include "telestrat.inc"
cputdirect:
_cputcxy: _cputcxy:
pha ; Save C pha ; Save C
jsr popax ; Get X and Y jsr popax ; Get X and Y
@@ -69,9 +70,8 @@ do_not_change_color:
.endproc .endproc
.proc display_conio .proc display_conio
; This routine is used to displays char on screen
ldy SCRX ldy SCRX
sta (ADSCR),y sta (ADSCR),y
iny iny