359
|
1 /*
|
|
2 * Adplug - Replayer for many OPL2/OPL3 audio file formats.
|
|
3 * Copyright (C) 1999, 2000, 2001 Simon Peter, <dn.tlp@gmx.net>, et al.
|
|
4 *
|
|
5 * This library is free software; you can redistribute it and/or
|
|
6 * modify it under the terms of the GNU Lesser General Public
|
|
7 * License as published by the Free Software Foundation; either
|
|
8 * version 2.1 of the License, or (at your option) any later version.
|
|
9 *
|
|
10 * This library is distributed in the hope that it will be useful,
|
|
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
13 * Lesser General Public License for more details.
|
|
14 *
|
|
15 * You should have received a copy of the GNU Lesser General Public
|
|
16 * License along with this library; if not, write to the Free Software
|
|
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
18 *
|
|
19 *
|
|
20 * diskopl.cpp - Disk Writer OPL, by Simon Peter <dn.tlp@gmx.net>
|
|
21 */
|
|
22
|
|
23 #include "diskopl.h"
|
|
24
|
|
25 static const unsigned short note_table[12] = {363,385,408,432,458,485,514,544,577,611,647,686};
|
|
26 static const unsigned char op_table[9] = {0x00, 0x01, 0x02, 0x08, 0x09, 0x0a, 0x10, 0x11, 0x12};
|
|
27
|
|
28 CDiskopl::CDiskopl(std::string filename): old_freq(0.0f), del(1), nowrite(false)
|
|
29 {
|
|
30 unsigned short clock = 0xffff;
|
|
31 f = fopen(filename.c_str(),"wb");
|
|
32 fwrite("RAWADATA",8,1,f);
|
|
33 fwrite(&clock,sizeof(clock),1,f);
|
|
34 }
|
|
35
|
|
36 CDiskopl::~CDiskopl()
|
|
37 {
|
|
38 fclose(f);
|
|
39 }
|
|
40
|
|
41 void CDiskopl::update(CPlayer *p)
|
|
42 {
|
|
43 unsigned short clock;
|
|
44 unsigned int wait;
|
|
45
|
|
46 if(p->getrefresh() != old_freq) {
|
|
47 old_freq = p->getrefresh();
|
|
48 del = wait = (unsigned int)(18.2f / old_freq);
|
|
49 clock = (unsigned short)(1192737/(old_freq*(wait+1)));
|
|
50 fputc(0,f); fputc(2,f);
|
|
51 fwrite(&clock,2,1,f);
|
|
52 }
|
|
53 if(!nowrite) {
|
|
54 fputc(del+1,f);
|
|
55 fputc(0,f);
|
|
56 }
|
|
57 }
|
|
58
|
|
59 void CDiskopl::write(int reg, int val)
|
|
60 {
|
|
61 if(!nowrite)
|
|
62 diskwrite(reg,val);
|
|
63 }
|
|
64
|
|
65 void CDiskopl::init()
|
|
66 {
|
|
67 for (int i=0;i<9;i++) { // stop instruments
|
|
68 diskwrite(0xb0 + i,0); // key off
|
|
69 diskwrite(0x80 + op_table[i],0xff); // fastest release
|
|
70 }
|
|
71 diskwrite(0xbd,0); // clear misc. register
|
|
72 }
|
|
73
|
|
74 void CDiskopl::diskwrite(int reg, int val)
|
|
75 {
|
|
76 fputc(val,f);
|
|
77 fputc(reg,f);
|
|
78 }
|