]> git.sur5r.net Git - cc65/commitdiff
Correcting comments 503/head
authorjede <jede@oric.org>
Sun, 8 Oct 2017 16:14:26 +0000 (18:14 +0200)
committerjede <jede@oric.org>
Sun, 8 Oct 2017 16:14:26 +0000 (18:14 +0200)
libsrc/telestrat/cgetc.s

index 9bdbf4818fad07d77a5ec6f2ddb187a516954c5b..2b0fc7758ef9a834b4d2136c442f0c7e3f2e0714 100644 (file)
@@ -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