X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fvic20%2Fcgetc.s;h=d5af9a9f602637bea22cb98993dab47f64f1e743;hb=d52d986acaa9de1cadf357c010419eaddc302810;hp=05f2f68dc0d9c916432f18cca4100984a7c97846;hpb=e77ac8a230279ad29081fe50b5602ccfba17f203;p=cc65 diff --git a/libsrc/vic20/cgetc.s b/libsrc/vic20/cgetc.s index 05f2f68dc..d5af9a9f6 100644 --- a/libsrc/vic20/cgetc.s +++ b/libsrc/vic20/cgetc.s @@ -40,8 +40,7 @@ L3: jsr KBDREAD ; Read char and return in A bne seton ; Go set it on lda CURS_FLAG ; Is the cursor currently off? bne crs9 ; Jump if yes - inx ; X is now 1 - stx CURS_FLAG ; Mark it as off + inc CURS_FLAG ; Mark it as off lda CURS_STATE ; Cursor currently displayed? beq crs8 ; Jump if no ldy CURS_X ; Get the character column