Fix addressing bug in SCB binding

2022-06-27 00:41:02 -05:00 · 2022-06-27 00:41:02 -05:00 · a51c973865
parent 81e0aeb351
commit a51c973865
1 changed files with 1 additions and 7 deletions
--- 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