mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-09-10 23:54:33 +00:00
sa: ed now plays the music at least
This commit is contained in:
parent
cac017e578
commit
95a085f759
@ -25,15 +25,15 @@
|
||||
;.define EQU =
|
||||
|
||||
; These are all "Free" zero page locations
|
||||
FREQ1 EQU $06
|
||||
FREQ2 EQU $07
|
||||
DURATION EQU $08
|
||||
INSTRUMENT1 EQU $09
|
||||
INSTRUMENT2 EQU $1D
|
||||
MADDRL EQU $1E
|
||||
MADDRH EQU $1F
|
||||
LOC4E EQU $4E
|
||||
COUNT256 EQU $4F
|
||||
;FREQ1 EQU $06
|
||||
;FREQ2 EQU $07
|
||||
;DURATION EQU $08
|
||||
;INSTRUMENT1 EQU $09
|
||||
;INSTRUMENT2 EQU $1D
|
||||
;MADDRL EQU $1E
|
||||
;MADDRH EQU $1F
|
||||
;LOC4E EQU $4E
|
||||
;COUNT256 EQU $4F
|
||||
|
||||
play_ed:
|
||||
LDA #$01 ; 900: A9 01 ; 2 *!*
|
||||
|
@ -42,9 +42,18 @@ only_forty:
|
||||
; sta LYRICSH
|
||||
|
||||
|
||||
;MADDRL EQU 30
|
||||
;MADDRH EQU 31
|
||||
|
||||
;==================
|
||||
; load song
|
||||
;==================
|
||||
lda #<music_address
|
||||
sta MADDRL
|
||||
lda #>music_address
|
||||
sta MADDRH
|
||||
|
||||
jsr play_ed
|
||||
|
||||
;==================
|
||||
; loop forever
|
||||
@ -81,5 +90,6 @@ lyrics:
|
||||
;.incbin "SA.KR4"
|
||||
|
||||
|
||||
music_address:
|
||||
.incbin "SA.ED"
|
||||
|
||||
|
@ -1,5 +1,21 @@
|
||||
.define EQU =
|
||||
|
||||
;; Electric Duet addresses
|
||||
|
||||
; These are all "Free" zero page locations
|
||||
FREQ1 EQU $06
|
||||
FREQ2 EQU $07
|
||||
DURATION EQU $08
|
||||
INSTRUMENT1 EQU $09
|
||||
INSTRUMENT2 EQU $1D
|
||||
MADDRL EQU $1E
|
||||
MADDRH EQU $1F
|
||||
LOC4E EQU $4E
|
||||
COUNT256 EQU $4F
|
||||
|
||||
|
||||
;; LZ4 addresses
|
||||
|
||||
LZ4_SRC EQU $00
|
||||
LZ4_DST EQU $02
|
||||
LZ4_END EQU $04
|
||||
|
Loading…
Reference in New Issue
Block a user