mirror of
https://github.com/a2-4am/4cade.git
synced 2024-12-21 02:30:27 +00:00
fix weird colouring on the IIc and IIc+
This commit is contained in:
parent
7c1a2c4f8c
commit
7e26583868
@ -20,6 +20,9 @@
|
||||
;;; NORMFAST Disable/enable Apple II compatible accelerator
|
||||
; (no copyright info given)
|
||||
;
|
||||
; Release 7 2019-11-27 FASTChip control just like ZipChip.
|
||||
; Prevents unexpected acceleration by user.
|
||||
;
|
||||
; Release 6 2017-10-05 Fix Mac IIe card check
|
||||
;
|
||||
; Release 5 2017-09-27 Add Macintosh IIe Card. Addon
|
||||
@ -210,10 +213,11 @@ build_setspeed
|
||||
rts
|
||||
|
||||
patch_zc
|
||||
lda #$d0 ; BNE
|
||||
sta zc_iic
|
||||
lda #(FASTChip-zc_iic)-2
|
||||
sta zc_iic+1
|
||||
lda #$D0
|
||||
sta zc_iic1 + 2
|
||||
sta zc_iic2
|
||||
lda #(FASTChip - zc_iic2) - 2
|
||||
sta zc_iic2 + 1
|
||||
; fall through
|
||||
|
||||
build_addon
|
||||
@ -283,6 +287,7 @@ iicplus !pseudopc DisableAccelerator {
|
||||
lda #CGGA_LOCK ; should lock after a change
|
||||
pha
|
||||
jsr cgga ; reads parm from stack, must JSR
|
||||
sta $C05B ; fix colouring
|
||||
+READ_RAM2_WRITE_RAM2
|
||||
rts
|
||||
@endpokery
|
||||
@ -326,14 +331,18 @@ addon
|
||||
lda #0 ; enable accelerator entry point
|
||||
|
||||
; TransWarp I
|
||||
sta tw1_speed
|
||||
sta tw1_speed
|
||||
|
||||
; trademarked accelerator from Germany
|
||||
|
||||
tay
|
||||
sta uw_fast,y ; value does not matter
|
||||
tay
|
||||
|
||||
; Zip Chip
|
||||
zc_iic1
|
||||
sta uw_fast,y ; value does not matter, SMC
|
||||
; no blind setting on the IIc
|
||||
; it has unwanted side-effects
|
||||
|
||||
; Zip Chip
|
||||
|
||||
ldy #FC_1MHZ
|
||||
eor #1
|
||||
@ -343,8 +352,7 @@ addon
|
||||
+ lda #ZC_UNLOCK
|
||||
php
|
||||
sei ; timing sensitive
|
||||
|
||||
zc_iic
|
||||
zc_iic2
|
||||
sta zc_lock ; SMC
|
||||
; no blind Zip Chip on the IIc
|
||||
; it has unwanted side-effects
|
||||
@ -369,6 +377,7 @@ FASTChip
|
||||
lda #FC_LOCK
|
||||
sta fc_lock
|
||||
|
||||
skip_chip
|
||||
plp ; restore interrupt state
|
||||
rts
|
||||
end_addon
|
||||
|
Loading…
Reference in New Issue
Block a user