mirror device pointers

2024-06-06 12:29:30 +00:00 · 2019-10-01 13:08:50 -07:00 · 2019-10-01 13:08:50 -07:00 · d1779f48d1
commit d1779f48d1
parent 27b22b522c
3 changed files with 14 additions and 8 deletions
--- a/res/proboothd
+++ b/res/proboothd
--- a/src/4cade.init.a
+++ b/src/4cade.init.a
@ -180,7 +180,14 @@ OneTimeSetup
         jsr   SaveOrRestoreScreenHoles ; save initial copy of screen hole content
         lda   #$91
         sta   holepatch             ; enable restoring of copy from now on
-         lda   $43
+         ldy   #$0b
+CopyDevs
+         lda   $BF13,y
+         sta   promote + $13,y
+         dey
+         bpl   CopyDevs
+
+         lda   $BF30
         sta   promote + ProDOS_unit - $bf00
                                     ; save unit in LC bank 2 while overriding !pseudopc

--- a/src/proboothd/proboothd.s
+++ b/src/proboothd/proboothd.s
@ -117,7 +117,12 @@ seekread        stx bloklo
                sty blokhi
 entry           jmp $d1d1

-fakeMLI         beq readblk
+fakeMLI         bne retcall
+readblk         dey
+                dey
+                sty adrhi
+                tay
+                jsr seekread
 retcall         pla
                tax
                inx
@ -126,12 +131,6 @@ retcall         pla
                txa
                pha
                rts
-readblk         dey
-                dey
-                sty adrhi
-                tay
-                jsr seekread
-                bcc retcall
 fakeMLI_e

 filename        !byte filename_e - filename_b