updated merlin32 source

added midi lookup table
This commit is contained in:
Charles Mangin 2016-12-27 22:26:58 -05:00
parent d64403c376
commit 99e24d9a06
3 changed files with 97 additions and 74 deletions

BIN
ksynth

Binary file not shown.

View File

@ -6,8 +6,8 @@ MULTIPLIER EQU $FC ; duration multiplier (defaults to $ff)
OSCILLATOR EQU $FD ; second oscillator value - decrements once for vibrato
OSCCOUNTER EQU $FE ; tracks second oscillator value
SEQUENCE EQU $FF ; note number/address offset from song origin
MIDILOOKUP EQU $1100 ; MIDI style note lookup table
SONGORIGIN EQU $1000 ; song header start address
MIDILOOKUP EQU $1100 ; MIDI notes lookup table address
CLICKBIT1 EQU $031E ; modified byte - set to FF for rest note
CLICKBIT2 EQU $0313
@ -71,3 +71,10 @@ NEXTNOTE INC SEQUENCE ; increment to next note address
BNE ]LOOP ; branch to LOOP
ENDSONG RTS ;
ORG $1130 ; MIDI lookup table
HEX 00,00,00,FC,EF,E1,D5,C9,BD,B3,A9,9F,96,8E,86,7E ; $1130
HEX 77,71,6A,64,5E,59,54,4F,4B,47,43,3F,3C,38,35,32 ; $1140
HEX 2F,2D,2A,27,25,23,21,1F,1E,1C,1A,19,17,16,15,13 ; $1150

View File

@ -9,8 +9,8 @@
6 | 1 ksynth.s 6 | Equivalence | 11 | | 0 | 00/0300 | OSCILLATOR EQU $FD ; second oscillator value - decrements once for vibrato
7 | 1 ksynth.s 7 | Equivalence | 11 | | 0 | 00/0300 | OSCCOUNTER EQU $FE ; tracks second oscillator value
8 | 1 ksynth.s 8 | Equivalence | 11 | | 0 | 00/0300 | SEQUENCE EQU $FF ; note number/address offset from song origin
9 | 1 ksynth.s 9 | Equivalence | 11 | | 0 | 00/0300 | SONGORIGIN EQU $1000 ; song header start address
10 | 1 ksynth.s 10 | Equivalence | 11 | | 0 | 00/0300 | MIDILOOKUP EQU $1100 ; MIDI notes lookup table address
9 | 1 ksynth.s 9 | Equivalence | 11 | | 0 | 00/0300 | MIDILOOKUP EQU $1100 ; MIDI style note lookup table
10 | 1 ksynth.s 10 | Equivalence | 11 | | 0 | 00/0300 | SONGORIGIN EQU $1000 ; song header start address
11 | 1 ksynth.s 11 | Equivalence | 11 | | 0 | 00/0300 | CLICKBIT1 EQU $031E ; modified byte - set to FF for rest note
12 | 1 ksynth.s 12 | Equivalence | 11 | | 0 | 00/0300 | CLICKBIT2 EQU $0313
13 | 1 ksynth.s 13 | Empty | 11 | | 0 | 00/0300 |
@ -74,4 +74,20 @@
71 | 1 ksynth.s 71 | Code | 11 | | 2 | 00/036B : D0 C5 | BNE ozunid_1 ; branch to LOOP
72 | 1 ksynth.s 72 | Code | 11 | | 1 | 00/036D : 60 | ENDSONG RTS ;
73 | 1 ksynth.s 73 | Empty | 11 | | 0 | 00/036E |
74 | 1 ksynth.s 74 | Empty | 11 | | 0 | 00/036E |
75 | 1 ksynth.s 75 | Directive | 11 | | 0 | 00/036E | ORG $1130 ; MIDI lookup table
76 | 1 ksynth.s 76 | Empty | 11 | | 0 | 00/1130 |
77 | 1 ksynth.s 77 | Data | 11 | | 16 | 00/1130 : 00 00 00 FC | HEX 00,00,00,FC,EF,E1,D5,C9,BD,B3,A9,9F,96,8E,86,7E; $1130
| | | | | | EF E1 D5 C9 |
| | | | | | BD B3 A9 9F |
| | | | | | 96 8E 86 7E |
78 | 1 ksynth.s 78 | Data | 11 | | 16 | 00/1140 : 77 71 6A 64 | HEX 77,71,6A,64,5E,59,54,4F,4B,47,43,3F,3C,38,35,32; $1140
| | | | | | 5E 59 54 4F |
| | | | | | 4B 47 43 3F |
| | | | | | 3C 38 35 32 |
79 | 1 ksynth.s 79 | Data | 11 | | 16 | 00/1150 : 2F 2D 2A 27 | HEX 2F,2D,2A,27,25,23,21,1F,1E,1C,1A,19,17,16,15,13; $1150
| | | | | | 25 23 21 1F |
| | | | | | 1E 1C 1A 19 |
| | | | | | 17 16 15 13 |
80 | 1 ksynth.s 80 | Empty | 11 | | 0 | 00/1160 |
------+--------------------+-------------+----+---------+------+-----------------------+-------------------------------------------------------------------