From a43cac580ed70559b509227a11556deb6db29b5a Mon Sep 17 00:00:00 2001
From: Olli Savia <ops@iki.fi>
Date: Wed, 8 Jul 2020 21:37:39 +0300
Subject: [PATCH] Tiny optimization

---
 libsrc/vic20/tgi/vic20-hi.s | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/libsrc/vic20/tgi/vic20-hi.s b/libsrc/vic20/tgi/vic20-hi.s
index 8dfa46d6b..506de92f7 100644
--- 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