mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-16 08:05:31 +00:00
8483cc9d95
worried there's a glitch in the sound at least on AppleWin mame is fine
99 lines
1.3 KiB
ArmAsm
99 lines
1.3 KiB
ArmAsm
|
|
|
|
; pattern 0
|
|
; 0 -> F
|
|
; 48-> C
|
|
; 50-> A
|
|
; 52-> 9
|
|
; 54-> 8
|
|
; 56-> 7
|
|
; 58-> 6
|
|
; 60-> 5
|
|
; 62-> 4
|
|
bamps0:
|
|
; 0 15 30 45 48 50 52 54 56 58 60 62
|
|
.byte $FF,$FF,$FF,$3F,$2C,$2A,$29,$28,$27,$26,$25,$24
|
|
|
|
; pattern 1
|
|
; 0 -> F
|
|
; 9 -> C
|
|
;10 -> F
|
|
;20 -> C
|
|
;22 -> F
|
|
;29 -> C
|
|
;30 -> F
|
|
;31 -> C
|
|
;32 -> F
|
|
;40 -> C
|
|
; 48-> A
|
|
; 50-> 9
|
|
; 52-> 8
|
|
; 54-> 7
|
|
; 56-> 6
|
|
; 58-> 5
|
|
; 60-> 4
|
|
; 62-> 3
|
|
bamps1:
|
|
; 0 9 10 20 22 29 30 31 32 40 48 50 52 54 56 58 60 62
|
|
.byte $9F,$1C,$AF,$2C,$7F,$1C,$1F,$1C,$8F,$8C,$2A,$29,$28,$27,$26,$25,$24,$23
|
|
|
|
; pattern 2
|
|
; 0 ->F
|
|
; 13->C
|
|
; 14->F
|
|
; 15->C
|
|
; 16->F
|
|
; 24->C
|
|
; 26->9
|
|
; 28->8
|
|
; 30->7
|
|
; 32->F
|
|
; 45->C
|
|
; 46->F
|
|
; 47->C
|
|
; 48->F
|
|
; 56->C
|
|
; 58->9
|
|
; 60->7
|
|
; 62->6
|
|
bamps2:
|
|
; 0 13 14 15 16 24 26 28 30 32 45 46 47 48 56 58 60 62
|
|
.byte $DF,$1C,$1F,$1C,$8F,$2C,$29,$28,$27,$DF,$1C,$1F,$1C,$8F,$2C,$29,$27,$26
|
|
|
|
; pattern3
|
|
; 0->F
|
|
; 24->C
|
|
; 26->9
|
|
; 28->8
|
|
; 30->7
|
|
; 32->F
|
|
; 45->C
|
|
; 46->F
|
|
; 47->C
|
|
; 48->F
|
|
; 56->C
|
|
; 58->9
|
|
; 60->7
|
|
; 62->6
|
|
bamps3:
|
|
; 0 15 24 26 28 30 32 45 46 47 48 56 58 60 62
|
|
.byte $FF,$9F,$2C,$29,$28,$27,$DF,$1C,$1F,$1C,$8F,$2C,$29,$27,$26
|
|
|
|
; pattern4
|
|
; 0->0
|
|
; 60->F
|
|
; 61->C
|
|
; 62->F
|
|
; 63->C
|
|
|
|
; needs to immediately follow bamps3 for some reason?
|
|
|
|
bamps4:
|
|
; 0 15 30 45 60 61 62 63
|
|
.byte $F0,$F0,$F0,$F0,$1F,$1C,$1F,$1C
|
|
|
|
.align $100
|
|
|
|
deater_string:
|
|
|