Apple-2-Tools/4cade
1
0
Fork 0
mirror of https://github.com/a2-4am/4cade.git synced 2025-08-07 18:25:24 +00:00
Code Issues Projects Releases Wiki Activity

mirror device pointers

Browse Source
This commit is contained in:
Peter Ferrie
2019-10-01 13:08:50 -07:00
parent 27b22b522c
commit d1779f48d1
3 changed files with 14 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

BIN
res/proboothd
View File

Binary file not shown.

9
src/4cade.init.a
View File

@@ -180,7 +180,14 @@ OneTimeSetup
jsr SaveOrRestoreScreenHoles ; save initial copy of screen hole content jsr SaveOrRestoreScreenHoles ; save initial copy of screen hole content
lda #$91 lda #$91
sta holepatch ; enable restoring of copy from now on 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 sta promote + ProDOS_unit - $bf00
; save unit in LC bank 2 while overriding !pseudopc ; save unit in LC bank 2 while overriding !pseudopc

13
src/proboothd/proboothd.s
View File

@@ -117,7 +117,12 @@ seekread stx bloklo
sty blokhi sty blokhi
entry jmp $d1d1 entry jmp $d1d1
fakeMLI beq readblk fakeMLI bne retcall
readblk dey
dey
sty adrhi
tay
jsr seekread
retcall pla retcall pla
tax tax
inx inx
@@ -126,12 +131,6 @@ retcall pla
txa txa
pha pha
rts rts
readblk dey
dey
sty adrhi
tay
jsr seekread
bcc retcall
fakeMLI_e fakeMLI_e
filename !byte filename_e - filename_b filename !byte filename_e - filename_b