Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-01-14 13:33:48 +00:00
Code Issues Projects Releases Wiki Activity

pt3_player: add iic support

Browse Source
This commit is contained in:
Vince Weaver 2019-06-07 16:52:31 -04:00
parent 3bdc522ec7
commit 0efd367bfa
3 changed files with 45 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
pt3_player/interrupt_handler.s
View File

@ -13,7 +13,8 @@
TIME_OFFSET EQU 13 TIME_OFFSET EQU 13
interrupt_handler: interrupt_handler:
; pha ; save A ; 3 php
pha ; save A ; 3
; A is saved in $45 by firmware ; A is saved in $45 by firmware
txa txa
pha ; save X pha ; save X
@ -292,8 +293,13 @@ exit_interrupt:
tay ; restore Y tay ; restore Y
pla pla
tax ; restore X tax ; restore X
pla ; restore a ; 4
; this is needed on II+/IIe not not IIc
interrupt_smc:
lda $45 ; restore A lda $45 ; restore A
; pla ; restore a ; 4 plp
rti ; return from interrupt ; 6 rti ; return from interrupt ; 6

39
pt3_player/pt3_player.s
View File

@ -27,18 +27,47 @@ pt3_setup:
jsr clear_screens jsr clear_screens
;======================= ;===============================
; Check for Apple II/II+ ; Check for Apple II/II+/IIe/IIc
;======================= ;===============================
; this is used to see if we have lowecase support ; this is used to see if we have lowecase support
lda $FBB3 ; IIe and newer is $06 lda $FBB3 ; IIe and newer is $06
cmp #6 cmp #6
beq apple_iie beq apple_iie_or_newer
lda #1 ; set if older than a IIe lda #1 ; set if older than a IIe
sta apple_ii sta apple_ii
apple_iie: jmp done_apple_detect
apple_iie_or_newer:
lda $FBC0 ; 0 on a IIc
bne done_apple_detect
apple_iic:
; activate IIc mockingboard?
; this might only be necessary to allow detection
; I get the impression the Mockingboard 4c activates
; when you access any of the 6522 ports in Slot 4
lda #$ff
sta $C403
sta $C404
; bypass the firmware interrupt handler
; should we do this on IIe too? probably faster
sei ; disable interrupts
lda $c08b ; disable ROM (enable language card)
lda $c08b
lda #<interrupt_handler
sta $fffe
lda #>interrupt_handler
sta $ffff
lda #$EA ; nop out the "lda $45" in the irq hand
sta interrupt_smc
sta interrupt_smc+1
done_apple_detect:
;=============== ;===============
; Init disk code ; Init disk code

5
pt3_player/qkumba_rts.s
View File

@ -73,8 +73,9 @@ rts_init:
sta mlsmc04+1 sta mlsmc04+1
sta mlsmc05+1 sta mlsmc05+1
jsr $fe93 ; clear COUT ; Are these needed? they break on iic as we have ROM turned off
jsr $fe89 ; clear KEYIN ; jsr $fe93 ; clear COUT
; jsr $fe89 ; clear KEYIN
;======================== ;========================
; Create nibble table ; Create nibble table