mirror of
https://github.com/bobbimanners/Applecorn.git
synced 2024-06-02 11:41:30 +00:00
Reverted early audio tinkering in main. (See 'ensoniq' for that).
This commit is contained in:
parent
75e0df40ea
commit
73a21d628b
BIN
applecorn.po
BIN
applecorn.po
Binary file not shown.
|
@ -198,7 +198,6 @@ MAINZP MAC
|
||||||
PUT AUXMEM.BYTWRD
|
PUT AUXMEM.BYTWRD
|
||||||
PUT AUXMEM.CHARIO
|
PUT AUXMEM.CHARIO
|
||||||
PUT AUXMEM.MISC
|
PUT AUXMEM.MISC
|
||||||
PUT AUXMEM.AUDIO
|
|
||||||
|
|
||||||
* Automatically save the object file:
|
* Automatically save the object file:
|
||||||
SAV APPLECORN
|
SAV APPLECORN
|
||||||
|
|
|
@ -94,8 +94,8 @@ OSWBASE DW WORD00 ; OSWORD 0 - Read input line
|
||||||
DW WORD04 ; OSWORD 4 - Write interval timer
|
DW WORD04 ; OSWORD 4 - Write interval timer
|
||||||
DW WORD05 ; OSWORD 5 - Read I/O memory
|
DW WORD05 ; OSWORD 5 - Read I/O memory
|
||||||
DW WORD06 ; OSWORD 6 - Write I/O memory
|
DW WORD06 ; OSWORD 6 - Write I/O memory
|
||||||
DW WORD07 ; OSWORD 7 - SOUND
|
* DW WORD07 ; OSWORD 7 - SOUND
|
||||||
DW WORD08 ; OSWORD 8 - ENVELOPE
|
* DW WORD08 ; OSWORD 8 - ENVELOPE
|
||||||
* DW WORD09 ; OSWORD 9 - POINT
|
* DW WORD09 ; OSWORD 9 - POINT
|
||||||
* DW WORD0A ; OSWORD 10 - Read character bitmap
|
* DW WORD0A ; OSWORD 10 - Read character bitmap
|
||||||
* DW WORD0B ; OSWORD 11 - Read palette
|
* DW WORD0B ; OSWORD 11 - Read palette
|
||||||
|
|
|
@ -126,16 +126,6 @@ MOSHIGH SEI ; Disable IRQ while initializing
|
||||||
DEX
|
DEX
|
||||||
BPL :INITPG2
|
BPL :INITPG2
|
||||||
|
|
||||||
LDX #3
|
|
||||||
LDA #$80 ; Initialize sound queues
|
|
||||||
:INITSND STA SND0EMPTY,X
|
|
||||||
STZ SND0STARTIDX,X
|
|
||||||
STZ SND0ENDIDX,X
|
|
||||||
DEX
|
|
||||||
BNE :INITSND
|
|
||||||
|
|
||||||
JSR ENSQINIT ; Initialize Ensoniq DOC
|
|
||||||
|
|
||||||
LDA $C036 ; GS speed register
|
LDA $C036 ; GS speed register
|
||||||
AND #$80 ; Speed bit only
|
AND #$80 ; Speed bit only
|
||||||
STA GSSPEED ; In Alt LC for IRQ/BRK hdlr
|
STA GSSPEED ; In Alt LC for IRQ/BRK hdlr
|
||||||
|
|
|
@ -68,23 +68,6 @@ FINDV EQU $21C ; OSFIND vector
|
||||||
FSCV EQU $21E ; FSCV misc file ops
|
FSCV EQU $21E ; FSCV misc file ops
|
||||||
|
|
||||||
BYTEVARBASE EQU $190 ; Base of OSBYTE variables
|
BYTEVARBASE EQU $190 ; Base of OSBYTE variables
|
||||||
|
|
||||||
EMPTYFLAGS EQU $2CF
|
|
||||||
SND0EMPTY EQU $2D3 ; Empty flag for sound bufs
|
|
||||||
SND1EMPTY EQU $2D4
|
|
||||||
SND2EMPTY EQU $2D5
|
|
||||||
SND3EMPTY EQU $2D6
|
|
||||||
STARTINDICES EQU $2D8
|
|
||||||
SND0STARTIDX EQU $2DC ; Start index for sound bufs
|
|
||||||
SND1STARTIDX EQU $2DD
|
|
||||||
SND2STARTIDX EQU $2DE
|
|
||||||
SND3STARTIDX EQU $2DF
|
|
||||||
ENDINDICES EQU $2E1
|
|
||||||
SND0ENDIDX EQU $2E5 ; End index for sound bufs
|
|
||||||
SND1ENDIDX EQU $2E6
|
|
||||||
SND2ENDIDX EQU $2E7
|
|
||||||
SND3ENDIDX EQU $2E8
|
|
||||||
|
|
||||||
OSFILECB EQU $2EE ; OSFILE control block
|
OSFILECB EQU $2EE ; OSFILE control block
|
||||||
OSGBPBCB EQU OSFILECB+1 ; OSGBPB control block
|
OSGBPBCB EQU OSFILECB+1 ; OSGBPB control block
|
||||||
|
|
||||||
|
@ -93,3 +76,7 @@ OSGBPBCB EQU OSFILECB+1 ; OSGBPB control block
|
||||||
* $03E0-$03FF Used for interfacing with ProDOS XFER
|
* $03E0-$03FF Used for interfacing with ProDOS XFER
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user