Tiny optimization

2020-07-08 21:37:39 +03:00 · 2020-07-08 21:37:39 +03:00 · a43cac580e
commit a43cac580e
parent bcb8b49907
1 changed files with 2 additions and 5 deletions
--- a/libsrc/vic20/tgi/vic20-hi.s
+++ b/libsrc/vic20/tgi/vic20-hi.s
@ -261,16 +261,15 @@ PATTERN_SOLID:
        sta     tmp2+1
        inx                     ; (ldx #$00)
        stx     ERROR           ; Set to TGI_ERR_OK
+        clc

@NEXT_ROW:
        ldy     #$00
        txa
-        clc
        adc     #$10

@NEXT_COLUMN:
        sta     (tmp2),y
-        clc
        adc     #ROWS
        iny
        cpy     #COLS
@ -282,10 +281,8 @@ PATTERN_SOLID:
        clc
        adc     #COLS
        sta     tmp2
-        bcc     @L1
-        inc     tmp2+1

-@L1:    inx
+        inx
        cpx     #ROWS
        bne     @NEXT_ROW