From 7a2e60dc5ef0e2ceb6f3ddf7baddded24d3d9016 Mon Sep 17 00:00:00 2001
From: Michaelangel007 <michaelangel007@sharedcraft.com>
Date: Mon, 17 Jul 2017 02:17:24 -0700
Subject: [PATCH] Size now 696 bytes

---
 README.md   |   2 +-
 linuxlogo.s |  25 +++++++++++--------------
 ll_6502.dsk | Bin 143360 -> 143360 bytes
 3 files changed, 12 insertions(+), 15 deletions(-)

diff --git a/README.md b/README.md
index 414d5d3..b5e68ff 100644
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 Linux Logo in 6502 assembly language.
 
-Size: 701 ($2BD) bytes
+Size: 696 ($2B8) bytes
 
 Features:
 
diff --git a/linuxlogo.s b/linuxlogo.s
index 2291d75..658d5b6 100644
--- a/linuxlogo.s
+++ b/linuxlogo.s
@@ -34,7 +34,7 @@ MACHINEID2  = $FBC0
 MACHINEID3  = $FBBF ; //c version
 
 ; Config
-UnpackAddr  = $200 ; $28 bytes at Keyboard buffer
+UnpackAddr  = $3FD0 ; Y=191, $28 bytes at Keyboard buffer
 CONFIG_PROBE_CPUINFO = 1
 CONFIG_PRINT_CPUINFO = 1
 
@@ -156,11 +156,9 @@ Unpack
         jsr AS_HGR ; *** DEBUG ***
     FIN
 
-        lda #8          ; $0428 (Text) + $1C00 => $2028 (HGR)
+        lda #7          ; will INC, $0428 (Text) + $1C00 => $2028 (HGR)
         sta zCursorY    ; Start Row=8
 DrawRow
-        jsr GetDestAddr
-
         lda #0
         tay   
         tax                 ; DstOffset within page
@@ -290,6 +288,8 @@ NoShiftSherlock
 ; Copy Buffer to HGR
 
         sty zSaveY
+        inc zCursorY
+        jsr GetDestAddr
 
         ldx #7              ; Repeat each scanline 8 times
 Draw8Rows
@@ -297,8 +297,14 @@ Draw8Rows
 CopyScanLine
         lda UnpackAddr,Y      
         sta (zHgrPtr),Y
+
+        cpx #0              ; Clear source on last scanline copy
+        bne CopyNextByte
+        txa
+        sta UnpackAddr,Y
+CopyNextByte
         iny
-        cpy #40
+        cpy #40             ; 280/7 = 40 bytes/scanline
         bne CopyScanLine
 
         clc                 ; y = y+1
@@ -310,8 +316,6 @@ CopyScanLine
 
         ldy zSaveY
                
-        inc zCursorY
-        jsr GetDestAddr
         lda zCursorY
         cmp #$14            ; Y=$40 .. $A0, Rows $8..$13 (inclusive)
         bcs OuputDone
@@ -349,13 +353,6 @@ GetDestAddr
         adc #$1c        ; is Text Page $04 + $1C = HGR Page $20
         sta zHgrPtr+1
 
-        lda #0
-        ldx #40-1
-ClearBuffer
-        sta UnpackAddr,X
-        dex
-        bpl ClearBuffer       
-        
         rts
 
 ; ------------------------------------------------------------------------
diff --git a/ll_6502.dsk b/ll_6502.dsk
index 20ca39418def53830b2f479ccd33e17d2a406d77..379d501a1d40ce2d3d0b1c22c0825b500c4ac164 100644
GIT binary patch
delta 281
zcmZp8z|jCiTNpWGrt`%xewr-6#p=n~AbY`n?gje^-Y?pIKG0bD8z!*q@2OL#CRn%p
zdZwxn%e9Do0mIG<_7l|}FkE2int8$g!~u;9?<AJ0XR@@apAvYq<kxhUSVoQMWwDH1
z9RERpfpf=n<~T-0foohV7xXUXTDh%v3D?T4y-TN?#4)PXZ{h0O%GI-t>w?VM1HV78
zoqTZN!3Um|kAZ5|?*Dy~^#bc6MuiKUy^RNeXeE2A>Pm(ct6KlAea6-LZzV(PpPkRS
zTK_9t<J=(X_CM_(2tWJt?9b9aCpj*>JaOUfA_j$nzZWp<&EuM=@dD)3ug_GMs-6_T
b@Zy;2%GGnPaZSGy$Ed>0yzJ+)c*ctW4Cju)

delta 234
zcmZp8z|jCiTNpWGrnAH_es^JB_LH+gmVs$51JeZO7i~WuXe|8=6Ik~5)TvVwj9Y#!
zVqd_plYwcX+KB@i7rsd>RnKH;RX-*0YRRu>stOTY(>-GuHMmwXEK&!Wa!TOW^uk!i
zE@lSKz0;ZF7!?I>bFEy^yMk-ww%(OoE4TKpnr;%usOGtot8W)q&u*>@GHVa~{=jzf
z!G#AOcve0Js#&}L_es_Ztcw^GE_3!a9sr`19IYUGRx+$u)%thsYp&LRD;Zk<?0m!3
g`d{JZ^aXK@3XH|m55_TyG2WhjBaTsZSv=!K0GR}52><{9