comparison Plugins/Input/adplug/core/flash.cxx @ 1713:a4d7227231e3 trunk

[svn] More .cpp -> .cxx. Noticed by Chainsaw. Shame on me that I forgot some ;).
author js
date Sat, 16 Sep 2006 07:33:28 -0700
parents Plugins/Input/adplug/core/flash.cpp@705d4c089fce
children
comparison
equal deleted inserted replaced
1712:2e7c9f6d9923 1713:a4d7227231e3
1 /*
2 * Adplug - Replayer for many OPL2/OPL3 audio file formats.
3 * Copyright (C) 1999 - 2003 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
18 *
19 * [xad] FLASH player, by Riven the Mage <riven@ok.ru>
20 */
21
22 /*
23 - discovery -
24
25 file(s) : LA-INTRO.EXE
26 type : Lunatic Asylum BBStro
27 tune : by Rogue [Logic Design]
28 player : by Flash [Logic Design]
29 */
30
31 #include "flash.h"
32 #include "debug.h"
33
34 const unsigned char CxadflashPlayer::flash_adlib_registers[99] =
35 {
36 0x23, 0x20, 0x43, 0x40, 0x63, 0x60, 0x83, 0x80, 0xC0, 0xE3, 0xE0,
37 0x24, 0x21, 0x44, 0x41, 0x64, 0x61, 0x84, 0x81, 0xC1, 0xE4, 0xE1,
38 0x25, 0x22, 0x45, 0x42, 0x65, 0x62, 0x85, 0x82, 0xC2, 0xE5, 0xE2,
39 0x2B, 0x28, 0x4B, 0x48, 0x6B, 0x68, 0x8B, 0x88, 0xC3, 0xEB, 0xE8,
40 0x2C, 0x29, 0x4C, 0x49, 0x6C, 0x69, 0x8C, 0x89, 0xC4, 0xEC, 0xE9,
41 0x2D, 0x2A, 0x4D, 0x4A, 0x6D, 0x6A, 0x8D, 0x8A, 0xC5, 0xED, 0xEA,
42 0x33, 0x30, 0x53, 0x50, 0x73, 0x70, 0x93, 0x90, 0xC6, 0xF3, 0xF0,
43 0x34, 0x31, 0x54, 0x51, 0x74, 0x71, 0x94, 0x91, 0xC7, 0xF4, 0xF1,
44 0x35, 0x32, 0x55, 0x52, 0x75, 0x72, 0x95, 0x92, 0xC8, 0xF5, 0xF2
45 };
46
47 const unsigned short CxadflashPlayer::flash_notes_encoded[268] =
48 {
49 0x000,
50 0x100, 0x200, 0x300, 0x400, 0x500, 0x600, 0x700, 0x800, 0x900, 0xA00, 0xB00, 0xC00,
51 0x101, 0x201, 0x301, 0x401, 0x501, 0x601, 0x701, 0x801, 0x901, 0xA01, 0xB01, 0xC01,
52 0x102, 0x202, 0x302, 0x402, 0x502, 0x602, 0x702, 0x802, 0x902, 0xA02, 0xB02, 0xC02,
53 0x103, 0x203, 0x303, 0x403, 0x503, 0x603, 0x703, 0x803, 0x903, 0xA03, 0xB03, 0xC03,
54 0x104, 0x204, 0x304, 0x404, 0x504, 0x604, 0x704, 0x804, 0x904, 0xA04, 0xB04, 0xC04,
55 0x105, 0x205, 0x305, 0x405, 0x505, 0x605, 0x705, 0x805, 0x905, 0xA05, 0xB05, 0xC05,
56 0x106, 0x206, 0x306, 0x406, 0x506, 0x606, 0x706, 0x806, 0x906, 0xA06, 0xB06, 0xC06,
57 0x107, 0x207, 0x307, 0x407, 0x507, 0x607, 0x707, 0x807, 0x907, 0xA07, 0xB07, 0xC07,
58 0x108, 0x208, 0x308, 0x408, 0x508, 0x608, 0x708, 0x808, 0x908, 0xA08, 0xB08, 0xC08,
59 0x109, 0x209, 0x309, 0x409, 0x509, 0x609, 0x709, 0x809, 0x909, 0xA09, 0xB09, 0xC09,
60 0x10A, 0x20A, 0x30A, 0x40A, 0x50A, 0x60A, 0x70A, 0x80A, 0x90A, 0xA0A, 0xB0A, 0xC0A,
61 0x10B, 0x20B, 0x30B, 0x40B, 0x50B, 0x60B, 0x70B, 0x80B, 0x90B, 0xA0B, 0xB0B, 0xC0B,
62 0x10C, 0x20C, 0x30C, 0x40C, 0x50C, 0x60C, 0x70C, 0x80C, 0x90C, 0xA0C, 0xB0C, 0xC0C,
63 0x10D, 0x20D, 0x30D, 0x40D, 0x50D, 0x60D, 0x70D, 0x80D, 0x90D, 0xA0D, 0xB0D, 0xC0D,
64 0x10E, 0x20E, 0x30E, 0x40E, 0x50E, 0x60E, 0x70E, 0x80E, 0x90E, 0xA0E, 0xB0E, 0xC0E,
65 0x10F, 0x20F, 0x30F, 0x40F, 0x50F, 0x60F, 0x70F, 0x80F, 0x90F, 0xA0F, 0xB0F, 0xC0F,
66 0x110, 0x210, 0x310, 0x410, 0x510, 0x610, 0x710, 0x810, 0x910, 0xA10, 0xB10, 0xC10,
67 0x111, 0x211, 0x311, 0x411, 0x511, 0x611, 0x711, 0x811, 0x911, 0xA11, 0xB11, 0xC11,
68 0x112, 0x212, 0x312, 0x412, 0x512, 0x612, 0x712, 0x812, 0x912, 0xA12, 0xB12, 0xC12,
69 0x113, 0x213, 0x313, 0x413, 0x513, 0x613, 0x713, 0x813, 0x913, 0xA13, 0xB13, 0xC13,
70 0x114, 0x214, 0x314, 0x414, 0x514, 0x614, 0x714, 0x814, 0x914, 0xA14, 0xB14, 0xC14,
71 0x115, 0x215, 0x315
72 };
73
74 const unsigned short CxadflashPlayer::flash_notes[12] =
75 {
76 0x157, 0x16B, 0x181, 0x198, 0x1B0, 0x1CA, 0x1E5, 0x202, 0x220, 0x241, 0x263, 0x287
77 };
78
79 const unsigned char CxadflashPlayer::flash_default_instrument[8] =
80 {
81 0x00, 0x00, 0x3F, 0x3F, 0xFF, 0xFF, 0xFF, 0xFF
82 };
83
84 CPlayer *CxadflashPlayer::factory(Copl *newopl)
85 {
86 return new CxadflashPlayer(newopl);
87 }
88
89 void CxadflashPlayer::xadplayer_rewind(int subsong)
90 {
91 int i;
92
93 plr.speed = xad.speed;
94
95 flash.order_pos = 0;
96 flash.pattern_pos = 0;
97
98 opl_write(0x08, 0x00);
99 opl_write(0xBD, 0x00);
100
101 // assign default instrument
102 for(i=0; i<9; i++)
103 {
104 opl_write(0xA0+i, 0x00);
105 opl_write(0xB0+i, 0x00);
106 }
107
108 // assign instruments
109 for(i=0; i<9; i++)
110 for(int j=0; j<11; j++)
111 opl_write(flash_adlib_registers[i*11+j], tune[i*12+j]);
112 }
113
114 void CxadflashPlayer::xadplayer_update()
115 {
116 unsigned short event_pos = (tune[0x600+flash.order_pos]*1152) + \
117 (flash.pattern_pos*18) + \
118 0x633;
119
120 for (int i=0; i<9; i++)
121 {
122 unsigned short flash_channel_freq = (adlib[0xB0+i] << 8) + adlib[0xA0+i];
123
124 unsigned char event_b0 = tune[event_pos++];
125 unsigned char event_b1 = tune[event_pos++];
126 #ifdef DEBUG
127 AdPlug_LogWrite("channel %02X, event %02X %02X:\n",i+1,event_b0,event_b1);
128 #endif
129
130 if (event_b0 == 0x80) // 0.0x80: Set Instrument
131 {
132 for(int j=0; j<11; j++)
133 opl_write(flash_adlib_registers[i*11+j], tune[event_b1*12+j]);
134 }
135 else
136 {
137 if (event_b1 == 0x01)
138 flash.pattern_pos = 0x3F; // 1.0x01: Pattern Break
139
140 unsigned char fx = (event_b1 >> 4);
141 unsigned char fx_p = (event_b1 & 0x0F);
142
143 switch(fx)
144 {
145 case 0x0A: // 1.0xAy: Set Carrier volume
146 opl_write(flash_adlib_registers[11*i+2], fx_p << 2);
147 break;
148 case 0x0B: // 1.0xBy: Set Modulator volume
149 opl_write(flash_adlib_registers[11*i+3], fx_p << 2);
150 break;
151 case 0x0C: // 1.0xCy: Set both operators volume
152 opl_write(flash_adlib_registers[11*i+2], fx_p << 2);
153 opl_write(flash_adlib_registers[11*i+3], fx_p << 2);
154 break;
155 // case 0x0E: // 1.0xEy: ? (increase some value)
156 case 0x0F: // 1.0xFy: Set Speed
157 plr.speed = (fx_p + 1);
158 break;
159 }
160
161 if (event_b0)
162 {
163 // mute channel
164 opl_write(0xA0+i, adlib[0xA0+i]);
165 opl_write(0xB0+i, adlib[0xB0+i] & 0xDF);
166
167 // is note ?
168 if (event_b0 != 0x7F)
169 {
170 unsigned short note_encoded = flash_notes_encoded[event_b0];
171 unsigned short freq = flash_notes[(note_encoded >> 8) - 1];
172
173 flash_channel_freq = freq | ((note_encoded & 0xFF) << 10) | 0x2000;
174
175 opl_write(0xA0+i, flash_channel_freq & 0xFF);
176 opl_write(0xB0+i, flash_channel_freq >> 8);
177 }
178 }
179
180 if (fx == 0x01) // 1.0x1y: Fine Frequency Slide Up
181 {
182 flash_channel_freq += (fx_p << 1);
183
184 opl_write(0xA0+i, flash_channel_freq & 0xFF);
185 opl_write(0xB0+i, flash_channel_freq >> 8);
186 }
187 else if (fx == 0x02) // 1.0x2y: Fine Frequency Slide Down
188 {
189 flash_channel_freq -= (fx_p << 1);
190
191 opl_write(0xA0+i, flash_channel_freq & 0xFF);
192 opl_write(0xB0+i, flash_channel_freq >> 8);
193 }
194 }
195 }
196
197 // next row
198 flash.pattern_pos++;
199
200 // end of pattern ?
201 if (flash.pattern_pos >= 0x40)
202 {
203 flash.pattern_pos = 0;
204
205 flash.order_pos++;
206
207 // end of module ?
208 if (tune[0x600+flash.order_pos] == 0xFF)
209 {
210 flash.order_pos = 0;
211
212 plr.looping = 1;
213 }
214 }
215 }
216
217 float CxadflashPlayer::xadplayer_getrefresh()
218 {
219 return 17.5f;
220 }
221
222 std::string CxadflashPlayer::xadplayer_gettype()
223 {
224 return std::string("xad: flash player");
225 }
226
227 unsigned int CxadflashPlayer::xadplayer_getinstruments()
228 {
229 return 32;
230 }