it really looks too tight :(

dither4.s

@@ -156,13 +156,15 @@ each_scanline:
         pha
     .endmacro
 
-    fake:
-    lda #18
-    pha
-    pha
+    .macro audio_play
+        ldy #0
+        lda (sample_ptr),y
+        sta AUDC1
+    .endmacro
 
     .macro inner_scanline
         ldy scanline
+        inc scanline
 
         ; Leisurely memory fetches
         lda palette1,y
@@ -181,21 +183,21 @@ each_scanline:
         sty COLPF2
         
         ; Audio sample
-        pla
-        sta AUDC1
-
-        inc scanline
+        ;pla
+        ;lda temp1
+        ;sta AUDC1
     .endmacro
 
+    audio_play
     inner_scanline
 
     .macro audio_inc
+    ;; toooo slllooowwww
         ; Increment sample ptr
-        jmp audio_cont
         inc sample_ptrl
         bne audio_cont
-        inc sample_ptrh
 
+        inc sample_ptrh
         lda sample_ptrh
         cmp #.hibyte(audio_samples_end)
         bne audio_cont
@@ -208,10 +210,12 @@ each_scanline:
         sta sample_ptrl
         lda #.hibyte(audio_samples)
         sta sample_ptrh
+
+        audio_cont:
     .endmacro
 
-audio_cont:
 
+    ;audio_inc
     inner_scanline
 
     lda VCOUNT