ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/Frodo4/Src/SID.cpp
Revision: 1.2
Committed: 2003-07-01T17:51:17Z (20 years, 9 months ago) by cebix
Branch: MAIN
Changes since 1.1: +1 -1 lines
Log Message: 
updated copyright date

File Contents

# Content
1 /*
2 * SID.cpp - 6581 emulation
3 *
4 * Frodo (C) 1994-1997,2002-2003 Christian Bauer
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21 /*
22 * Incompatibilities:
23 * ------------------
24 *
25 * - Lots of empirically determined constants in the filter calculations
26 * - Voice 3 cannot be muted
27 */
28
29 #include "sysdeps.h"
30 #include <math.h>
31
32 #include "SID.h"
33 #include "Prefs.h"
34
35 #ifdef __BEOS__
36 #include <MediaKit.h>
37 #endif
38
39 #ifdef AMIGA
40 #include <exec/types.h>
41 #include <utility/hooks.h>
42 #include <devices/ahi.h>
43 #define USE_FIXPOINT_MATHS
44 #define FIXPOINT_PREC 16 // number of fractional bits used in fixpoint representation
45 #define PRECOMPUTE_RESONANCE
46 #define ldSINTAB 9 // size of sinus table (0 to 90 degrees)
47 #endif
48
49 #ifdef SUN
50 extern "C" {
51 #include <sys/audioio.h>
52 }
53 #endif
54
55 #ifdef __hpux
56 extern "C" {
57 #include <sys/audio.h>
58 }
59 #endif
60
61 #ifdef __mac__
62 #include <Sound.h>
63 #define M_PI 3.14159265358979323846
64 #endif
65
66 #ifdef WIN32
67 class DigitalPlayer;
68 #endif
69
70 #ifdef __riscos__
71 #include "ROLib.h"
72 # ifndef M_PI
73 # define M_PI 3.14159265358979323846
74 # endif
75 #define USE_FIXPOINT_MATHS
76 #define FIXPOINT_PREC 16 // number of fractional bits used in fixpoint representation
77 #define PRECOMPUTE_RESONANCE
78 #define ldSINTAB 9 // size of sinus table (0 to 90 degrees)
79 #endif
80
81
82 #ifdef USE_FIXPOINT_MATHS
83 #include "FixPoint.h"
84 #endif
85
86
87 /*
88 * Resonance frequency polynomials
89 */
90
91 #define CALC_RESONANCE_LP(f) (227.755\
92 - 1.7635 * f\
93 - 0.0176385 * f * f\
94 + 0.00333484 * f * f * f\
95 - 9.05683E-6 * f * f * f * f)
96
97 #define CALC_RESONANCE_HP(f) (366.374\
98 - 14.0052 * f\
99 + 0.603212 * f * f\
100 - 0.000880196 * f * f * f)
101
102
103 /*
104 * Random number generator for noise waveform
105 */
106
107 static uint8 sid_random(void);
108 static uint8 sid_random(void)
109 {
110 static uint32 seed = 1;
111 seed = seed * 1103515245 + 12345;
112 return seed >> 16;
113 }
114
115
116 /*
117 * Constructor
118 */
119
120 MOS6581::MOS6581(C64 *c64) : the_c64(c64)
121 {
122 the_renderer = NULL;
123 for (int i=0; i<32; i++)
124 regs[i] = 0;
125
126 // Open the renderer
127 open_close_renderer(SIDTYPE_NONE, ThePrefs.SIDType);
128 }
129
130
131 /*
132 * Destructor
133 */
134
135 MOS6581::~MOS6581()
136 {
137 // Close the renderer
138 open_close_renderer(ThePrefs.SIDType, SIDTYPE_NONE);
139 }
140
141
142 /*
143 * Reset the SID
144 */
145
146 void MOS6581::Reset(void)
147 {
148 for (int i=0; i<32; i++)
149 regs[i] = 0;
150 last_sid_byte = 0;
151
152 // Reset the renderer
153 if (the_renderer != NULL)
154 the_renderer->Reset();
155 }
156
157
158 /*
159 * Preferences may have changed
160 */
161
162 void MOS6581::NewPrefs(Prefs *prefs)
163 {
164 open_close_renderer(ThePrefs.SIDType, prefs->SIDType);
165 if (the_renderer != NULL)
166 the_renderer->NewPrefs(prefs);
167 }
168
169
170 /*
171 * Pause sound output
172 */
173
174 void MOS6581::PauseSound(void)
175 {
176 if (the_renderer != NULL)
177 the_renderer->Pause();
178 }
179
180
181 /*
182 * Resume sound output
183 */
184
185 void MOS6581::ResumeSound(void)
186 {
187 if (the_renderer != NULL)
188 the_renderer->Resume();
189 }
190
191
192 /*
193 * Get SID state
194 */
195
196 void MOS6581::GetState(MOS6581State *ss)
197 {
198 ss->freq_lo_1 = regs[0];
199 ss->freq_hi_1 = regs[1];
200 ss->pw_lo_1 = regs[2];
201 ss->pw_hi_1 = regs[3];
202 ss->ctrl_1 = regs[4];
203 ss->AD_1 = regs[5];
204 ss->SR_1 = regs[6];
205
206 ss->freq_lo_2 = regs[7];
207 ss->freq_hi_2 = regs[8];
208 ss->pw_lo_2 = regs[9];
209 ss->pw_hi_2 = regs[10];
210 ss->ctrl_2 = regs[11];
211 ss->AD_2 = regs[12];
212 ss->SR_2 = regs[13];
213
214 ss->freq_lo_3 = regs[14];
215 ss->freq_hi_3 = regs[15];
216 ss->pw_lo_3 = regs[16];
217 ss->pw_hi_3 = regs[17];
218 ss->ctrl_3 = regs[18];
219 ss->AD_3 = regs[19];
220 ss->SR_3 = regs[20];
221
222 ss->fc_lo = regs[21];
223 ss->fc_hi = regs[22];
224 ss->res_filt = regs[23];
225 ss->mode_vol = regs[24];
226
227 ss->pot_x = 0xff;
228 ss->pot_y = 0xff;
229 ss->osc_3 = 0;
230 ss->env_3 = 0;
231 }
232
233
234 /*
235 * Restore SID state
236 */
237
238 void MOS6581::SetState(MOS6581State *ss)
239 {
240 regs[0] = ss->freq_lo_1;
241 regs[1] = ss->freq_hi_1;
242 regs[2] = ss->pw_lo_1;
243 regs[3] = ss->pw_hi_1;
244 regs[4] = ss->ctrl_1;
245 regs[5] = ss->AD_1;
246 regs[6] = ss->SR_1;
247
248 regs[7] = ss->freq_lo_2;
249 regs[8] = ss->freq_hi_2;
250 regs[9] = ss->pw_lo_2;
251 regs[10] = ss->pw_hi_2;
252 regs[11] = ss->ctrl_2;
253 regs[12] = ss->AD_2;
254 regs[13] = ss->SR_2;
255
256 regs[14] = ss->freq_lo_3;
257 regs[15] = ss->freq_hi_3;
258 regs[16] = ss->pw_lo_3;
259 regs[17] = ss->pw_hi_3;
260 regs[18] = ss->ctrl_3;
261 regs[19] = ss->AD_3;
262 regs[20] = ss->SR_3;
263
264 regs[21] = ss->fc_lo;
265 regs[22] = ss->fc_hi;
266 regs[23] = ss->res_filt;
267 regs[24] = ss->mode_vol;
268
269 // Stuff the new register values into the renderer
270 if (the_renderer != NULL)
271 for (int i=0; i<25; i++)
272 the_renderer->WriteRegister(i, regs[i]);
273 }
274
275
276 /**
277 ** Renderer for digital SID emulation (SIDTYPE_DIGITAL)
278 **/
279
280 #if defined(AMIGA) || defined(__riscos__)
281 const uint32 SAMPLE_FREQ = 22050; // Sample output frequency in Hz
282 #else
283 const uint32 SAMPLE_FREQ = 44100; // Sample output frequency in Hz
284 #endif
285 const uint32 SID_FREQ = 985248; // SID frequency in Hz
286 const uint32 CALC_FREQ = 50; // Frequency at which calc_buffer is called in Hz (should be 50Hz)
287 const uint32 SID_CYCLES = SID_FREQ/SAMPLE_FREQ; // # of SID clocks per sample frame
288 const int SAMPLE_BUF_SIZE = 0x138*2;// Size of buffer for sampled voice (double buffered)
289
290 // SID waveforms (some of them :-)
291 enum {
292 WAVE_NONE,
293 WAVE_TRI,
294 WAVE_SAW,
295 WAVE_TRISAW,
296 WAVE_RECT,
297 WAVE_TRIRECT,
298 WAVE_SAWRECT,
299 WAVE_TRISAWRECT,
300 WAVE_NOISE
301 };
302
303 // EG states
304 enum {
305 EG_IDLE,
306 EG_ATTACK,
307 EG_DECAY,
308 EG_RELEASE
309 };
310
311 // Filter types
312 enum {
313 FILT_NONE,
314 FILT_LP,
315 FILT_BP,
316 FILT_LPBP,
317 FILT_HP,
318 FILT_NOTCH,
319 FILT_HPBP,
320 FILT_ALL
321 };
322
323 // Structure for one voice
324 struct DRVoice {
325 int wave; // Selected waveform
326 int eg_state; // Current state of EG
327 DRVoice *mod_by; // Voice that modulates this one
328 DRVoice *mod_to; // Voice that is modulated by this one
329
330 uint32 count; // Counter for waveform generator, 8.16 fixed
331 uint32 add; // Added to counter in every frame
332
333 uint16 freq; // SID frequency value
334 uint16 pw; // SID pulse-width value
335
336 uint32 a_add; // EG parameters
337 uint32 d_sub;
338 uint32 s_level;
339 uint32 r_sub;
340 uint32 eg_level; // Current EG level, 8.16 fixed
341
342 uint32 noise; // Last noise generator output value
343
344 bool gate; // EG gate bit
345 bool ring; // Ring modulation bit
346 bool test; // Test bit
347 bool filter; // Flag: Voice filtered
348
349 // The following bit is set for the modulating
350 // voice, not for the modulated one (as the SID bits)
351 bool sync; // Sync modulation bit
352 };
353
354 // Renderer class
355 class DigitalRenderer : public SIDRenderer {
356 public:
357 #if defined(__BEOS__) || defined(__riscos__)
358 DigitalRenderer(C64 *c64);
359 #else
360 DigitalRenderer();
361 #endif
362 virtual ~DigitalRenderer();
363
364 virtual void Reset(void);
365 virtual void EmulateLine(void);
366 virtual void WriteRegister(uint16 adr, uint8 byte);
367 virtual void NewPrefs(Prefs *prefs);
368 virtual void Pause(void);
369 virtual void Resume(void);
370
371 private:
372 void init_sound(void);
373 void calc_filter(void);
374 #ifdef __riscos__
375 void calc_buffer(uint8 *buf, long count);
376 #else
377 void calc_buffer(int16 *buf, long count);
378 #endif
379
380 bool ready; // Flag: Renderer has initialized and is ready
381 uint8 volume; // Master volume
382 bool v3_mute; // Voice 3 muted
383
384 static uint16 TriTable[0x1000*2]; // Tables for certain waveforms
385 static const uint16 TriSawTable[0x100];
386 static const uint16 TriRectTable[0x100];
387 static const uint16 SawRectTable[0x100];
388 static const uint16 TriSawRectTable[0x100];
389 static const uint32 EGTable[16]; // Increment/decrement values for all A/D/R settings
390 static const uint8 EGDRShift[256]; // For exponential approximation of D/R
391 static const int16 SampleTab[16]; // Table for sampled voice
392
393 DRVoice voice[3]; // Data for 3 voices
394
395 uint8 f_type; // Filter type
396 uint8 f_freq; // SID filter frequency (upper 8 bits)
397 uint8 f_res; // Filter resonance (0..15)
398 #ifdef USE_FIXPOINT_MATHS
399 FixPoint f_ampl;
400 FixPoint d1, d2, g1, g2;
401 int32 xn1, xn2, yn1, yn2; // can become very large
402 FixPoint sidquot;
403 #ifdef PRECOMPUTE_RESONANCE
404 FixPoint resonanceLP[256];
405 FixPoint resonanceHP[256];
406 #endif
407 #else
408 float f_ampl; // IIR filter input attenuation
409 float d1, d2, g1, g2; // IIR filter coefficients
410 float xn1, xn2, yn1, yn2; // IIR filter previous input/output signal
411 #ifdef PRECOMPUTE_RESONANCE
412 float resonanceLP[256]; // shortcut for calc_filter
413 float resonanceHP[256];
414 #endif
415 #endif
416
417 uint8 sample_buf[SAMPLE_BUF_SIZE]; // Buffer for sampled voice
418 int sample_in_ptr; // Index in sample_buf for writing
419
420 #ifdef __BEOS__
421 static bool stream_func(void *arg, char *buf, size_t count, void *header);
422 C64 *the_c64; // Pointer to C64 object
423 BDACStream *the_stream; // Pointer to stream
424 BSubscriber *the_sub; // Pointer to subscriber
425 bool in_stream; // Flag: Subscriber has entered stream
426 #endif
427
428 #ifdef AMIGA
429 static void sub_invoc(void); // Sound sub-process
430 void sub_func(void);
431 struct Process *sound_process;
432 int quit_sig, pause_sig,
433 resume_sig, ahi_sig; // Sub-process signals
434 struct Task *main_task; // Main task
435 int main_sig; // Main task signals
436 static ULONG sound_func(void); // AHI callback
437 struct MsgPort *ahi_port; // Port and IORequest for AHI
438 struct AHIRequest *ahi_io;
439 struct AHIAudioCtrl *ahi_ctrl; // AHI control structure
440 struct AHISampleInfo sample[2]; // SampleInfos for double buffering
441 struct Hook sf_hook; // Hook for callback function
442 int play_buf; // Number of buffer currently playing
443 #endif
444
445 #ifdef __linux__
446 int devfd, sndbufsize, buffer_rate;
447 int16 *sound_buffer;
448 #endif
449
450 #ifdef SUN
451 int fd;
452 audio_info status;
453 uint_t sent_samples,delta_samples;
454 WORD *sound_calc_buf;
455 #endif
456
457 #ifdef __hpux
458 int fd;
459 audio_status status;
460 int16 * sound_calc_buf;
461 int linecnt;
462 #endif
463
464 #ifdef __mac__
465 SndChannelPtr chan1;
466 SndDoubleBufferHeader myDblHeader;
467 SndDoubleBufferPtr sampleBuffer1, sampleBuffer2;
468 SCStatus myStatus;
469 short sndbufsize;
470 OSErr err;
471
472 static void doubleBackProc(SndChannelPtr chan, SndDoubleBufferPtr doubleBuffer);
473 #endif
474
475 #ifdef WIN32
476 public:
477 void VBlank(void);
478
479 private:
480 void StartPlayer(void);
481 void StopPlayer(void);
482
483 BOOL direct_sound;
484 DigitalPlayer *ThePlayer;
485 SWORD *sound_buffer;
486 int to_output;
487 int sb_pos;
488 int divisor;
489 int *lead;
490 int lead_pos;
491 #endif
492
493 #ifdef __riscos__
494 int linecnt, sndbufsize;
495 uint8 *sound_buffer;
496 C64 *the_c64;
497 #endif
498 };
499
500 // Static data members
501 uint16 DigitalRenderer::TriTable[0x1000*2];
502
503 #ifndef EMUL_MOS8580
504 // Sampled from a 6581R4
505 const uint16 DigitalRenderer::TriSawTable[0x100] = {
506 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
507 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
508 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
509 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
510 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
511 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
512 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
513 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0808,
514 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
515 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
516 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
517 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
518 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
519 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
520 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
521 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x1010, 0x3C3C,
522 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
523 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
524 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
525 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
526 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
527 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
528 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
529 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0808,
530 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
531 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
532 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
533 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
534 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
535 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
536 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
537 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x1010, 0x3C3C
538 };
539
540 const uint16 DigitalRenderer::TriRectTable[0x100] = {
541 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
542 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
543 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
544 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
545 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
546 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
547 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
548 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
549 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
550 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
551 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
552 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x8080,
553 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
554 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x8080,
555 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x8080, 0xC0C0,
556 0x0000, 0x8080, 0x8080, 0xE0E0, 0x8080, 0xE0E0, 0xF0F0, 0xFCFC,
557 0xFFFF, 0xFCFC, 0xFAFA, 0xF0F0, 0xF6F6, 0xE0E0, 0xE0E0, 0x8080,
558 0xEEEE, 0xE0E0, 0xE0E0, 0x8080, 0xC0C0, 0x0000, 0x0000, 0x0000,
559 0xDEDE, 0xC0C0, 0xC0C0, 0x0000, 0x8080, 0x0000, 0x0000, 0x0000,
560 0x8080, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
561 0xBEBE, 0x8080, 0x8080, 0x0000, 0x8080, 0x0000, 0x0000, 0x0000,
562 0x8080, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
563 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
564 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
565 0x7E7E, 0x4040, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
566 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
567 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
568 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
569 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
570 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
571 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
572 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000
573 };
574
575 const uint16 DigitalRenderer::SawRectTable[0x100] = {
576 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
577 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
578 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
579 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
580 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
581 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
582 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
583 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
584 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
585 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
586 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
587 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
588 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
589 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
590 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
591 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x7878,
592 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
593 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
594 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
595 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
596 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
597 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
598 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
599 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
600 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
601 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
602 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
603 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
604 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
605 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
606 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
607 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x7878
608 };
609
610 const uint16 DigitalRenderer::TriSawRectTable[0x100] = {
611 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
612 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
613 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
614 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
615 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
616 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
617 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
618 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
619 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
620 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
621 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
622 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
623 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
624 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
625 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
626 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
627 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
628 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
629 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
630 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
631 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
632 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
633 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
634 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
635 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
636 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
637 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
638 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
639 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
640 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
641 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
642 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000
643 };
644 #else
645 // Sampled from an 8580R5
646 const uint16 DigitalRenderer::TriSawTable[0x100] = {
647 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
648 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
649 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
650 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
651 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
652 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
653 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
654 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0808,
655 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
656 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
657 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
658 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
659 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
660 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
661 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
662 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x1818, 0x3C3C,
663 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
664 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
665 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
666 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
667 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
668 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
669 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
670 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x1C1C,
671 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
672 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
673 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
674 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
675 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
676 0x0000, 0x0000, 0x0000, 0x0000, 0x8080, 0x0000, 0x8080, 0x8080,
677 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0xE0E0,
678 0xF0F0, 0xF0F0, 0xF0F0, 0xF0F0, 0xF8F8, 0xF8F8, 0xFCFC, 0xFEFE
679 };
680
681 const uint16 DigitalRenderer::TriRectTable[0x100] = {
682 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
683 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
684 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
685 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
686 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
687 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
688 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
689 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
690 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
691 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
692 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
693 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
694 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
695 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
696 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
697 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
698 0xFFFF, 0xFCFC, 0xF8F8, 0xF0F0, 0xF4F4, 0xF0F0, 0xF0F0, 0xE0E0,
699 0xECEC, 0xE0E0, 0xE0E0, 0xC0C0, 0xE0E0, 0xC0C0, 0xC0C0, 0xC0C0,
700 0xDCDC, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0x8080, 0x8080,
701 0xC0C0, 0x8080, 0x8080, 0x8080, 0x8080, 0x8080, 0x0000, 0x0000,
702 0xBEBE, 0xA0A0, 0x8080, 0x8080, 0x8080, 0x8080, 0x8080, 0x0000,
703 0x8080, 0x8080, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
704 0x8080, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
705 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
706 0x7E7E, 0x7070, 0x6060, 0x0000, 0x4040, 0x0000, 0x0000, 0x0000,
707 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
708 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
709 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
710 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
711 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
712 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
713 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000
714 };
715
716 const uint16 DigitalRenderer::SawRectTable[0x100] = {
717 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
718 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
719 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
720 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
721 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
722 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
723 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
724 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
725 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
726 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
727 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
728 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
729 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
730 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
731 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
732 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
733 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
734 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
735 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
736 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
737 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
738 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x8080,
739 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x8080, 0x8080,
740 0x0000, 0x8080, 0x8080, 0x8080, 0x8080, 0x8080, 0xB0B0, 0xBEBE,
741 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x8080,
742 0x0000, 0x0000, 0x0000, 0x8080, 0x8080, 0x8080, 0x8080, 0xC0C0,
743 0x0000, 0x8080, 0x8080, 0x8080, 0x8080, 0x8080, 0x8080, 0xC0C0,
744 0x8080, 0x8080, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0xDCDC,
745 0x8080, 0x8080, 0x8080, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0, 0xC0C0,
746 0xC0C0, 0xC0C0, 0xC0C0, 0xE0E0, 0xE0E0, 0xE0E0, 0xE0E0, 0xECEC,
747 0xC0C0, 0xE0E0, 0xE0E0, 0xE0E0, 0xE0E0, 0xF0F0, 0xF0F0, 0xF4F4,
748 0xF0F0, 0xF0F0, 0xF8F8, 0xF8F8, 0xF8F8, 0xFCFC, 0xFEFE, 0xFFFF
749 };
750
751 const uint16 DigitalRenderer::TriSawRectTable[0x100] = {
752 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
753 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
754 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
755 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
756 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
757 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
758 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
759 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
760 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
761 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
762 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
763 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
764 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
765 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
766 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
767 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
768 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
769 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
770 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
771 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
772 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
773 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
774 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
775 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
776 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
777 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
778 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
779 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
780 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
781 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x8080, 0x8080,
782 0x8080, 0x8080, 0x8080, 0x8080, 0x8080, 0x8080, 0xC0C0, 0xC0C0,
783 0xC0C0, 0xC0C0, 0xE0E0, 0xE0E0, 0xE0E0, 0xF0F0, 0xF8F8, 0xFCFC
784 };
785 #endif
786
787 const uint32 DigitalRenderer::EGTable[16] = {
788 (SID_CYCLES << 16) / 9, (SID_CYCLES << 16) / 32,
789 (SID_CYCLES << 16) / 63, (SID_CYCLES << 16) / 95,
790 (SID_CYCLES << 16) / 149, (SID_CYCLES << 16) / 220,
791 (SID_CYCLES << 16) / 267, (SID_CYCLES << 16) / 313,
792 (SID_CYCLES << 16) / 392, (SID_CYCLES << 16) / 977,
793 (SID_CYCLES << 16) / 1954, (SID_CYCLES << 16) / 3126,
794 (SID_CYCLES << 16) / 3906, (SID_CYCLES << 16) / 11720,
795 (SID_CYCLES << 16) / 19531, (SID_CYCLES << 16) / 31251
796 };
797
798 const uint8 DigitalRenderer::EGDRShift[256] = {
799 5,5,5,5,5,5,5,5,4,4,4,4,4,4,4,4,
800 3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,
801 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
802 2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,
803 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
804 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
805 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
806 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
807 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
808 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
809 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
810 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
811 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
812 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
813 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
814 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
815 };
816
817 const int16 DigitalRenderer::SampleTab[16] = {
818 0x8000, 0x9111, 0xa222, 0xb333, 0xc444, 0xd555, 0xe666, 0xf777,
819 0x0888, 0x1999, 0x2aaa, 0x3bbb, 0x4ccc, 0x5ddd, 0x6eee, 0x7fff,
820 };
821
822
823 /*
824 * Constructor
825 */
826
827 #if defined(__BEOS__) || defined(__riscos__)
828 DigitalRenderer::DigitalRenderer(C64 *c64) : the_c64(c64)
829 #else
830 DigitalRenderer::DigitalRenderer()
831 #endif
832 {
833 // Link voices together
834 voice[0].mod_by = &voice[2];
835 voice[1].mod_by = &voice[0];
836 voice[2].mod_by = &voice[1];
837 voice[0].mod_to = &voice[1];
838 voice[1].mod_to = &voice[2];
839 voice[2].mod_to = &voice[0];
840
841 // Calculate triangle table
842 for (int i=0; i<0x1000; i++) {
843 TriTable[i] = (i << 4) | (i >> 8);
844 TriTable[0x1fff-i] = (i << 4) | (i >> 8);
845 }
846
847 #ifdef PRECOMPUTE_RESONANCE
848 #ifdef USE_FIXPOINT_MATHS
849 // slow floating point doesn't matter much on startup!
850 for (int i=0; i<256; i++) {
851 resonanceLP[i] = FixNo(CALC_RESONANCE_LP(i));
852 resonanceHP[i] = FixNo(CALC_RESONANCE_HP(i));
853 }
854 // Pre-compute the quotient. No problem since int-part is small enough
855 sidquot = (int32)((((double)SID_FREQ)*65536) / SAMPLE_FREQ);
856 // compute lookup table for sin and cos
857 InitFixSinTab();
858 #else
859 for (int i=0; i<256; i++) {
860 resonanceLP[i] = CALC_RESONANCE_LP(i);
861 resonanceHP[i] = CALC_RESONANCE_HP(i);
862 }
863 #endif
864 #endif
865
866 Reset();
867
868 // System specific initialization
869 init_sound();
870 }
871
872
873 /*
874 * Reset emulation
875 */
876
877 void DigitalRenderer::Reset(void)
878 {
879 volume = 0;
880 v3_mute = false;
881
882 for (int v=0; v<3; v++) {
883 voice[v].wave = WAVE_NONE;
884 voice[v].eg_state = EG_IDLE;
885 voice[v].count = voice[v].add = 0;
886 voice[v].freq = voice[v].pw = 0;
887 voice[v].eg_level = voice[v].s_level = 0;
888 voice[v].a_add = voice[v].d_sub = voice[v].r_sub = EGTable[0];
889 voice[v].gate = voice[v].ring = voice[v].test = false;
890 voice[v].filter = voice[v].sync = false;
891 }
892
893 f_type = FILT_NONE;
894 f_freq = f_res = 0;
895 #ifdef USE_FIXPOINT_MATHS
896 f_ampl = FixNo(1);
897 d1 = d2 = g1 = g2 = 0;
898 xn1 = xn2 = yn1 = yn2 = 0;
899 #else
900 f_ampl = 1.0;
901 d1 = d2 = g1 = g2 = 0.0;
902 xn1 = xn2 = yn1 = yn2 = 0.0;
903 #endif
904
905 sample_in_ptr = 0;
906 memset(sample_buf, 0, SAMPLE_BUF_SIZE);
907 }
908
909
910 /*
911 * Write to register
912 */
913
914 void DigitalRenderer::WriteRegister(uint16 adr, uint8 byte)
915 {
916 if (!ready)
917 return;
918
919 int v = adr/7; // Voice number
920
921 switch (adr) {
922 case 0:
923 case 7:
924 case 14:
925 voice[v].freq = (voice[v].freq & 0xff00) | byte;
926 #ifdef USE_FIXPOINT_MATHS
927 voice[v].add = sidquot.imul((int)voice[v].freq);
928 #else
929 voice[v].add = (uint32)((float)voice[v].freq * SID_FREQ / SAMPLE_FREQ);
930 #endif
931 break;
932
933 case 1:
934 case 8:
935 case 15:
936 voice[v].freq = (voice[v].freq & 0xff) | (byte << 8);
937 #ifdef USE_FIXPOINT_MATHS
938 voice[v].add = sidquot.imul((int)voice[v].freq);
939 #else
940 voice[v].add = (uint32)((float)voice[v].freq * SID_FREQ / SAMPLE_FREQ);
941 #endif
942 break;
943
944 case 2:
945 case 9:
946 case 16:
947 voice[v].pw = (voice[v].pw & 0x0f00) | byte;
948 break;
949
950 case 3:
951 case 10:
952 case 17:
953 voice[v].pw = (voice[v].pw & 0xff) | ((byte & 0xf) << 8);
954 break;
955
956 case 4:
957 case 11:
958 case 18:
959 voice[v].wave = (byte >> 4) & 0xf;
960 if ((byte & 1) != voice[v].gate)
961 if (byte & 1) // Gate turned on
962 voice[v].eg_state = EG_ATTACK;
963 else // Gate turned off
964 if (voice[v].eg_state != EG_IDLE)
965 voice[v].eg_state = EG_RELEASE;
966 voice[v].gate = byte & 1;
967 voice[v].mod_by->sync = byte & 2;
968 voice[v].ring = byte & 4;
969 if ((voice[v].test = byte & 8))
970 voice[v].count = 0;
971 break;
972
973 case 5:
974 case 12:
975 case 19:
976 voice[v].a_add = EGTable[byte >> 4];
977 voice[v].d_sub = EGTable[byte & 0xf];
978 break;
979
980 case 6:
981 case 13:
982 case 20:
983 voice[v].s_level = (byte >> 4) * 0x111111;
984 voice[v].r_sub = EGTable[byte & 0xf];
985 break;
986
987 case 22:
988 if (byte != f_freq) {
989 f_freq = byte;
990 if (ThePrefs.SIDFilters)
991 calc_filter();
992 }
993 break;
994
995 case 23:
996 voice[0].filter = byte & 1;
997 voice[1].filter = byte & 2;
998 voice[2].filter = byte & 4;
999 if ((byte >> 4) != f_res) {
1000 f_res = byte >> 4;
1001 if (ThePrefs.SIDFilters)
1002 calc_filter();
1003 }
1004 break;
1005
1006 case 24:
1007 volume = byte & 0xf;
1008 v3_mute = byte & 0x80;
1009 if (((byte >> 4) & 7) != f_type) {
1010 f_type = (byte >> 4) & 7;
1011 #ifdef USE_FIXPOINT_MATHS
1012 xn1 = xn2 = yn1 = yn2 = 0;
1013 #else
1014 xn1 = xn2 = yn1 = yn2 = 0.0;
1015 #endif
1016 if (ThePrefs.SIDFilters)
1017 calc_filter();
1018 }
1019 break;
1020 }
1021 }
1022
1023
1024 /*
1025 * Preferences may have changed
1026 */
1027
1028 void DigitalRenderer::NewPrefs(Prefs *prefs)
1029 {
1030 calc_filter();
1031 }
1032
1033
1034 /*
1035 * Calculate IIR filter coefficients
1036 */
1037
1038 void DigitalRenderer::calc_filter(void)
1039 {
1040 #ifdef USE_FIXPOINT_MATHS
1041 FixPoint fr, arg;
1042
1043 if (f_type == FILT_ALL)
1044 {
1045 d1 = 0; d2 = 0; g1 = 0; g2 = 0; f_ampl = FixNo(1); return;
1046 }
1047 else if (f_type == FILT_NONE)
1048 {
1049 d1 = 0; d2 = 0; g1 = 0; g2 = 0; f_ampl = 0; return;
1050 }
1051 #else
1052 float fr, arg;
1053
1054 // Check for some trivial cases
1055 if (f_type == FILT_ALL) {
1056 d1 = 0.0; d2 = 0.0;
1057 g1 = 0.0; g2 = 0.0;
1058 f_ampl = 1.0;
1059 return;
1060 } else if (f_type == FILT_NONE) {
1061 d1 = 0.0; d2 = 0.0;
1062 g1 = 0.0; g2 = 0.0;
1063 f_ampl = 0.0;
1064 return;
1065 }
1066 #endif
1067
1068 // Calculate resonance frequency
1069 if (f_type == FILT_LP || f_type == FILT_LPBP)
1070 #ifdef PRECOMPUTE_RESONANCE
1071 fr = resonanceLP[f_freq];
1072 #else
1073 fr = CALC_RESONANCE_LP(f_freq);
1074 #endif
1075 else
1076 #ifdef PRECOMPUTE_RESONANCE
1077 fr = resonanceHP[f_freq];
1078 #else
1079 fr = CALC_RESONANCE_HP(f_freq);
1080 #endif
1081
1082 #ifdef USE_FIXPOINT_MATHS
1083 // explanations see below.
1084 arg = fr / (SAMPLE_FREQ >> 1);
1085 if (arg > FixNo(0.99)) {arg = FixNo(0.99);}
1086 if (arg < FixNo(0.01)) {arg = FixNo(0.01);}
1087
1088 g2 = FixNo(0.55) + FixNo(1.2) * arg * (arg - 1) + FixNo(0.0133333333) * f_res;
1089 g1 = FixNo(-2) * g2.sqrt() * fixcos(arg);
1090
1091 if (f_type == FILT_LPBP || f_type == FILT_HPBP) {g2 += FixNo(0.1);}
1092
1093 if (g1.abs() >= g2 + 1)
1094 {
1095 if (g1 > 0) {g1 = g2 + FixNo(0.99);}
1096 else {g1 = -(g2 + FixNo(0.99));}
1097 }
1098
1099 switch (f_type)
1100 {
1101 case FILT_LPBP:
1102 case FILT_LP:
1103 d1 = FixNo(2); d2 = FixNo(1); f_ampl = FixNo(0.25) * (1 + g1 + g2); break;
1104 case FILT_HPBP:
1105 case FILT_HP:
1106 d1 = FixNo(-2); d2 = FixNo(1); f_ampl = FixNo(0.25) * (1 - g1 + g2); break;
1107 case FILT_BP:
1108 d1 = 0; d2 = FixNo(-1);
1109 f_ampl = FixNo(0.25) * (1 + g1 + g2) * (1 + fixcos(arg)) / fixsin(arg);
1110 break;
1111 case FILT_NOTCH:
1112 d1 = FixNo(-2) * fixcos(arg); d2 = FixNo(1);
1113 f_ampl = FixNo(0.25) * (1 + g1 + g2) * (1 + fixcos(arg)) / fixsin(arg);
1114 break;
1115 default: break;
1116 }
1117
1118 #else
1119
1120 // Limit to <1/2 sample frequency, avoid div by 0 in case FILT_BP below
1121 arg = fr / (float)(SAMPLE_FREQ >> 1);
1122 if (arg > 0.99)
1123 arg = 0.99;
1124 if (arg < 0.01)
1125 arg = 0.01;
1126
1127 // Calculate poles (resonance frequency and resonance)
1128 g2 = 0.55 + 1.2 * arg * arg - 1.2 * arg + (float)f_res * 0.0133333333;
1129 g1 = -2.0 * sqrt(g2) * cos(M_PI * arg);
1130
1131 // Increase resonance if LP/HP combined with BP
1132 if (f_type == FILT_LPBP || f_type == FILT_HPBP)
1133 g2 += 0.1;
1134
1135 // Stabilize filter
1136 if (fabs(g1) >= g2 + 1.0)
1137 if (g1 > 0.0)
1138 g1 = g2 + 0.99;
1139 else
1140 g1 = -(g2 + 0.99);
1141
1142 // Calculate roots (filter characteristic) and input attenuation
1143 switch (f_type) {
1144
1145 case FILT_LPBP:
1146 case FILT_LP:
1147 d1 = 2.0; d2 = 1.0;
1148 f_ampl = 0.25 * (1.0 + g1 + g2);
1149 break;
1150
1151 case FILT_HPBP:
1152 case FILT_HP:
1153 d1 = -2.0; d2 = 1.0;
1154 f_ampl = 0.25 * (1.0 - g1 + g2);
1155 break;
1156
1157 case FILT_BP:
1158 d1 = 0.0; d2 = -1.0;
1159 f_ampl = 0.25 * (1.0 + g1 + g2) * (1 + cos(M_PI * arg)) / sin(M_PI * arg);
1160 break;
1161
1162 case FILT_NOTCH:
1163 d1 = -2.0 * cos(M_PI * arg); d2 = 1.0;
1164 f_ampl = 0.25 * (1.0 + g1 + g2) * (1 + cos(M_PI * arg)) / (sin(M_PI * arg));
1165 break;
1166
1167 default:
1168 break;
1169 }
1170 #endif
1171 }
1172
1173
1174 /*
1175 * Fill one audio buffer with calculated SID sound
1176 */
1177
1178 #ifdef __riscos__
1179 void DigitalRenderer::calc_buffer(uint8 *buf, long count)
1180 #else
1181 void DigitalRenderer::calc_buffer(int16 *buf, long count)
1182 #endif
1183 {
1184 // Get filter coefficients, so the emulator won't change
1185 // them in the middle of our calculations
1186 #ifdef USE_FIXPOINT_MATHS
1187 FixPoint cf_ampl = f_ampl;
1188 FixPoint cd1 = d1, cd2 = d2, cg1 = g1, cg2 = g2;
1189 #else
1190 float cf_ampl = f_ampl;
1191 float cd1 = d1, cd2 = d2, cg1 = g1, cg2 = g2;
1192 #endif
1193
1194 #ifdef __riscos__
1195 uint8 *LinToLog, *LogScale;
1196 #endif
1197
1198 // Index in sample_buf for reading, 16.16 fixed
1199 uint32 sample_count = (sample_in_ptr + SAMPLE_BUF_SIZE/2) << 16;
1200
1201 #ifdef __riscos__ // on RISC OS we have 8 bit logarithmic sound
1202 DigitalRenderer_GetTables(&LinToLog, &LogScale); // get translation tables
1203 #else
1204 #ifdef __BEOS__
1205 count >>= 2; // 16 bit stereo output, count is in bytes
1206 #else
1207 count >>= 1; // 16 bit mono output, count is in bytes
1208 #endif
1209 #endif
1210 while (count--) {
1211 int32 sum_output;
1212 int32 sum_output_filter = 0;
1213
1214 // Get current master volume from sample buffer,
1215 // calculate sampled voice
1216 uint8 master_volume = sample_buf[(sample_count >> 16) % SAMPLE_BUF_SIZE];
1217 sample_count += ((0x138 * 50) << 16) / SAMPLE_FREQ;
1218 sum_output = SampleTab[master_volume] << 8;
1219
1220 // Loop for all three voices
1221 for (int j=0; j<3; j++) {
1222 DRVoice *v = &voice[j];
1223
1224 // Envelope generators
1225 uint16 envelope;
1226
1227 switch (v->eg_state) {
1228 case EG_ATTACK:
1229 v->eg_level += v->a_add;
1230 if (v->eg_level > 0xffffff) {
1231 v->eg_level = 0xffffff;
1232 v->eg_state = EG_DECAY;
1233 }
1234 break;
1235 case EG_DECAY:
1236 if (v->eg_level <= v->s_level || v->eg_level > 0xffffff)
1237 v->eg_level = v->s_level;
1238 else {
1239 v->eg_level -= v->d_sub >> EGDRShift[v->eg_level >> 16];
1240 if (v->eg_level <= v->s_level || v->eg_level > 0xffffff)
1241 v->eg_level = v->s_level;
1242 }
1243 break;
1244 case EG_RELEASE:
1245 v->eg_level -= v->r_sub >> EGDRShift[v->eg_level >> 16];
1246 if (v->eg_level > 0xffffff) {
1247 v->eg_level = 0;
1248 v->eg_state = EG_IDLE;
1249 }
1250 break;
1251 case EG_IDLE:
1252 v->eg_level = 0;
1253 break;
1254 }
1255 envelope = (v->eg_level * master_volume) >> 20;
1256
1257 // Waveform generator
1258 uint16 output;
1259
1260 if (!v->test)
1261 v->count += v->add;
1262
1263 if (v->sync && (v->count > 0x1000000))
1264 v->mod_to->count = 0;
1265
1266 v->count &= 0xffffff;
1267
1268 switch (v->wave) {
1269 case WAVE_TRI:
1270 if (v->ring)
1271 output = TriTable[(v->count ^ (v->mod_by->count & 0x800000)) >> 11];
1272 else
1273 output = TriTable[v->count >> 11];
1274 break;
1275 case WAVE_SAW:
1276 output = v->count >> 8;
1277 break;
1278 case WAVE_RECT:
1279 if (v->count > (uint32)(v->pw << 12))
1280 output = 0xffff;
1281 else
1282 output = 0;
1283 break;
1284 case WAVE_TRISAW:
1285 output = TriSawTable[v->count >> 16];
1286 break;
1287 case WAVE_TRIRECT:
1288 if (v->count > (uint32)(v->pw << 12))
1289 output = TriRectTable[v->count >> 16];
1290 else
1291 output = 0;
1292 break;
1293 case WAVE_SAWRECT:
1294 if (v->count > (uint32)(v->pw << 12))
1295 output = SawRectTable[v->count >> 16];
1296 else
1297 output = 0;
1298 break;
1299 case WAVE_TRISAWRECT:
1300 if (v->count > (uint32)(v->pw << 12))
1301 output = TriSawRectTable[v->count >> 16];
1302 else
1303 output = 0;
1304 break;
1305 case WAVE_NOISE:
1306 if (v->count > 0x100000) {
1307 output = v->noise = sid_random() << 8;
1308 v->count &= 0xfffff;
1309 } else
1310 output = v->noise;
1311 break;
1312 default:
1313 output = 0x8000;
1314 break;
1315 }
1316 if (v->filter)
1317 sum_output_filter += (int16)(output ^ 0x8000) * envelope;
1318 else
1319 sum_output += (int16)(output ^ 0x8000) * envelope;
1320 }
1321
1322 // Filter
1323 if (ThePrefs.SIDFilters) {
1324 #ifdef USE_FIXPOINT_MATHS
1325 int32 xn = cf_ampl.imul(sum_output_filter);
1326 int32 yn = xn+cd1.imul(xn1)+cd2.imul(xn2)-cg1.imul(yn1)-cg2.imul(yn2);
1327 yn2 = yn1; yn1 = yn; xn2 = xn1; xn1 = xn;
1328 sum_output_filter = yn;
1329 #else
1330 float xn = (float)sum_output_filter * cf_ampl;
1331 float yn = xn + cd1 * xn1 + cd2 * xn2 - cg1 * yn1 - cg2 * yn2;
1332 yn2 = yn1; yn1 = yn; xn2 = xn1; xn1 = xn;
1333 sum_output_filter = (int32)yn;
1334 #endif
1335 }
1336
1337 // Write to buffer
1338 #ifdef __BEOS__
1339 int16 audio_data = (sum_output + sum_output_filter) >> 10;
1340 int val = *buf + audio_data;
1341 if (val > 32767)
1342 val = 32767;
1343 if (val < -32768)
1344 val = -32768;
1345 *buf++ = val;
1346 val = *buf + audio_data;
1347 if (val > 32767)
1348 val = 32767;
1349 if (val < -32768)
1350 val = -32768;
1351 *buf++ = val;
1352 #elif defined(__riscos__) // lookup in 8k (13bit) translation table
1353 *buf++ = LinToLog[((sum_output + sum_output_filter) >> 13) & 0x1fff];
1354 #else
1355 *buf++ = (sum_output + sum_output_filter) >> 10;
1356 #endif
1357 }
1358 }
1359
1360
1361 // Manufacturer independent sound is still just a dream...
1362 #if defined(__BEOS__)
1363 #include "SID_Be.h"
1364
1365 #elif defined(AMIGA)
1366 #include "SID_Amiga.h"
1367
1368 #elif defined(__linux__)
1369 #include "SID_linux.h"
1370
1371 #elif defined(SUN)
1372 #include "SID_sun.h"
1373
1374 #elif defined(__hpux)
1375 #include "SID_hp.h"
1376
1377 #elif defined(__mac__)
1378 #include "SID_mac.h"
1379
1380 #elif defined(WIN32)
1381 #include "SID_WIN32.h"
1382
1383 #elif defined(__riscos__)
1384 #include "SID_Acorn.h"
1385
1386 #else // No sound
1387 void DigitalRenderer::init_sound(void) {ready = false;}
1388 DigitalRenderer::~DigitalRenderer() {}
1389 void DigitalRenderer::EmulateLine(void) {}
1390 void DigitalRenderer::Pause(void) {}
1391 void DigitalRenderer::Resume(void) {}
1392 #endif
1393
1394
1395 /*
1396 * Open/close the renderer, according to old and new prefs
1397 */
1398
1399 void MOS6581::open_close_renderer(int old_type, int new_type)
1400 {
1401 if (old_type == new_type)
1402 return;
1403
1404 // Delete the old renderer
1405 delete the_renderer;
1406
1407 // Create new renderer
1408 if (new_type == SIDTYPE_DIGITAL)
1409 #if defined(__BEOS__) || defined(__riscos__)
1410 the_renderer = new DigitalRenderer(the_c64);
1411 #else
1412 the_renderer = new DigitalRenderer();
1413 #endif
1414 #ifdef AMIGA
1415 else if (new_type == SIDTYPE_SIDCARD)
1416 the_renderer = new SIDCardRenderer();
1417 #endif
1418 else
1419 the_renderer = NULL;
1420
1421 // Stuff the current register values into the new renderer
1422 if (the_renderer != NULL)
1423 for (int i=0; i<25; i++)
1424 the_renderer->WriteRegister(i, regs[i]);
1425 }