diff --git a/src/blitter/SCB.s b/src/blitter/SCB.s
index 266010b..6e48756 100644
--- a/src/blitter/SCB.s
+++ b/src/blitter/SCB.s
@@ -44,7 +44,7 @@ _BltSCB
             inc
             clc
             adc   #:scb_end
-            sta   :entry+1
+            stal  :entry+1
 
             lda   ScreenY1       ; Get the SCB address to put into the stack register
             dec
@@ -74,12 +74,6 @@ _BltSCB
             plb                  ; restore the bank
             rts
 
-
-; Quick helper to set the pointer (X = low word, A = high work)
-;SetSCBArray ENT
-;        jsr   _SetSCBArray
-;        rtl
-
 _BindSCBArray
         stx  SCBArrayPtr
         sta  SCBArrayPtr+2