diff options
Diffstat (limited to 'trunk/src/emu/sound/votrax.c')
-rw-r--r-- | trunk/src/emu/sound/votrax.c | 187 |
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); |