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
|
#ifndef LOAD_BNK2_H
#define LOAD_BNK2_H
#include "../progs_cache.h"
inline int stdstoi(const std::string& str)
{
return std::atoi(str.c_str());
}
bool BankFormats::LoadBNK2(BanksDump &db, const char *fn, unsigned bank,
const std::string &bankTitle, const char *prefix,
const std::string &melo_filter,
const std::string &perc_filter)
{
#ifdef HARD_BANKS
writeIni("AdLibGold", fn, prefix, bank, INI_Both, melo_filter.c_str(), perc_filter.c_str());
#endif
FILE *fp = std::fopen(fn, "rb");
if(!fp)
return false;
std::fseek(fp, 0, SEEK_END);
std::vector<unsigned char> data(size_t(std::ftell(fp)));
std::rewind(fp);
if(std::fread(&data[0], 1, data.size(), fp) != data.size())
{
std::fclose(fp);
return false;
}
std::fclose(fp);
size_t bankDb = db.initBank(bank, bankTitle, BanksDump::BankEntry::SETUP_Generic);
BanksDump::MidiBank bnkMelodic;
BanksDump::MidiBank bnkPercussion;
unsigned short ins_entries = *(unsigned short *)&data[28 + 2 + 10];
unsigned char *records = &data[48];
for(unsigned n = 0; n < ins_entries; ++n)
{
const size_t offset1 = n * 28;
int used = records[offset1 + 15];
//int attrib = *(int*)&records[offset1 + 16];
int offset2 = *(int *)&records[offset1 + 20];
if(used == 0) continue;
std::string name;
for(unsigned p = 0; p < 12; ++p)
{
if(records[offset1 + 3 + p] == '\0') break;
name += char(records[offset1 + 3 + p]);
}
int gmno = 0;
int patchId = 0;
bool isPercussion = false;
if(name.substr(0, melo_filter.size()) == melo_filter)
{
gmno = patchId = stdstoi(name.substr(melo_filter.size()));
isPercussion = false;
}
else if(name.substr(0, perc_filter.size()) == perc_filter)
{
patchId = stdstoi(name.substr(perc_filter.size()));
gmno = patchId + 128;
isPercussion = true;
}
else
continue;
BanksDump::MidiBank &bnk = isPercussion ? bnkPercussion : bnkMelodic;
const unsigned char *insdata = &data[size_t(offset2)];
const unsigned char *ops[4] = { insdata + 0, insdata + 6, insdata + 12, insdata + 18 };
unsigned char C4xxxFFFC = insdata[24];
unsigned char xxP24NNN = insdata[25];
unsigned char TTTTTTTT = insdata[26];
//unsigned char xxxxxxxx = insdata[27];
char name2[512];
sprintf(name2, "%s%c%u", prefix, (gmno & 128) ? 'P' : 'M', gmno & 127);
BanksDump::InstrumentEntry inst;
BanksDump::Operator opsD[5];
struct insdata tmp[2];
for(unsigned a = 0; a < 2; ++a)
{
tmp[a].data[0] = ops[a * 2 + 0][0];
tmp[a].data[1] = ops[a * 2 + 1][0];
tmp[a].data[2] = ops[a * 2 + 0][2];
tmp[a].data[3] = ops[a * 2 + 1][2];
tmp[a].data[4] = ops[a * 2 + 0][3];
tmp[a].data[5] = ops[a * 2 + 1][3];
tmp[a].data[6] = ops[a * 2 + 0][4] & 0x07;
tmp[a].data[7] = ops[a * 2 + 1][4] & 0x07;
tmp[a].data[8] = ops[a * 2 + 0][1];
tmp[a].data[9] = ops[a * 2 + 1][1];
tmp[a].finetune = (int8_t)TTTTTTTT;
tmp[a].diff = false;
db.toOps(tmp[a], opsD, a * 2);
}
tmp[0].data[10] = C4xxxFFFC & 0x0F;
tmp[1].data[10] = (tmp[0].data[10] & 0x0E) | (C4xxxFFFC >> 7);
ins tmp2;
tmp2.notenum = (gmno & 128) ? 35 : 0;
tmp2.pseudo4op = false;
tmp2.real4op = false;
tmp2.voice2_fine_tune = 0.0;
tmp2.midi_velocity_offset = 0;
tmp2.rhythmModeDrum = 0;
inst.setFbConn(C4xxxFFFC & 0x0F, (tmp[0].data[10] & 0x0E) | (C4xxxFFFC >> 7));
inst.noteOffset1 = (int8_t)TTTTTTTT;
inst.percussionKeyNumber = (gmno & 128) ? 35 : 0;
if(xxP24NNN & 8)
{
// dual-op
tmp2.real4op = true;
tmp[1].diff = true;
size_t resno = InsertIns(tmp[0], tmp[1], tmp2, std::string(1, '\377') + name, name2);
SetBank(bank, (unsigned int)gmno, resno);
inst.instFlags |= BanksDump::InstrumentEntry::WOPL_Ins_4op;
db.addInstrument(bnk, patchId, inst, opsD, fn);
}
else
{
// single-op
size_t resno = InsertIns(tmp[0], tmp2, std::string(1, '\377') + name, name2);
SetBank(bank, (unsigned int)gmno, resno);
db.addInstrument(bnk, patchId, inst, opsD, fn);
}
}
db.addMidiBank(bankDb, false, bnkMelodic);
db.addMidiBank(bankDb, true, bnkPercussion);
AdlBankSetup setup;
setup.volumeModel = VOLUME_Generic;
setup.deepTremolo = false;
setup.deepVibrato = false;
setup.scaleModulators = false;
SetBankSetup(bank, setup);
return true;
}
#endif // LOAD_BNK2_H
|