From a01c8c238c44195f3e13226c9d3ca9efd10d7fc6 Mon Sep 17 00:00:00 2001 From: jede Date: Sun, 8 Oct 2017 18:14:26 +0200 Subject: [PATCH] Correcting comments --- libsrc/telestrat/cgetc.s | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/libsrc/telestrat/cgetc.s b/libsrc/telestrat/cgetc.s index 9bdbf4818..2b0fc7758 100644 --- a/libsrc/telestrat/cgetc.s +++ b/libsrc/telestrat/cgetc.s @@ -4,25 +4,25 @@ .export _cgetc .import cursor - .include "telestrat.inc" .proc _cgetc - ; this routine could be quicker if we wrote in page 2 variables, but it's better to use telemon routine in that case, because telemon can manage 4 I/O - lda cursor ; if cursor equal to 0, then switch off cursor + ; this routine could be quicker if we wrote in page 2 variables, + ; but it's better to use telemon routine in that case, because telemon can manage 4 I/O + lda cursor ; if cursor equal to 0, then switch off cursor beq switchoff_cursor ldx #$00 ; x is the first screen BRK_TELEMON(XCSSCR) ; display cursor - jmp loop ; could be replaced by a bne/beq but 'jmp' is cleaner than a bne/beq which could expect some + jmp loop ; could be replaced by a bne/beq but 'jmp' is cleaner than a bne/beq which could expect some matters switchoff_cursor: ldx #$00 ; x is the first screen BRK_TELEMON(XCOSCR) ; switch off cursor loop: - BRK_TELEMON XRD0 + BRK_TELEMON XRD0 ; waits until key is pressed bcs loop rts .endproc