ZIP: Change 1-4 to slow 5-7 to fast

This commit is contained in:
Joshua Bell 2024-04-21 19:56:39 -07:00
parent 1ed40ff2dc
commit 92405b500e
2 changed files with 4 additions and 5 deletions

View File

@ -33,7 +33,7 @@ This repo includes the following drivers/modifications:
* FujiNet Clock * FujiNet Clock
* A "jumbo" driver that includes all of the above (just called `CLOCK.SYSTEM`) * A "jumbo" driver that includes all of the above (just called `CLOCK.SYSTEM`)
* Accelerators * Accelerators
* ZIP CHIP configuration (sets the chip to slow on speaker access) * ZIP CHIP configuration (slow on speaker access, make slots 1-4 fast)
* RAM Disk drivers * RAM Disk drivers
* RAMWorks Driver by Glen E. Bredon * RAMWorks Driver by Glen E. Bredon
* Quit dispatcher/selector (`BYE` routines) * Quit dispatcher/selector (`BYE` routines)

View File

@ -1,5 +1,5 @@
;;; ZIPCHIP.SYSTEM ;;; ZIPCHIP.SYSTEM
;;; Configures the speaker to be temporarily slow ;;; Configures the speaker to be temporarily slow, slots 1-4 fast
;;; TODO: Add a configuration utility ;;; TODO: Add a configuration utility
.setcpu "6502" .setcpu "6502"
@ -127,9 +127,8 @@
cmp ZC_REG_SLOTSPKR cmp ZC_REG_SLOTSPKR
bne no_zip bne no_zip
;; Slow on speaker access ;; Slow on speaker access, slots 1-4 fast, 5-7 normal
lda ZC_REG_SLOTSPKR lda #%11100001 ; bit 0 = Speaker, bit N = slot N
ora #%00000001 ; bit 0 = Speaker
sta ZC_REG_SLOTSPKR sta ZC_REG_SLOTSPKR
;; Get size ;; Get size