summaryrefslogtreecommitdiffstatshomepage
path: root/trunk/src/emu/sound/votrax.c
diff options
context:
space:
mode:
Diffstat (limited to 'trunk/src/emu/sound/votrax.c')
-rw-r--r--trunk/src/emu/sound/votrax.c187
1 files changed, 187 insertions, 0 deletions
diff --git a/trunk/src/emu/sound/votrax.c b/trunk/src/emu/sound/votrax.c
new file mode 100644
index 00000000000..176d7cf537f
--- /dev/null
+++ b/trunk/src/emu/sound/votrax.c
@@ -0,0 +1,187 @@
+/**************************************************************************
+
+ Votrax SC-01 Emulator
+
+ Mike@Dissfulfils.co.uk
+
+**************************************************************************
+
+DEVICE_START(votrax)- Start emulation, load samples from Votrax subdirectory
+votrax_w - Write data to votrax port
+votrax_status_r - Return busy status (-1 = busy)
+
+If you need to alter the base frequency (i.e. Qbert) then just alter
+the variable VotraxBaseFrequency, this is defaulted to 8000
+
+**************************************************************************/
+
+#include "emu.h"
+#include "samples.h"
+#include "votrax.h"
+
+
+typedef struct _votrax_state votrax_state;
+struct _votrax_state
+{
+ device_t *device;
+ int stream;
+ int frequency; /* Some games (Qbert) change this */
+ int volume;
+ sound_stream * channel;
+
+ loaded_sample *sample;
+ UINT32 pos;
+ UINT32 frac;
+ UINT32 step;
+
+ loaded_samples *samples;
+};
+
+INLINE votrax_state *get_safe_token(device_t *device)
+{
+ assert(device != NULL);
+ assert(device->type() == VOTRAX);
+ return (votrax_state *)downcast<legacy_device_base *>(device)->token();
+}
+
+#define FRAC_BITS 24
+#define FRAC_ONE (1 << FRAC_BITS)
+#define FRAC_MASK (FRAC_ONE - 1)
+
+
+/****************************************************************************
+ * 64 Phonemes - currently 1 sample per phoneme, will be combined sometime!
+ ****************************************************************************/
+
+static const char *const VotraxTable[65] =
+{
+ "EH3","EH2","EH1","PA0","DT" ,"A1" ,"A2" ,"ZH",
+ "AH2","I3" ,"I2" ,"I1" ,"M" ,"N" ,"B" ,"V",
+ "CH" ,"SH" ,"Z" ,"AW1","NG" ,"AH1","OO1","OO",
+ "L" ,"K" ,"J" ,"H" ,"G" ,"F" ,"D" ,"S",
+ "A" ,"AY" ,"Y1" ,"UH3","AH" ,"P" ,"O" ,"I",
+ "U" ,"Y" ,"T" ,"R" ,"E" ,"W" ,"AE" ,"AE1",
+ "AW2","UH2","UH1","UH" ,"O2" ,"O1" ,"IU" ,"U1",
+ "THV","TH" ,"ER" ,"EH" ,"E1" ,"AW" ,"PA1","STOP",
+ 0
+};
+
+static STREAM_UPDATE( votrax_update_sound )
+{
+ votrax_state *info = (votrax_state*) param;
+ stream_sample_t *buffer = outputs[0];
+
+ if (info->sample)
+ {
+ /* load some info locally */
+ UINT32 pos = info->pos;
+ UINT32 frac = info->frac;
+ UINT32 step = info->step;
+ UINT32 length = info->sample->length;
+ INT16 *sample = info->sample->data;
+
+ while (length--)
+ {
+ /* do a linear interp on the sample */
+ INT32 sample1 = sample[pos];
+ INT32 sample2 = sample[(pos + 1) % length];
+ INT32 fracmult = frac >> (FRAC_BITS - 14);
+ *buffer++ = ((0x4000 - fracmult) * sample1 + fracmult * sample2) >> 14;
+
+ /* advance */
+ frac += step;
+ pos += frac >> FRAC_BITS;
+ frac = frac & ((1 << FRAC_BITS) - 1);
+
+ /* handle looping/ending */
+ if (pos >= length)
+ {
+ info->sample = NULL;
+ break;
+ }
+ }
+
+ /* push position back out */
+ info->pos = pos;
+ info->frac = frac;
+ }
+}
+
+
+static DEVICE_START( votrax )
+{
+ votrax_state *votrax = get_safe_token(device);
+
+ votrax->device = device;
+ votrax->samples = readsamples(device->machine(),VotraxTable,"votrax");
+ votrax->frequency = 8000;
+ votrax->volume = 230;
+
+ votrax->channel = device->machine().sound().stream_alloc(*device, 0, 1, device->machine().sample_rate(), votrax, votrax_update_sound);
+
+ votrax->sample = NULL;
+ votrax->step = 0;
+}
+
+
+WRITE8_DEVICE_HANDLER( votrax_w )
+{
+ votrax_state *info = get_safe_token(device);
+ int Phoneme,Intonation;
+
+ info->channel->update();
+
+ Phoneme = data & 0x3F;
+ Intonation = data >> 6;
+
+ logerror("Speech : %s at intonation %d\n",VotraxTable[Phoneme],Intonation);
+
+ if(Phoneme==63)
+ info->sample = NULL;
+
+ if(info->samples->sample[Phoneme].data)
+ {
+ info->sample = &info->samples->sample[Phoneme];
+ info->pos = 0;
+ info->frac = 0;
+ info->step = ((INT64)(info->sample->frequency + (256*Intonation)) << FRAC_BITS) / info->device->machine().sample_rate();
+ info->channel->set_output_gain(0, (info->volume + (8*Intonation)*100/255) / 100.0);
+ }
+}
+
+int votrax_status_r(device_t *device)
+{
+ votrax_state *info = get_safe_token(device);
+ info->channel->update();
+ return (info->sample != NULL);
+}
+
+
+
+/**************************************************************************
+ * Generic get_info
+ **************************************************************************/
+
+DEVICE_GET_INFO( votrax )
+{
+ switch (state)
+ {
+ /* --- the following bits of info are returned as 64-bit signed integers --- */
+ case DEVINFO_INT_TOKEN_BYTES: info->i = sizeof(votrax_state); break;
+
+ /* --- the following bits of info are returned as pointers to data or functions --- */
+ case DEVINFO_FCT_START: info->start = DEVICE_START_NAME( votrax ); break;
+ case DEVINFO_FCT_STOP: /* Nothing */ break;
+ case DEVINFO_FCT_RESET: /* Nothing */ break;
+
+ /* --- the following bits of info are returned as NULL-terminated strings --- */
+ case DEVINFO_STR_NAME: strcpy(info->s, "Votrax SC-01"); break;
+ case DEVINFO_STR_FAMILY: strcpy(info->s, "Votrax speech"); break;
+ case DEVINFO_STR_VERSION: strcpy(info->s, "1.0"); break;
+ case DEVINFO_STR_SOURCE_FILE: strcpy(info->s, __FILE__); break;
+ case DEVINFO_STR_CREDITS: strcpy(info->s, "Copyright Nicola Salmoria and the MAME Team"); break;
+ }
+}
+
+
+DEFINE_LEGACY_SOUND_DEVICE(VOTRAX, votrax);