From 48bfd3824d8f15f1133bd47d3caf7d745ee1ab39 Mon Sep 17 00:00:00 2001
From: pkali <pawel.kalinowski@gmail.com>
Date: Sat, 9 Jul 2022 08:31:48 -0400
Subject: [PATCH] zero page loading elimination

---
 artwork/HIMARS14.asm |  35 +++++++++++++++++++----------------
 scorch.xex           | Bin 40928 -> 40921 bytes
 2 files changed, 19 insertions(+), 16 deletions(-)

diff --git a/artwork/HIMARS14.asm b/artwork/HIMARS14.asm
index 1c87947..bcc29c3 100644
--- a/artwork/HIMARS14.asm
+++ b/artwork/HIMARS14.asm
@@ -23,17 +23,8 @@ bptr        .ds     2
 cur_pos     .ds     1
 chn_bits    .ds     1
 
-bit_data    .byte   1
+bit_data    .ds     1
 
-.proc get_byte
-    lda song_data+1
-    inc song_ptr
-    bne skip
-    inc song_ptr+1
-skip
-    rts
-.endp
-song_ptr = get_byte + 1
     
 
 fcnt    .ds 2
@@ -86,6 +77,8 @@ buffers
 ;
 .proc init_song
 
+    mva #1 bit_data
+
     ; Example: here initializes song pointer:
     
     ;mwa #song_data song_ptr
@@ -182,18 +175,28 @@ skip_chn:
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ; Check for ending of song and jump to the next frame
 ;
-.proc check_end_song
-    lda song_ptr + 1
-    cmp #>song_end
+
+; not checking really so the tune gets funky :)))
+    ;lda song_ptr + 1
+    ;cmp #>song_end
     ;bne wait_frame
-    lda song_ptr
-    cmp #<song_end
+    ;lda song_ptr
+    ;cmp #<song_end
     ;bne wait_frame
-.endp
 
 end_loop
     rts
 
+song_ptr = get_byte + 1
+.proc get_byte
+    lda song_data+1
+    inc song_ptr
+    bne skip
+    inc song_ptr+1
+skip
+    rts
+.endp
+
 
 main
     jsr init_song
diff --git a/scorch.xex b/scorch.xex
index ab008d4d45082ace361619e97a17f3e70a88f33c..eb91a348adf18c8c79bcc0fce36b35d32747e0c4 100644
GIT binary patch
delta 340
zcmaE`pXug)CZYfT85CF*R{rm0yqxfe=`j<7!bZgyCGiabD;Zm-E#g?fpup)rm*LWs
zhTbJ^@3v2#prmfh>7Ug)4Jf>Ue`+U?n%Z!!;algH&W)3nOaZE#IO*BsQv&CnO-WeG
zXz`BA{{r(nZvV;8lvEfMCUYwX)X!VV(#v(FSL{Ns^o5mkd({G#&U0v;w^9cr$a!Vu
zdbo%IROBFB1g7RPTm+`(DO|(^s_Q#kL<1_q2NYQuVAZP*wQ&JdoDt{{pc{1fuLv;v
zbojT<Yn$J)pqKy3N`_vhD=QUxnXjxg>Seg{Z0=+cl^BT*kSYE^LljQ>EuFV){*na_
NpkNc-+@TUt4FHnEnSB5N

delta 347
zcmcb)pXtGVCdL2%85CF*R{rm0yqxfe=`j<7!Zd~j42)|TEuPJ|!1Qcp!bYJOCE*nT
zi#QfAC`@OV%W!E*L+=u|cbg}-Dyi#FXUJ-u1{B`FKeZD`O>MZ=@U3%8=f+7(rT|q=
zob+t+DS>m(rYxO#(sk*KlS?PxS5je=n9QOaP`_d&OE1@zUa<?k(ic`v?Uf5yy27D#
z#Y!EJAm^2p%i$shP?4Q*5ty3Oa1ofAyKoT`sIK>L5e=va8&G6rfK{(N)W!u+aYmp+
zfNs#?zaqfw)8OB_qHSf%s$TvpD;av3uB=q(Wxle~sF&f&v*nX{RbnI>K&JQu4N*Ai
Vw{*p_l}lDRfI^RVbE8T`H2^A~pH2V(