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
|
/*
* Adplug - Replayer for many OPL2/OPL3 audio file formats.
* Copyright (C) 1999 - 2003 Simon Peter, <dn.tlp@gmx.net>, et al.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* xsm.cpp - eXtra Simple Music Player, by Simon Peter <dn.tlp@gmx.net>
*/
#include <string.h>
#include "xsm.h"
CxsmPlayer::CxsmPlayer(Copl *newopl)
: CPlayer(newopl), music(0)
{
}
CxsmPlayer::~CxsmPlayer()
{
if(music) delete [] music;
}
bool CxsmPlayer::load(const char *filename, const CFileProvider &fp)
{
binistream *f = fp.open(filename); if(!f) return false;
char id[6];
int i, j;
// check if header matches
f->readString(id, 6); songlen = f->readInt(2);
if(strncmp(id, "ofTAZ!", 6) || songlen > 3200) { fp.close(f); return false; }
// read and set instruments
for(i = 0; i < 9; i++) {
opl->write(0x20 + op_table[i], f->readInt(1));
opl->write(0x23 + op_table[i], f->readInt(1));
opl->write(0x40 + op_table[i], f->readInt(1));
opl->write(0x43 + op_table[i], f->readInt(1));
opl->write(0x60 + op_table[i], f->readInt(1));
opl->write(0x63 + op_table[i], f->readInt(1));
opl->write(0x80 + op_table[i], f->readInt(1));
opl->write(0x83 + op_table[i], f->readInt(1));
opl->write(0xe0 + op_table[i], f->readInt(1));
opl->write(0xe3 + op_table[i], f->readInt(1));
opl->write(0xc0 + op_table[i], f->readInt(1));
f->ignore(5);
}
// read song data
music = new char [songlen * 9];
for(i = 0; i < 9; i++)
for(j = 0; j < songlen; j++)
music[j * 9 + i] = f->readInt(1);
// success
fp.close(f);
rewind(0);
return true;
}
bool CxsmPlayer::update()
{
int c;
if(notenum >= songlen) {
songend = true;
notenum = last = 0;
}
for(c = 0; c < 9; c++)
if(music[notenum * 9 + c] != music[last * 9 + c])
opl->write(0xb0 + c, 0);
for(c = 0; c < 9; c++) {
if(music[notenum * 9 + c])
play_note(c, music[notenum * 9 + c] % 12, music[notenum * 9 + c] / 12);
else
play_note(c, 0, 0);
}
last = notenum;
notenum++;
return !songend;
}
void CxsmPlayer::rewind(int subsong)
{
notenum = last = 0;
songend = false;
}
float CxsmPlayer::getrefresh()
{
return 5.0f;
}
void CxsmPlayer::play_note(int c, int note, int octv)
{
int freq = note_table[note];
if(!note && !octv) freq = 0;
opl->write(0xa0 + c, freq & 0xff);
opl->write(0xb0 + c, (freq / 0xff) | 32 | (octv * 4));
}
|