1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
|
#include "common/scummsys.h"
#include "common/endian.h"
#include "common/debug.h"
#include "common/stream.h"
#include "common/util.h"
#include "sound/mods/tfmx.h"
#include "tfmx/tfmxdebug.h"
const char *pattcmds[]={
"End --Next track step--",
"Loop[count / step.w]",
"Cont[patternno./ step.w]",
"Wait[count 00-FF--------",
"Stop--Stop this pattern-",
"Kup^-Set key up/channel]",
"Vibr[speed / rate.b]",
"Enve[speed /endvolume.b]",
"GsPt[patternno./ step.w]",
"RoPt-Return old pattern-",
"Fade[speed /endvolume.b]",
"PPat[patt./track+transp]",
"Lock---------ch./time.b]",
"Cue [number.b/ value.w]",
"Stop-Stop custompattern-",
"NOP!-no operation-------"
};
const char *macrocmds[]={
"DMAoff+Resetxx/xx/xx flag/addset/vol ",
"DMAon (start sample at selected begin) ",
"SetBegin xxxxxx sample-startadress",
"SetLen ..xxxx sample-length ",
"Wait ..xxxx count (VBI''s) ",
"Loop xx/xxxx count/step ",
"Cont xx/xxxx macro-number/step ",
"-------------STOP----------------------",
"AddNote xx/xxxx note/detune ",
"SetNote xx/xxxx note/detune ",
"Reset Vibrato-Portamento-Envelope ",
"Portamento xx/../xx count/speed ",
"Vibrato xx/../xx speed/intensity ",
"AddVolume ....xx volume 00-3F ",
"SetVolume ....xx volume 00-3F ",
"Envelope xx/xx/xx speed/count/endvol",
"Loop key up xx/xxxx count/step ",
"AddBegin xx/xxxx count/add to start",
"AddLen ..xxxx add to sample-len ",
"DMAoff stop sample but no clear ",
"Wait key up ....xx count (VBI''s) ",
"Go submacro xx/xxxx macro-number/step ",
"--------Return to old macro------------",
"Setperiod ..xxxx DMA period ",
"Sampleloop ..xxxx relative adress ",
"-------Set one shot sample-------------",
"Wait on DMA ..xxxx count (Wavecycles)",
"Random play xx/xx/xx macro/speed/mode ",
"Splitkey xx/xxxx key/macrostep ",
"Splitvolume xx/xxxx volume/macrostep ",
"Addvol+note xx/fe/xx note/CONST./volume",
"SetPrevNote xx/xxxx note/detune ",
"Signal xx/xxxx signalnumber/value",
"Play macro xx/.x/xx macro/chan/detune ",
"SID setbeg xxxxxx sample-startadress",
"SID setlen xx/xxxx buflen/sourcelen ",
"SID op3 ofs xxxxxx offset ",
"SID op3 frq xx/xxxx speed/amplitude ",
"SID op2 ofs xxxxxx offset ",
"SID op2 frq xx/xxxx speed/amplitude ",
"SID op1 xx/xx/xx speed/amplitude/TC",
"SID stop xx.... flag (1=clear all)"
};
const char *const trackstepFmt[] = {
"---Stop Player----",
"Loop step/count ",
"Tempo tempo/ciaDiv",
"Timeshare ?/? ",
"Fade start/end "
};
void displayPatternstep(const void *const vptr) {
const byte *const patData = (const byte *const)vptr;
const byte command = patData[0];
if (command < 0xF0) { // Playnote
const byte flags = command >> 6; // 0-1 means note+detune, 2 means wait, 3 means portamento?
char *flagsSt[] = {"Note ", "Note ", "Wait ", "Porta"};
debug("%s %02X%02X%02X%02X", flagsSt[flags], patData[0], patData[1], patData[2], patData[3]);
} else {
debug("%s %02X%02X%02X",pattcmds[command&0xF], patData[1], patData[2], patData[3]);
}
}
void displayTrackstep(const void *const vptr) {
const uint16 *const trackData = (const uint16 *const)vptr;
if (trackData[0] == FROM_BE_16(0xEFFE)) {
// 16 byte Trackstep Command
const uint16 command = READ_BE_UINT16(&trackData[1]);
const uint16 param1 = READ_BE_UINT16(&trackData[2]);
const uint16 param2 = READ_BE_UINT16(&trackData[3]);
if (command >= ARRAYSIZE(trackstepFmt))
debug("Unknown (%04X) : %04X %04X", command, param1, param2);
else
debug("%s: %04X %04X", trackstepFmt[command], param1, param2);
} else {
const byte *const ptr = (const byte *const)vptr;
// 8 commands for Patterns
debug("%02X%02X-%02X%02X-%02X%02X-%02X%02X-%02X%02X-%02X%02X-%02X%02X-%02X%02X",
ptr[0], ptr[1], ptr[2], ptr[3], ptr[4], ptr[5], ptr[6], ptr[7],
ptr[8], ptr[9], ptr[10], ptr[11], ptr[12], ptr[13], ptr[14], ptr[15]);
}
}
void displayMacroStep(const void *const vptr, int chan, int index) {
const byte *const macroData = (const byte *const)vptr;
if (macroData[0] < ARRAYSIZE(macrocmds))
debug("%02X %02X %s %02X%02X%02X", chan, index, macrocmds[macroData[0]], macroData[1], macroData[2], macroData[3]);
else
debug("%02X %02X Unkown Macro #%02X %02X%02X%02X", chan, index, macroData[0], macroData[1], macroData[2], macroData[3]);
}
void displayMacroStep(const void *const vptr) {
const byte *const macroData = (const byte *const)vptr;
if (macroData[0] < ARRAYSIZE(macrocmds))
debug("%s %02X%02X%02X", macrocmds[macroData[0]], macroData[1], macroData[2], macroData[3]);
else
debug("Unkown Macro #%02X %02X%02X%02X", macroData[0], macroData[1], macroData[2], macroData[3]);
}
void dumpTracksteps(Audio::Tfmx &player, uint16 first, uint16 last) {
for ( ; first <= last; ++first) {
displayTrackstep(player._resource.getTrackPtr(first));
}
}
void dumpTrackstepsBySong(Audio::Tfmx &player, int song) {
debug("Song %02X: Pos %02X - %02X. Tempo: %02X", song, player._subsong[song].songstart, player._subsong[song].songend, player._subsong[song].tempo);
dumpTracksteps(player, player._subsong[song].songstart, player._subsong[song].songend);
debug("");
}
void dumpMacro(Audio::Tfmx &player, uint16 macroIndex, uint16 len, uint16 start) {
const uint32 * macroPtr = player._resource.getMacroPtr(player._macroOffset[macroIndex]);
bool untilMacroStop = (len == 0);
while (len--) {
displayMacroStep(macroPtr++);
}
while (untilMacroStop) {
untilMacroStop = *(const byte *)macroPtr != 7;
displayMacroStep(macroPtr++);
}
}
void dumpPattern(Audio::Tfmx &player, uint16 pattIndex, uint16 len, uint16 start) {
const uint32 * pattPtr = player._resource.getPatternPtr(player._patternOffset[pattIndex]);
if (len == 0)
len = (player._patternOffset[pattIndex+1] - player._patternOffset[pattIndex])/4;
bool untilMacroStop = (len == 0);
while (len--) {
displayPatternstep(pattPtr++);
}
while (untilMacroStop) {
byte cmd = *(const byte *)pattPtr;
untilMacroStop = cmd != 0 && cmd != 4;
displayPatternstep(pattPtr++);
}
}
void countAllMacros1(Audio::Tfmx &player, uint16 macroIndex, int *list) {
const uint32 * macroPtr = player._resource.getMacroPtr(player._macroOffset[macroIndex]);
bool untilMacroStop = true;
while (untilMacroStop) {
const int type = *(const byte *)macroPtr++;
untilMacroStop = type != 7;
list[type]++;
}
}
void countAllMacros(Audio::Tfmx &player) {
int list[256] = {0};
for (int i = 0; i < 128; ++i)
countAllMacros1(player, i, list);
byte fakeMacro[4] = {0};
for (int i = 0; i < 256; ++i) {
fakeMacro[0] = (byte)i;
if (list[i] > 0)
displayMacroStep(fakeMacro);
}
}
|
