mirror of
https://github.com/RevCurtisP/C02.git
synced 2025-02-16 14:30:33 +00:00
Added modules sounds and vectors for Apple 2
This commit is contained in:
parent
71d308aa57
commit
5a50fc4b89
26
include/apple2/sounds.a02
Normal file
26
include/apple2/sounds.a02
Normal file
@ -0,0 +1,26 @@
|
|||||||
|
; C02 library sounds.h02 assembly language subroutines
|
||||||
|
|
||||||
|
;beep() - Produce System Beep Sound
|
||||||
|
;Affects: A,Y
|
||||||
|
BEEP EQU $FBDD ;Sound Bell
|
||||||
|
|
||||||
|
;bomb() - Produce System Explosion Sound
|
||||||
|
;Affects: None
|
||||||
|
BOMB: RTS ;Function Not Available
|
||||||
|
|
||||||
|
;shoot() - Produce Shooting Sound
|
||||||
|
;Affects: None
|
||||||
|
SHOT: RTS ;Function Not Available
|
||||||
|
|
||||||
|
;tick() - Produce System Tick Sound
|
||||||
|
;Affects: None
|
||||||
|
TICK: LDA $C030 ;Click Speaker Once
|
||||||
|
RTS
|
||||||
|
|
||||||
|
;tock() - Produce System Tock Sound
|
||||||
|
;Affects: None
|
||||||
|
TOCK: RTS ;Function Not Available
|
||||||
|
|
||||||
|
;zap() - Produce System Zap Sound
|
||||||
|
;Affects: None
|
||||||
|
ZAP: RTS ;Function Not Available
|
22
include/apple2/sounds.h02
Normal file
22
include/apple2/sounds.h02
Normal file
@ -0,0 +1,22 @@
|
|||||||
|
/*************************************************
|
||||||
|
* sounds - Predefined Sounds Module for Apple 2 *
|
||||||
|
*************************************************/
|
||||||
|
|
||||||
|
/* Produce System Beep Sound */
|
||||||
|
char beep();
|
||||||
|
|
||||||
|
/* Produce Explosion Sound */
|
||||||
|
char bomb();
|
||||||
|
|
||||||
|
/* Produce Shooting Sound */
|
||||||
|
char shot();
|
||||||
|
|
||||||
|
/* Produce High Click Sound */
|
||||||
|
char tick();
|
||||||
|
|
||||||
|
/* Produce Low Click Sound */
|
||||||
|
char tock();
|
||||||
|
|
||||||
|
/* Produce Zap Sound */
|
||||||
|
char zap();
|
||||||
|
|
106
include/apple2/vectors.a02
Normal file
106
include/apple2/vectors.a02
Normal file
@ -0,0 +1,106 @@
|
|||||||
|
;C02 Interrupt Vector Assembly Language Routines for Apple 2
|
||||||
|
|
||||||
|
;getbrk() - Return BRK Interrupt Address
|
||||||
|
;Returns: A = $00 - Software Definable Address
|
||||||
|
; Y = Address MSB
|
||||||
|
; X = Address LSB
|
||||||
|
GETBRK: LDA #$00 ;Return software definable
|
||||||
|
LDX $03F0 ;and Address in Soft Break Vector
|
||||||
|
LDY $03F1
|
||||||
|
RTS
|
||||||
|
|
||||||
|
;getrst() - Return RST Interrupt Address
|
||||||
|
;Returns: A = $00 - Autostart ROM (Vectored through RAM)
|
||||||
|
; $7F - Monitor ROM (Hard Coded)
|
||||||
|
; Y = Address MSB
|
||||||
|
; X = Address LSB
|
||||||
|
GETRST: JSR GETRSC ;Check ROM Version
|
||||||
|
BNE GETRSX ;If Autostart ROM
|
||||||
|
LDX $03F2 ; Return Address in Soft Reset Vector
|
||||||
|
LDY $03F3
|
||||||
|
RTS
|
||||||
|
GETRSX: LDX $FFFC ;Else
|
||||||
|
LDY $FFFD ; Return Address in 6502 RESET Vector
|
||||||
|
RTS
|
||||||
|
|
||||||
|
;Check 6502 RESET Vector
|
||||||
|
;Returns: A = $00 - Autostart ROM (Vectored through RAM)
|
||||||
|
; $7F - Monitor ROM (Hard Coded)
|
||||||
|
;Notes: $FFFC contains $FF59 on Apple ][ (Monitor ROM)
|
||||||
|
; $FA62 on all other machines (Autostart ROM)
|
||||||
|
GETRSC: LDA $FFFD ;Load MSB of Vector
|
||||||
|
CMP #$FF ;
|
||||||
|
BEQ GETRSF ;If Not Monitor ROM
|
||||||
|
LDA #$00 ; Return $00
|
||||||
|
RTS
|
||||||
|
GETRSF: LDA #$7F ;Else Return $FF
|
||||||
|
RTS
|
||||||
|
|
||||||
|
;getnmi() - Return NMI Interrupt Address
|
||||||
|
;Returns: A = $00 - Software Definable Address
|
||||||
|
; Y = Address MSB
|
||||||
|
; X = Address LSB
|
||||||
|
;Notes: $FFFA contains $03FB in all ROMs
|
||||||
|
GETNMI: LDA #$00 ;Return software definable
|
||||||
|
LDX $03FB ;and Address in NMI vector
|
||||||
|
LDY $03FC
|
||||||
|
RTS
|
||||||
|
|
||||||
|
;getirq() - Return IRQ Interrupt Address
|
||||||
|
;Returns: A = $00 - Software Definable Address
|
||||||
|
; Y = Address MSB
|
||||||
|
; X = Address LSB
|
||||||
|
;Notes: $FFFE contains $FA86 on Apple ][ (Monitor ROM)
|
||||||
|
; $FA40 on Apple ][+ and Pravets
|
||||||
|
; $C3FA on Apple //e, $FAC3 on TK3000//e
|
||||||
|
; $FF59 on Franklin 1000 and Laser 128
|
||||||
|
GETIRQ: LDA #$00 ;Return software definable
|
||||||
|
LDX $03FE ;and Address in CINV
|
||||||
|
LDY $03FF
|
||||||
|
RTS
|
||||||
|
|
||||||
|
;setbrk() - Set BRK Interrupt Address
|
||||||
|
;Args: Y = Address MSB
|
||||||
|
; X = Address LSB
|
||||||
|
;Returns: A = $00 - Successfully Set
|
||||||
|
SETBRK: SEI ;Disable Interrupts
|
||||||
|
STX $03F0 ;Store Address in Soft Rreak Vector
|
||||||
|
STY $03F1
|
||||||
|
CLI ;Enable Interrupts
|
||||||
|
LDA #$00 ;Return Success
|
||||||
|
RTS
|
||||||
|
|
||||||
|
;setrst() - Set RST Interrupt Address
|
||||||
|
;Args: Y = Address MSB
|
||||||
|
; X = Address LSB
|
||||||
|
;Returns: A = $00 If Autostart ROM (Success)
|
||||||
|
; $7F If Monitor ROM (Failure)
|
||||||
|
SETRST: JSR GETRSC ;Check ROM Version
|
||||||
|
BNE SETRSX ;If Autostart ROM
|
||||||
|
SEI ; Disable Interrupts
|
||||||
|
STX $03F2 ; Store Address in Soft Reset Vector
|
||||||
|
STY $03F3
|
||||||
|
CLI ; Enable Interrupts
|
||||||
|
SETRSX: RTS
|
||||||
|
|
||||||
|
;setnmi() - Set NMI Interrupt Address
|
||||||
|
;Args: Y = Address MSB
|
||||||
|
; X = Address LSB
|
||||||
|
;Returns: A = $00 - Successfully Set
|
||||||
|
SETNMI: SEI ;Disable Interrupts
|
||||||
|
STX $03FB ;Store Address in NMI vector
|
||||||
|
STY $03FC
|
||||||
|
CLI ;Enable Interrupts
|
||||||
|
LDA #$00 ;Return Success
|
||||||
|
RTS
|
||||||
|
|
||||||
|
;setirq() - Set Maskable Interrupt Address
|
||||||
|
;Args: Y = Address MSB
|
||||||
|
; X = Address LSB
|
||||||
|
;Returns: A = $00 - Successfully Set
|
||||||
|
SETIRQ: SEI ;Disable Interrupts
|
||||||
|
STX $03FE ;Store Address in ????
|
||||||
|
STY $03FF
|
||||||
|
CLI ;Enable Interrupts
|
||||||
|
LDA #$00
|
||||||
|
RTS
|
71
include/apple2/vectors.h02
Normal file
71
include/apple2/vectors.h02
Normal file
@ -0,0 +1,71 @@
|
|||||||
|
/*********************************************************
|
||||||
|
* vector - 6502 Interrupt Vector Manipulation Functions *
|
||||||
|
*********************************************************/
|
||||||
|
|
||||||
|
/* Get BRK Handler Address *
|
||||||
|
* Returns: Status *
|
||||||
|
* $00 = modifiable *
|
||||||
|
* $7F = hard coded *
|
||||||
|
* $FF = unavailable *
|
||||||
|
* Address MSB *
|
||||||
|
* Address LSB */
|
||||||
|
char getbrk();
|
||||||
|
|
||||||
|
/* Get IRQ Handler Address *
|
||||||
|
* Returns: Status *
|
||||||
|
* $00 = modifiable *
|
||||||
|
* $7F = hard coded *
|
||||||
|
* $FF = unavailable *
|
||||||
|
* Address MSB *
|
||||||
|
* Address LSB */
|
||||||
|
char getirq();
|
||||||
|
|
||||||
|
/* Get NMI Handler Address *
|
||||||
|
* Returns: Status *
|
||||||
|
* $00 = modifiable *
|
||||||
|
* $7F = hard coded *
|
||||||
|
* $FF = unavailable *
|
||||||
|
* Address MSB *
|
||||||
|
* Address LSB */
|
||||||
|
char getnmi();
|
||||||
|
|
||||||
|
/* Get RESET Handler Address *
|
||||||
|
* Returns: Status *
|
||||||
|
* $00 = modifiable *
|
||||||
|
* $7F = hard coded *
|
||||||
|
* $FF = unavailable *
|
||||||
|
* Address MSB *
|
||||||
|
* Address LSB */
|
||||||
|
char getrst();
|
||||||
|
|
||||||
|
/* Set BRK Handler Address */
|
||||||
|
* Args: &d - New Address *
|
||||||
|
* Returns: Result *
|
||||||
|
* $00 = modifiable *
|
||||||
|
* $7F = hard coded *
|
||||||
|
* $FF = unavailable *
|
||||||
|
char setbrk();
|
||||||
|
|
||||||
|
/* Set IRQ Handler Address */
|
||||||
|
* Args: &d - New Address *
|
||||||
|
* Returns: Result *
|
||||||
|
* $00 = modifiable *
|
||||||
|
* $7F = hard coded *
|
||||||
|
* $FF = unavailable *
|
||||||
|
char setirq();
|
||||||
|
|
||||||
|
/* Set NMI Handler Address */
|
||||||
|
* Args: &d - New Address *
|
||||||
|
* Returns: Result *
|
||||||
|
* $00 = modifiable *
|
||||||
|
* $7F = hard coded *
|
||||||
|
* $FF = unavailable *
|
||||||
|
char setnmi();
|
||||||
|
|
||||||
|
/* Set RESET Handler Address */
|
||||||
|
* Args: &d - New Address *
|
||||||
|
* Returns: Result *
|
||||||
|
* $00 = modifiable *
|
||||||
|
* $7F = hard coded *
|
||||||
|
* $FF = unavailable *
|
||||||
|
char setrst();
|
Loading…
x
Reference in New Issue
Block a user