2006-02-25 20:50:29 +00:00
/*
AppleWin : An Apple //e emulator for Windows
Copyright ( C ) 1994 - 1996 , Michael O ' Brien
Copyright ( C ) 1999 - 2001 , Oliver Schmidt
Copyright ( C ) 2002 - 2005 , Tom Charlesworth
2007-04-01 15:24:52 +00:00
Copyright ( C ) 2006 - 2007 , Tom Charlesworth , Michael Pohoreski
2006-02-25 20:50:29 +00:00
AppleWin is free software ; you can redistribute it and / or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation ; either version 2 of the License , or
( at your option ) any later version .
AppleWin is distributed in the hope that it will be useful ,
but WITHOUT ANY WARRANTY ; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . See the
GNU General Public License for more details .
You should have received a copy of the GNU General Public License
along with AppleWin ; if not , write to the Free Software
Foundation , Inc . , 59 Temple Place , Suite 330 , Boston , MA 02111 - 1307 USA
*/
/* Description: Mockingboard/Phasor emulation
*
* Author : Copyright ( c ) 2002 - 2006 , Tom Charlesworth
*/
// History:
//
// v1.12.07.1 (30 Dec 2005)
// - Update 6522 TIMERs after every 6502 opcode, giving more precise IRQs
// - Minimum TIMER freq is now 0x100 cycles
// - Added Phasor support
//
// v1.12.06.1 (16 July 2005)
// - Reworked 6522's ORB -> AY8910 decoder
// - Changed MB output so L=All voices from AY0 & AY2 & R=All voices from AY1 & AY3
// - Added crude support for Votrax speech chip (by using SSI263 phonemes)
//
// v1.12.04.1 (14 Sep 2004)
// - Switch MB output from dual-mono to stereo.
// - Relaxed TIMER1 freq from ~62Hz (period=0x4000) to ~83Hz (period=0x3000).
//
// 25 Apr 2004:
// - Added basic support for the SSI263 speech chip
//
// 15 Mar 2004:
// - Switched to MAME's AY8910 emulation (includes envelope support)
//
// v1.12.03 (11 Jan 2004)
// - For free-running 6522 timer1 IRQ, reload with current ACCESS_TIMER1 value.
// (Fixes Ultima 4/5 playback speed problem.)
//
// v1.12.01 (24 Nov 2002)
// - Shaped the tone waveform more logarithmically
// - Added support for MB ena/dis switch on Config dialog
// - Added log file support
//
// v1.12.00 (17 Nov 2002)
// - Initial version (no AY8910 envelope support)
//
// Notes on Votrax chip (on original Mockingboards):
// From Crimewave (Penguin Software):
// . Init:
// . DDRB = 0xFF
// . PCR = 0xB0
// . IER = 0x90
// . ORB = 0x03 (PAUSE0) or 0x3F (STOP)
// . IRQ:
// . ORB = Phoneme value
// . IRQ last phoneme complete:
// . IER = 0x10
// . ORB = 0x3F (STOP)
//
# include "StdAfx.h"
2015-02-13 22:40:53 +00:00
# include "SaveState_Structs_v1.h"
2014-08-13 20:30:35 +00:00
# include "AppleWin.h"
# include "CPU.h"
# include "Log.h"
# include "Memory.h"
# include "Mockingboard.h"
# include "SoundCore.h"
2015-12-05 16:50:27 +00:00
# include "YamlHelper.h"
2014-08-13 20:30:35 +00:00
2009-01-09 23:27:29 +00:00
# include "AY8910.h"
2006-02-25 20:50:29 +00:00
# include "SSI263Phonemes.h"
2014-08-13 20:30:35 +00:00
# define LOG_SSI263 0
2006-02-25 20:50:29 +00:00
# define SY6522_DEVICE_A 0
# define SY6522_DEVICE_B 1
# define SLOT4 4
# define SLOT5 5
# define NUM_MB 2
# define NUM_DEVS_PER_MB 2
# define NUM_AY8910 (NUM_MB*NUM_DEVS_PER_MB)
# define NUM_SY6522 NUM_AY8910
# define NUM_VOICES_PER_AY8910 3
# define NUM_VOICES (NUM_AY8910*NUM_VOICES_PER_AY8910)
// Chip offsets from card base.
# define SY6522A_Offset 0x00
# define SY6522B_Offset 0x80
# define SSI263_Offset 0x40
# define Phasor_SY6522A_CS 4
# define Phasor_SY6522B_CS 7
# define Phasor_SY6522A_Offset (1<<Phasor_SY6522A_CS)
# define Phasor_SY6522B_Offset (1<<Phasor_SY6522B_CS)
2015-04-11 21:24:54 +00:00
struct SY6522_AY8910
2006-02-25 20:50:29 +00:00
{
SY6522 sy6522 ;
BYTE nAY8910Number ;
BYTE nAYCurrentRegister ;
BYTE nTimerStatus ;
SSI263A SpeechChip ;
2015-04-11 21:24:54 +00:00
} ;
2006-02-25 20:50:29 +00:00
// IFR & IER:
2006-05-02 21:56:28 +00:00
# define IxR_PERIPHERAL (1<<1)
# define IxR_VOTRAX (1<<4) // TO DO: Get proper name from 6522 datasheet!
# define IxR_TIMER2 (1<<5)
# define IxR_TIMER1 (1<<6)
2006-02-25 20:50:29 +00:00
// ACR:
# define RUNMODE (1<<6) // 0 = 1-Shot Mode, 1 = Free Running Mode
# define RM_ONESHOT (0<<6)
# define RM_FREERUNNING (1<<6)
// SSI263A registers:
# define SSI_DURPHON 0x00
# define SSI_INFLECT 0x01
# define SSI_RATEINF 0x02
# define SSI_CTTRAMP 0x03
# define SSI_FILFREQ 0x04
// Support 2 MB's, each with 2x SY6522/AY8910 pairs.
static SY6522_AY8910 g_MB [ NUM_AY8910 ] ;
// Timer vars
static ULONG g_n6522TimerPeriod = 0 ;
2009-01-09 23:27:29 +00:00
static const UINT TIMERDEVICE_INVALID = - 1 ;
static UINT g_nMBTimerDevice = TIMERDEVICE_INVALID ; // SY6522 device# which is generating timer IRQ
2007-08-06 21:38:35 +00:00
static UINT64 g_uLastCumulativeCycles = 0 ;
2006-02-25 20:50:29 +00:00
// SSI263 vars:
static USHORT g_nSSI263Device = 0 ; // SSI263 device# which is generating phoneme-complete IRQ
2015-04-12 17:17:08 +00:00
static volatile int g_nCurrentActivePhoneme = - 1 ; // Modified by threads: main & SSI263Thread
static volatile bool g_bStopPhoneme = false ; // Modified by threads: main & SSI263Thread
2006-02-25 20:50:29 +00:00
static bool g_bVotraxPhoneme = false ;
static const DWORD SAMPLE_RATE = 44100 ; // Use a base freq so that DirectX (or sound h/w) doesn't have to up/down-sample
static short * ppAYVoiceBuffer [ NUM_VOICES ] = { 0 } ;
static unsigned __int64 g_nMB_InActiveCycleCount = 0 ;
static bool g_bMB_RegAccessedFlag = false ;
2009-01-09 23:27:29 +00:00
static bool g_bMB_Active = false ;
2006-02-25 20:50:29 +00:00
static HANDLE g_hThread = NULL ;
static bool g_bMBAvailable = false ;
//
2012-03-20 23:17:06 +00:00
static SS_CARDTYPE g_SoundcardType = CT_Empty ; // Use CT_Empty to mean: no soundcard
2006-02-25 20:50:29 +00:00
static bool g_bPhasorEnable = false ;
static BYTE g_nPhasorMode = 0 ; // 0=Mockingboard emulation, 1=Phasor native
2015-04-11 21:24:54 +00:00
static UINT g_PhasorClockScaleFactor = 1 ; // for save-state only
2006-02-25 20:50:29 +00:00
//-------------------------------------
static const unsigned short g_nMB_NumChannels = 2 ;
2009-10-07 21:38:42 +00:00
static const DWORD g_dwDSBufferSize = MAX_SAMPLES * sizeof ( short ) * g_nMB_NumChannels ;
2006-02-25 20:50:29 +00:00
static const SHORT nWaveDataMin = ( SHORT ) 0x8000 ;
static const SHORT nWaveDataMax = ( SHORT ) 0x7FFF ;
static short g_nMixBuffer [ g_dwDSBufferSize / sizeof ( short ) ] ;
static VOICE MockingboardVoice = { 0 } ;
static VOICE SSI263Voice [ 64 ] = { 0 } ;
static const int g_nNumEvents = 2 ;
static HANDLE g_hSSI263Event [ g_nNumEvents ] = { NULL } ; // 1: Phoneme finished playing, 2: Exit thread
static DWORD g_dwMaxPhonemeLen = 0 ;
// When 6522 IRQ is *not* active use 60Hz update freq for MB voices
static const double g_f6522TimerPeriod_NoIRQ = CLK_6502 / 60.0 ; // Constant whatever the CLK is set to
//---------------------------------------------------------------------------
// External global vars:
bool g_bMBTimerIrqActive = false ;
2009-01-09 23:27:29 +00:00
# ifdef _DEBUG
2006-05-02 21:56:28 +00:00
UINT32 g_uTimer1IrqCount = 0 ; // DEBUG
2009-01-09 23:27:29 +00:00
# endif
2006-02-25 20:50:29 +00:00
//---------------------------------------------------------------------------
// Forward refs:
static DWORD WINAPI SSI263Thread ( LPVOID ) ;
static void Votrax_Write ( BYTE nDevice , BYTE nValue ) ;
//---------------------------------------------------------------------------
static void StartTimer ( SY6522_AY8910 * pMB )
{
2016-09-08 21:36:16 +00:00
// if((pMB->nAY8910Number & 1) != SY6522_DEVICE_A)
// return;
2006-02-25 20:50:29 +00:00
2006-05-02 21:56:28 +00:00
if ( ( pMB - > sy6522 . IER & IxR_TIMER1 ) = = 0x00 )
2006-02-25 20:50:29 +00:00
return ;
USHORT nPeriod = pMB - > sy6522 . TIMER1_LATCH . w ;
2011-01-08 15:01:54 +00:00
// if(nPeriod <= 0xff) // Timer1L value has been written (but TIMER1H hasn't)
// return;
2006-02-25 20:50:29 +00:00
pMB - > nTimerStatus = 1 ;
// 6522 CLK runs at same speed as 6502 CLK
g_n6522TimerPeriod = nPeriod ;
g_bMBTimerIrqActive = true ;
g_nMBTimerDevice = pMB - > nAY8910Number ;
}
//-----------------------------------------------------------------------------
static void StopTimer ( SY6522_AY8910 * pMB )
{
pMB - > nTimerStatus = 0 ;
g_bMBTimerIrqActive = false ;
2009-01-09 23:27:29 +00:00
g_nMBTimerDevice = TIMERDEVICE_INVALID ;
2006-02-25 20:50:29 +00:00
}
//-----------------------------------------------------------------------------
static void ResetSY6522 ( SY6522_AY8910 * pMB )
{
memset ( & pMB - > sy6522 , 0 , sizeof ( SY6522 ) ) ;
if ( pMB - > nTimerStatus )
StopTimer ( pMB ) ;
pMB - > nAYCurrentRegister = 0 ;
}
//-----------------------------------------------------------------------------
static void AY8910_Write ( BYTE nDevice , BYTE nReg , BYTE nValue , BYTE nAYDevice )
{
2009-01-09 23:27:29 +00:00
g_bMB_RegAccessedFlag = true ;
2006-02-25 20:50:29 +00:00
SY6522_AY8910 * pMB = & g_MB [ nDevice ] ;
if ( ( nValue & 4 ) = = 0 )
{
// RESET: Reset AY8910 only
AY8910_reset ( nDevice + 2 * nAYDevice ) ;
}
else
{
// Determine the AY8910 inputs
int nBDIR = ( nValue & 2 ) ? 1 : 0 ;
const int nBC2 = 1 ; // Hardwired to +5V
int nBC1 = nValue & 1 ;
int nAYFunc = ( nBDIR < < 2 ) | ( nBC2 < < 1 ) | nBC1 ;
enum { AY_NOP0 , AY_NOP1 , AY_INACTIVE , AY_READ , AY_NOP4 , AY_NOP5 , AY_WRITE , AY_LATCH } ;
switch ( nAYFunc )
{
case AY_INACTIVE : // 4: INACTIVE
break ;
case AY_READ : // 5: READ FROM PSG (need to set DDRA to input)
break ;
case AY_WRITE : // 6: WRITE TO PSG
_AYWriteReg ( nDevice + 2 * nAYDevice , pMB - > nAYCurrentRegister , pMB - > sy6522 . ORA ) ;
break ;
case AY_LATCH : // 7: LATCH ADDRESS
2009-02-01 20:32:05 +00:00
// http://www.worldofspectrum.org/forums/showthread.php?t=23327
// Selecting an unused register number above 0x0f puts the AY into a state where
// any values written to the data/address bus are ignored, but can be read back
// within a few tens of thousands of cycles before they decay to zero.
2006-02-25 20:50:29 +00:00
if ( pMB - > sy6522 . ORA < = 0x0F )
pMB - > nAYCurrentRegister = pMB - > sy6522 . ORA & 0x0F ;
// else Pro-Mockingboard (clone from HK)
break ;
}
}
}
static void UpdateIFR ( SY6522_AY8910 * pMB )
{
pMB - > sy6522 . IFR & = 0x7F ;
if ( pMB - > sy6522 . IFR & pMB - > sy6522 . IER & 0x7F )
pMB - > sy6522 . IFR | = 0x80 ;
2006-05-02 21:56:28 +00:00
// Now update the IRQ signal from all 6522s
// . OR-sum of all active TIMER1, TIMER2 & SPEECH sources (from all 6522s)
UINT bIRQ = 0 ;
for ( UINT i = 0 ; i < NUM_SY6522 ; i + + )
bIRQ | = g_MB [ i ] . sy6522 . IFR & 0x80 ;
2006-12-27 19:11:19 +00:00
// NB. Mockingboard generates IRQ on both 6522s:
// . SSI263's IRQ (A/!R) is routed via the 2nd 6522 (at $Cx80) and must generate a 6502 IRQ (not NMI)
// . SC-01's IRQ (A/!R) is also routed via a (2nd?) 6522
// Phasor's SSI263 appears to be wired directly to the 6502's IRQ (ie. not via a 6522)
// . I assume Phasor's 6522s just generate 6502 IRQs (not NMIs)
2006-05-02 21:56:28 +00:00
if ( bIRQ )
2006-12-27 19:11:19 +00:00
{
CpuIrqAssert ( IS_6522 ) ;
}
2006-05-02 21:56:28 +00:00
else
2006-12-27 19:11:19 +00:00
{
CpuIrqDeassert ( IS_6522 ) ;
}
2006-02-25 20:50:29 +00:00
}
static void SY6522_Write ( BYTE nDevice , BYTE nReg , BYTE nValue )
{
g_bMB_Active = true ;
SY6522_AY8910 * pMB = & g_MB [ nDevice ] ;
switch ( nReg )
{
case 0x00 : // ORB
{
nValue & = pMB - > sy6522 . DDRB ;
pMB - > sy6522 . ORB = nValue ;
if ( ( pMB - > sy6522 . DDRB = = 0xFF ) & & ( pMB - > sy6522 . PCR = = 0xB0 ) )
{
// Votrax speech data
Votrax_Write ( nDevice , nValue ) ;
break ;
}
if ( g_bPhasorEnable )
{
int nAY_CS = ( g_nPhasorMode & 1 ) ? ( ~ ( nValue > > 3 ) & 3 ) : 1 ;
if ( nAY_CS & 1 )
AY8910_Write ( nDevice , nReg , nValue , 0 ) ;
if ( nAY_CS & 2 )
AY8910_Write ( nDevice , nReg , nValue , 1 ) ;
}
else
{
AY8910_Write ( nDevice , nReg , nValue , 0 ) ;
}
break ;
}
case 0x01 : // ORA
pMB - > sy6522 . ORA = nValue & pMB - > sy6522 . DDRA ;
break ;
case 0x02 : // DDRB
pMB - > sy6522 . DDRB = nValue ;
break ;
case 0x03 : // DDRA
pMB - > sy6522 . DDRA = nValue ;
break ;
case 0x04 : // TIMER1L_COUNTER
case 0x06 : // TIMER1L_LATCH
pMB - > sy6522 . TIMER1_LATCH . l = nValue ;
break ;
case 0x05 : // TIMER1H_COUNTER
/* Initiates timer1 & clears time-out of timer1 */
// Clear Timer Interrupt Flag.
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR & = ~ IxR_TIMER1 ;
2006-02-25 20:50:29 +00:00
UpdateIFR ( pMB ) ;
pMB - > sy6522 . TIMER1_LATCH . h = nValue ;
pMB - > sy6522 . TIMER1_COUNTER . w = pMB - > sy6522 . TIMER1_LATCH . w ;
StartTimer ( pMB ) ;
break ;
case 0x07 : // TIMER1H_LATCH
// Clear Timer1 Interrupt Flag.
pMB - > sy6522 . TIMER1_LATCH . h = nValue ;
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR & = ~ IxR_TIMER1 ;
2006-02-25 20:50:29 +00:00
UpdateIFR ( pMB ) ;
break ;
case 0x08 : // TIMER2L
pMB - > sy6522 . TIMER2_LATCH . l = nValue ;
break ;
case 0x09 : // TIMER2H
// Clear Timer2 Interrupt Flag.
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR & = ~ IxR_TIMER2 ;
2006-02-25 20:50:29 +00:00
UpdateIFR ( pMB ) ;
pMB - > sy6522 . TIMER2_LATCH . h = nValue ;
pMB - > sy6522 . TIMER2_COUNTER . w = pMB - > sy6522 . TIMER2_LATCH . w ;
break ;
case 0x0a : // SERIAL_SHIFT
break ;
case 0x0b : // ACR
pMB - > sy6522 . ACR = nValue ;
break ;
case 0x0c : // PCR - Used for Speech chip only
pMB - > sy6522 . PCR = nValue ;
break ;
case 0x0d : // IFR
// - Clear those bits which are set in the lower 7 bits.
// - Can't clear bit 7 directly.
nValue | = 0x80 ; // Set high bit
nValue ^ = 0x7F ; // Make mask
pMB - > sy6522 . IFR & = nValue ;
UpdateIFR ( pMB ) ;
break ;
case 0x0e : // IER
if ( ! ( nValue & 0x80 ) )
{
// Clear those bits which are set in the lower 7 bits.
nValue ^ = 0x7F ;
pMB - > sy6522 . IER & = nValue ;
UpdateIFR ( pMB ) ;
// Check if timer has been disabled.
2006-05-02 21:56:28 +00:00
if ( pMB - > sy6522 . IER & IxR_TIMER1 )
2006-02-25 20:50:29 +00:00
break ;
if ( pMB - > nTimerStatus = = 0 )
break ;
// Stop timer
StopTimer ( pMB ) ;
}
else
{
// Set those bits which are set in the lower 7 bits.
nValue & = 0x7F ;
pMB - > sy6522 . IER | = nValue ;
UpdateIFR ( pMB ) ;
StartTimer ( pMB ) ;
}
break ;
case 0x0f : // ORA_NO_HS
break ;
}
}
//-----------------------------------------------------------------------------
static BYTE SY6522_Read ( BYTE nDevice , BYTE nReg )
{
2009-01-09 23:27:29 +00:00
// g_bMB_RegAccessedFlag = true;
2006-02-25 20:50:29 +00:00
g_bMB_Active = true ;
SY6522_AY8910 * pMB = & g_MB [ nDevice ] ;
BYTE nValue = 0x00 ;
switch ( nReg )
{
case 0x00 : // ORB
nValue = pMB - > sy6522 . ORB ;
break ;
case 0x01 : // ORA
nValue = pMB - > sy6522 . ORA ;
break ;
case 0x02 : // DDRB
nValue = pMB - > sy6522 . DDRB ;
break ;
case 0x03 : // DDRA
nValue = pMB - > sy6522 . DDRA ;
break ;
case 0x04 : // TIMER1L_COUNTER
nValue = pMB - > sy6522 . TIMER1_COUNTER . l ;
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR & = ~ IxR_TIMER1 ; // Also clears Timer1 Interrupt Flag
2006-02-25 20:50:29 +00:00
UpdateIFR ( pMB ) ;
break ;
case 0x05 : // TIMER1H_COUNTER
nValue = pMB - > sy6522 . TIMER1_COUNTER . h ;
break ;
case 0x06 : // TIMER1L_LATCH
nValue = pMB - > sy6522 . TIMER1_LATCH . l ;
break ;
case 0x07 : // TIMER1H_LATCH
nValue = pMB - > sy6522 . TIMER1_LATCH . h ;
break ;
case 0x08 : // TIMER2L
nValue = pMB - > sy6522 . TIMER2_COUNTER . l ;
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR & = ~ IxR_TIMER2 ; // Also clears Timer2 Interrupt Flag
2006-02-25 20:50:29 +00:00
UpdateIFR ( pMB ) ;
break ;
case 0x09 : // TIMER2H
nValue = pMB - > sy6522 . TIMER2_COUNTER . h ;
break ;
case 0x0a : // SERIAL_SHIFT
break ;
case 0x0b : // ACR
nValue = pMB - > sy6522 . ACR ;
break ;
case 0x0c : // PCR
nValue = pMB - > sy6522 . PCR ;
break ;
case 0x0d : // IFR
nValue = pMB - > sy6522 . IFR ;
break ;
case 0x0e : // IER
2009-01-09 23:27:29 +00:00
nValue = 0x80 ; // Datasheet says this is 0x80|IER
2006-02-25 20:50:29 +00:00
break ;
case 0x0f : // ORA_NO_HS
nValue = pMB - > sy6522 . ORA ;
break ;
}
return nValue ;
}
//---------------------------------------------------------------------------
void SSI263_Play ( unsigned int nPhoneme ) ;
#if 0
typedef struct
{
2015-12-05 16:50:27 +00:00
BYTE DurationPhoneme ;
2006-02-25 20:50:29 +00:00
BYTE Inflection ; // I10..I3
BYTE RateInflection ;
BYTE CtrlArtAmp ;
BYTE FilterFreq ;
//
BYTE CurrentMode ;
} SSI263A ;
# endif
//static SSI263A nSpeechChip;
// Duration/Phonome
const BYTE DURATION_MODE_MASK = 0xC0 ;
const BYTE PHONEME_MASK = 0x3F ;
const BYTE MODE_PHONEME_TRANSITIONED_INFLECTION = 0xC0 ; // IRQ active
const BYTE MODE_PHONEME_IMMEDIATE_INFLECTION = 0x80 ; // IRQ active
const BYTE MODE_FRAME_IMMEDIATE_INFLECTION = 0x40 ; // IRQ active
const BYTE MODE_IRQ_DISABLED = 0x00 ;
// Rate/Inflection
const BYTE RATE_MASK = 0xF0 ;
const BYTE INFLECTION_MASK_H = 0x08 ; // I11
const BYTE INFLECTION_MASK_L = 0x07 ; // I2..I0
// Ctrl/Art/Amp
const BYTE CONTROL_MASK = 0x80 ;
const BYTE ARTICULATION_MASK = 0x70 ;
const BYTE AMPLITUDE_MASK = 0x0F ;
static BYTE SSI263_Read ( BYTE nDevice , BYTE nReg )
{
SY6522_AY8910 * pMB = & g_MB [ nDevice ] ;
2006-05-02 21:56:28 +00:00
// Regardless of register, just return inverted A/!R in bit7
// . A/!R is low for IRQ
2006-02-25 20:50:29 +00:00
2006-05-02 21:56:28 +00:00
return pMB - > SpeechChip . CurrentMode < < 7 ;
2006-02-25 20:50:29 +00:00
}
static void SSI263_Write ( BYTE nDevice , BYTE nReg , BYTE nValue )
{
SY6522_AY8910 * pMB = & g_MB [ nDevice ] ;
switch ( nReg )
{
case SSI_DURPHON :
# if LOG_SSI263
if ( g_fh ) fprintf ( g_fh , " DUR = 0x%02X, PHON = 0x%02X \n \n " , nValue > > 6 , nValue & PHONEME_MASK ) ;
# endif
2006-05-02 21:56:28 +00:00
// Datasheet is not clear, but a write to DURPHON must clear the IRQ
if ( g_bPhasorEnable )
2006-12-27 19:11:19 +00:00
{
CpuIrqDeassert ( IS_SPEECH ) ;
}
else
{
pMB - > sy6522 . IFR & = ~ IxR_PERIPHERAL ;
UpdateIFR ( pMB ) ;
}
2006-05-02 21:56:28 +00:00
pMB - > SpeechChip . CurrentMode & = ~ 1 ; // Clear SSI263's D7 pin
2015-12-05 16:50:27 +00:00
pMB - > SpeechChip . DurationPhoneme = nValue ;
2006-02-25 20:50:29 +00:00
2006-12-27 19:11:19 +00:00
g_nSSI263Device = nDevice ;
2006-02-25 20:50:29 +00:00
// Phoneme output not dependent on CONTROL bit
if ( g_bPhasorEnable )
{
if ( nValue | | ( g_nCurrentActivePhoneme < 0 ) )
SSI263_Play ( nValue & PHONEME_MASK ) ;
}
else
{
SSI263_Play ( nValue & PHONEME_MASK ) ;
}
break ;
case SSI_INFLECT :
# if LOG_SSI263
if ( g_fh ) fprintf ( g_fh , " INF = 0x%02X \n " , nValue ) ;
# endif
pMB - > SpeechChip . Inflection = nValue ;
break ;
case SSI_RATEINF :
# if LOG_SSI263
if ( g_fh ) fprintf ( g_fh , " RATE = 0x%02X, INF = 0x%02X \n " , nValue > > 4 , nValue & 0x0F ) ;
# endif
pMB - > SpeechChip . RateInflection = nValue ;
break ;
case SSI_CTTRAMP :
# if LOG_SSI263
if ( g_fh ) fprintf ( g_fh , " CTRL = %d, ART = 0x%02X, AMP=0x%02X \n " , nValue > > 7 , ( nValue & ARTICULATION_MASK ) > > 4 , nValue & AMPLITUDE_MASK ) ;
# endif
if ( ( pMB - > SpeechChip . CtrlArtAmp & CONTROL_MASK ) & & ! ( nValue & CONTROL_MASK ) ) // H->L
2015-12-05 16:50:27 +00:00
pMB - > SpeechChip . CurrentMode = pMB - > SpeechChip . DurationPhoneme & DURATION_MODE_MASK ;
2006-02-25 20:50:29 +00:00
pMB - > SpeechChip . CtrlArtAmp = nValue ;
break ;
case SSI_FILFREQ :
# if LOG_SSI263
if ( g_fh ) fprintf ( g_fh , " FFREQ = 0x%02X \n " , nValue ) ;
# endif
pMB - > SpeechChip . FilterFreq = nValue ;
break ;
default :
break ;
}
}
//-------------------------------------
static BYTE Votrax2SSI263 [ 64 ] =
{
0x02 , // 00: EH3 jackEt -> E1 bEnt
0x0A , // 01: EH2 Enlist -> EH nEst
0x0B , // 02: EH1 hEAvy -> EH1 bElt
0x00 , // 03: PA0 no sound -> PA
0x28 , // 04: DT buTTer -> T Tart
0x08 , // 05: A2 mAde -> A mAde
0x08 , // 06: A1 mAde -> A mAde
0x2F , // 07: ZH aZure -> Z Zero
0x0E , // 08: AH2 hOnest -> AH gOt
0x07 , // 09: I3 inhibIt -> I sIx
0x07 , // 0A: I2 Inhibit -> I sIx
0x07 , // 0B: I1 inhIbit -> I sIx
0x37 , // 0C: M Mat -> More
0x38 , // 0D: N suN -> N NiNe
0x24 , // 0E: B Bag -> B Bag
0x33 , // 0F: V Van -> V Very
//
0x32 , // 10: CH* CHip -> SCH SHip (!)
0x32 , // 11: SH SHop -> SCH SHip
0x2F , // 12: Z Zoo -> Z Zero
0x10 , // 13: AW1 lAWful -> AW Office
0x39 , // 14: NG thiNG -> NG raNG
0x0F , // 15: AH1 fAther -> AH1 fAther
0x13 , // 16: OO1 lOOking -> OO lOOk
0x13 , // 17: OO bOOK -> OO lOOk
0x20 , // 18: L Land -> L Lift
0x29 , // 19: K triCK -> Kit
0x25 , // 1A: J* juDGe -> D paiD (!)
0x2C , // 1B: H Hello -> HF Heart
0x26 , // 1C: G Get -> KV taG
0x34 , // 1D: F Fast -> F Four
0x25 , // 1E: D paiD -> D paiD
0x30 , // 1F: S paSS -> S Same
//
0x08 , // 20: A dAY -> A mAde
0x09 , // 21: AY dAY -> AI cAre
0x03 , // 22: Y1 Yard -> YI Year
0x1B , // 23: UH3 missIOn -> UH3 nUt
0x0E , // 24: AH mOp -> AH gOt
0x27 , // 25: P Past -> P Pen
0x11 , // 26: O cOld -> O stOre
0x07 , // 27: I pIn -> I sIx
0x16 , // 28: U mOve -> U tUne
0x05 , // 29: Y anY -> AY plEAse
0x28 , // 2A: T Tap -> T Tart
0x1D , // 2B: R Red -> R Roof
0x01 , // 2C: E mEEt -> E mEEt
0x23 , // 2D: W Win -> W Water
0x0C , // 2E: AE dAd -> AE dAd
0x0D , // 2F: AE1 After -> AE1 After
//
0x10 , // 30: AW2 sAlty -> AW Office
0x1A , // 31: UH2 About -> UH2 whAt
0x19 , // 32: UH1 Uncle -> UH1 lOve
0x18 , // 33: UH cUp -> UH wOnder
0x11 , // 34: O2 fOr -> O stOre
0x11 , // 35: O1 abOArd -> O stOre
0x14 , // 36: IU yOU -> IU yOU
0x14 , // 37: U1 yOU -> IU yOU
0x35 , // 38: THV THe -> THV THere
0x36 , // 39: TH THin -> TH wiTH
0x1C , // 3A: ER bIrd -> ER bIrd
0x0A , // 3B: EH gEt -> EH nEst
0x01 , // 3C: E1 bE -> E mEEt
0x10 , // 3D: AW cAll -> AW Office
0x00 , // 3E: PA1 no sound -> PA
0x00 , // 3F: STOP no sound -> PA
} ;
static void Votrax_Write ( BYTE nDevice , BYTE nValue )
{
g_bVotraxPhoneme = true ;
2006-05-02 21:56:28 +00:00
// !A/R: Acknowledge receipt of phoneme data (signal goes from high to low)
SY6522_AY8910 * pMB = & g_MB [ nDevice ] ;
pMB - > sy6522 . IFR & = ~ IxR_VOTRAX ;
UpdateIFR ( pMB ) ;
2006-12-27 19:11:19 +00:00
g_nSSI263Device = nDevice ;
2006-02-25 20:50:29 +00:00
SSI263_Play ( Votrax2SSI263 [ nValue & PHONEME_MASK ] ) ;
}
//===========================================================================
static void MB_Update ( )
{
2016-09-04 20:14:26 +00:00
//char szDbg[200];
2009-10-07 21:38:42 +00:00
2009-01-09 23:27:29 +00:00
if ( ! MockingboardVoice . bActive )
return ;
if ( g_bFullSpeed )
{
// Keep AY reg writes relative to the current 'frame'
// - Required for Ultima3:
// . Tune ends
// . g_bFullSpeed:=true (disk-spinning) for ~50 frames
// . U3 sets AY_ENABLE:=0xFF (as a side-effect, this sets g_bFullSpeed:=false)
// o Without this, the write to AY_ENABLE gets ignored (since AY8910's /g_uLastCumulativeCycles/ was last set 50 frame ago)
AY8910UpdateSetCycles ( ) ;
// TODO:
// If any AY regs have changed then push them out to the AY chip
2006-02-25 20:50:29 +00:00
return ;
2009-01-09 23:27:29 +00:00
}
2006-02-25 20:50:29 +00:00
//
2009-01-09 23:27:29 +00:00
if ( ! g_bMB_RegAccessedFlag )
2006-02-25 20:50:29 +00:00
{
if ( ! g_nMB_InActiveCycleCount )
{
g_nMB_InActiveCycleCount = g_nCumulativeCycles ;
}
else if ( g_nCumulativeCycles - g_nMB_InActiveCycleCount > ( unsigned __int64 ) g_fCurrentCLK6502 / 10 )
{
// After 0.1 sec of Apple time, assume MB is not active
g_bMB_Active = false ;
}
}
else
{
g_nMB_InActiveCycleCount = 0 ;
g_bMB_RegAccessedFlag = false ;
g_bMB_Active = true ;
}
//
static DWORD dwByteOffset = ( DWORD ) - 1 ;
static int nNumSamplesError = 0 ;
2009-01-09 23:27:29 +00:00
const double n6522TimerPeriod = MB_GetFramePeriod ( ) ;
2006-02-25 20:50:29 +00:00
2009-01-09 23:27:29 +00:00
const double nIrqFreq = g_fCurrentCLK6502 / n6522TimerPeriod + 0.5 ; // Round-up
const int nNumSamplesPerPeriod = ( int ) ( ( double ) SAMPLE_RATE / nIrqFreq ) ; // Eg. For 60Hz this is 735
int nNumSamples = nNumSamplesPerPeriod + nNumSamplesError ; // Apply correction
2006-02-25 20:50:29 +00:00
if ( nNumSamples < = 0 )
nNumSamples = 0 ;
if ( nNumSamples > 2 * nNumSamplesPerPeriod )
nNumSamples = 2 * nNumSamplesPerPeriod ;
if ( nNumSamples )
for ( int nChip = 0 ; nChip < NUM_AY8910 ; nChip + + )
AY8910Update ( nChip , & ppAYVoiceBuffer [ nChip * NUM_VOICES_PER_AY8910 ] , nNumSamples ) ;
//
DWORD dwDSLockedBufferSize0 , dwDSLockedBufferSize1 ;
SHORT * pDSLockedBuffer0 , * pDSLockedBuffer1 ;
DWORD dwCurrentPlayCursor , dwCurrentWriteCursor ;
HRESULT hr = MockingboardVoice . lpDSBvoice - > GetCurrentPosition ( & dwCurrentPlayCursor , & dwCurrentWriteCursor ) ;
if ( FAILED ( hr ) )
return ;
if ( dwByteOffset = = ( DWORD ) - 1 )
{
// First time in this func
dwByteOffset = dwCurrentWriteCursor ;
}
else
{
// Check that our offset isn't between Play & Write positions
if ( dwCurrentWriteCursor > dwCurrentPlayCursor )
{
// |-----PxxxxxW-----|
if ( ( dwByteOffset > dwCurrentPlayCursor ) & & ( dwByteOffset < dwCurrentWriteCursor ) )
2009-10-07 21:38:42 +00:00
{
double fTicksSecs = ( double ) GetTickCount ( ) / 1000.0 ;
2016-07-12 21:43:31 +00:00
//sprintf(szDbg, "%010.3f: [MBUpdt] PC=%08X, WC=%08X, Diff=%08X, Off=%08X, NS=%08X xxx\n", fTicksSecs, dwCurrentPlayCursor, dwCurrentWriteCursor, dwCurrentWriteCursor-dwCurrentPlayCursor, dwByteOffset, nNumSamples);
//OutputDebugString(szDbg);
2016-09-04 20:14:26 +00:00
//if (g_fh) fprintf(g_fh, "%s", szDbg);
2009-10-07 21:38:42 +00:00
2006-02-25 20:50:29 +00:00
dwByteOffset = dwCurrentWriteCursor ;
2009-10-07 21:38:42 +00:00
}
2006-02-25 20:50:29 +00:00
}
else
{
// |xxW----------Pxxx|
if ( ( dwByteOffset > dwCurrentPlayCursor ) | | ( dwByteOffset < dwCurrentWriteCursor ) )
2009-10-07 21:38:42 +00:00
{
double fTicksSecs = ( double ) GetTickCount ( ) / 1000.0 ;
2016-07-12 21:43:31 +00:00
//sprintf(szDbg, "%010.3f: [MBUpdt] PC=%08X, WC=%08X, Diff=%08X, Off=%08X, NS=%08X XXX\n", fTicksSecs, dwCurrentPlayCursor, dwCurrentWriteCursor, dwCurrentWriteCursor-dwCurrentPlayCursor, dwByteOffset, nNumSamples);
//OutputDebugString(szDbg);
2016-09-04 20:14:26 +00:00
//if (g_fh) fprintf(g_fh, "%s", szDbg);
2009-10-07 21:38:42 +00:00
2006-02-25 20:50:29 +00:00
dwByteOffset = dwCurrentWriteCursor ;
2009-10-07 21:38:42 +00:00
}
2006-02-25 20:50:29 +00:00
}
}
int nBytesRemaining = dwByteOffset - dwCurrentPlayCursor ;
if ( nBytesRemaining < 0 )
nBytesRemaining + = g_dwDSBufferSize ;
// Calc correction factor so that play-buffer doesn't under/overflow
2009-10-07 21:38:42 +00:00
const int nErrorInc = SoundCore_GetErrorInc ( ) ;
2006-02-25 20:50:29 +00:00
if ( nBytesRemaining < g_dwDSBufferSize / 4 )
2009-10-07 21:38:42 +00:00
nNumSamplesError + = nErrorInc ; // < 0.25 of buffer remaining
2006-02-25 20:50:29 +00:00
else if ( nBytesRemaining > g_dwDSBufferSize / 2 )
2009-10-07 21:38:42 +00:00
nNumSamplesError - = nErrorInc ; // > 0.50 of buffer remaining
2006-02-25 20:50:29 +00:00
else
nNumSamplesError = 0 ; // Acceptable amount of data in buffer
if ( nNumSamples = = 0 )
return ;
//
2009-01-09 23:27:29 +00:00
const double fAttenuation = g_bPhasorEnable ? 2.0 / 3.0 : 1.0 ;
2006-02-25 20:50:29 +00:00
for ( int i = 0 ; i < nNumSamples ; i + + )
{
// Mockingboard stereo (all voices on an AY8910 wire-or'ed together)
// L = Address.b7=0, R = Address.b7=1
int nDataL = 0 , nDataR = 0 ;
2009-01-09 23:27:29 +00:00
for ( UINT j = 0 ; j < NUM_VOICES_PER_AY8910 ; j + + )
2006-02-25 20:50:29 +00:00
{
// Slot4
nDataL + = ( int ) ( ( double ) ppAYVoiceBuffer [ 0 * NUM_VOICES_PER_AY8910 + j ] [ i ] * fAttenuation ) ;
nDataR + = ( int ) ( ( double ) ppAYVoiceBuffer [ 1 * NUM_VOICES_PER_AY8910 + j ] [ i ] * fAttenuation ) ;
// Slot5
nDataL + = ( int ) ( ( double ) ppAYVoiceBuffer [ 2 * NUM_VOICES_PER_AY8910 + j ] [ i ] * fAttenuation ) ;
nDataR + = ( int ) ( ( double ) ppAYVoiceBuffer [ 3 * NUM_VOICES_PER_AY8910 + j ] [ i ] * fAttenuation ) ;
}
// Cap the superpositioned output
if ( nDataL < nWaveDataMin )
nDataL = nWaveDataMin ;
else if ( nDataL > nWaveDataMax )
nDataL = nWaveDataMax ;
if ( nDataR < nWaveDataMin )
nDataR = nWaveDataMin ;
else if ( nDataR > nWaveDataMax )
nDataR = nWaveDataMax ;
g_nMixBuffer [ i * g_nMB_NumChannels + 0 ] = ( short ) nDataL ; // L
g_nMixBuffer [ i * g_nMB_NumChannels + 1 ] = ( short ) nDataR ; // R
}
//
if ( ! DSGetLock ( MockingboardVoice . lpDSBvoice ,
dwByteOffset , ( DWORD ) nNumSamples * sizeof ( short ) * g_nMB_NumChannels ,
& pDSLockedBuffer0 , & dwDSLockedBufferSize0 ,
& pDSLockedBuffer1 , & dwDSLockedBufferSize1 ) )
return ;
memcpy ( pDSLockedBuffer0 , & g_nMixBuffer [ 0 ] , dwDSLockedBufferSize0 ) ;
if ( pDSLockedBuffer1 )
memcpy ( pDSLockedBuffer1 , & g_nMixBuffer [ dwDSLockedBufferSize0 / sizeof ( short ) ] , dwDSLockedBufferSize1 ) ;
// Commit sound buffer
hr = MockingboardVoice . lpDSBvoice - > Unlock ( ( void * ) pDSLockedBuffer0 , dwDSLockedBufferSize0 ,
2009-01-09 23:27:29 +00:00
( void * ) pDSLockedBuffer1 , dwDSLockedBufferSize1 ) ;
2006-02-25 20:50:29 +00:00
dwByteOffset = ( dwByteOffset + ( DWORD ) nNumSamples * sizeof ( short ) * g_nMB_NumChannels ) % g_dwDSBufferSize ;
# ifdef RIFF_MB
RiffPutSamples ( & g_nMixBuffer [ 0 ] , nNumSamples ) ;
# endif
}
//-----------------------------------------------------------------------------
static DWORD WINAPI SSI263Thread ( LPVOID lpParameter )
{
while ( 1 )
{
DWORD dwWaitResult = WaitForMultipleObjects (
g_nNumEvents , // number of handles in array
g_hSSI263Event , // array of event handles
FALSE , // wait until any one is signaled
INFINITE ) ;
if ( ( dwWaitResult < WAIT_OBJECT_0 ) | | ( dwWaitResult > WAIT_OBJECT_0 + g_nNumEvents - 1 ) )
continue ;
dwWaitResult - = WAIT_OBJECT_0 ; // Determine event # that signaled
if ( dwWaitResult = = ( g_nNumEvents - 1 ) ) // Termination event
break ;
// Phoneme completed playing
2006-12-27 19:11:19 +00:00
if ( g_bStopPhoneme )
{
g_bStopPhoneme = false ;
continue ;
}
# if LOG_SSI263
//if(g_fh) fprintf(g_fh, "IRQ: Phoneme complete (0x%02X)\n\n", g_nCurrentActivePhoneme);
# endif
2006-02-25 20:50:29 +00:00
SSI263Voice [ g_nCurrentActivePhoneme ] . bActive = false ;
g_nCurrentActivePhoneme = - 1 ;
// Phoneme complete, so generate IRQ if necessary
SY6522_AY8910 * pMB = & g_MB [ g_nSSI263Device ] ;
if ( g_bPhasorEnable )
{
if ( ( pMB - > SpeechChip . CurrentMode ! = MODE_IRQ_DISABLED ) )
{
2006-05-02 21:56:28 +00:00
pMB - > SpeechChip . CurrentMode | = 1 ; // Set SSI263's D7 pin
2006-12-27 19:11:19 +00:00
// Phasor's SSI263.IRQ line appears to be wired directly to IRQ (Bypassing the 6522)
CpuIrqAssert ( IS_SPEECH ) ;
2006-02-25 20:50:29 +00:00
}
}
else
{
if ( ( pMB - > SpeechChip . CurrentMode ! = MODE_IRQ_DISABLED ) & & ( pMB - > sy6522 . PCR = = 0x0C ) )
{
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR | = IxR_PERIPHERAL ;
2006-02-25 20:50:29 +00:00
UpdateIFR ( pMB ) ;
2006-05-02 21:56:28 +00:00
pMB - > SpeechChip . CurrentMode | = 1 ; // Set SSI263's D7 pin
2006-02-25 20:50:29 +00:00
}
}
//
if ( g_bVotraxPhoneme & & ( pMB - > sy6522 . PCR = = 0xB0 ) )
{
2006-05-02 21:56:28 +00:00
// !A/R: Time-out of old phoneme (signal goes from low to high)
2006-02-25 20:50:29 +00:00
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR | = IxR_VOTRAX ;
UpdateIFR ( pMB ) ;
2006-02-25 20:50:29 +00:00
g_bVotraxPhoneme = false ;
}
}
return 0 ;
}
//-----------------------------------------------------------------------------
static void SSI263_Play ( unsigned int nPhoneme )
{
# if 1
HRESULT hr ;
2006-12-27 19:11:19 +00:00
{
2015-04-12 17:17:08 +00:00
int nCurrPhoneme = g_nCurrentActivePhoneme ; // local copy in case SSI263Thread sets it to -1
if ( nCurrPhoneme > = 0 )
{
// A write to DURPHON before previous phoneme has completed
g_bStopPhoneme = true ;
hr = SSI263Voice [ nCurrPhoneme ] . lpDSBvoice - > Stop ( ) ;
// Busy-wait until ACK from SSI263Thread
// . required to avoid data-race
while ( g_bStopPhoneme & & // wait for SSI263Thread to ACK the lpDSBVoice->Stop()
g_nCurrentActivePhoneme > = 0 ) // wait for SSI263Thread to get end of sample event
;
g_bStopPhoneme = false ;
}
2006-12-27 19:11:19 +00:00
}
2006-02-25 20:50:29 +00:00
g_nCurrentActivePhoneme = nPhoneme ;
2006-05-02 21:56:28 +00:00
hr = SSI263Voice [ g_nCurrentActivePhoneme ] . lpDSBvoice - > SetCurrentPosition ( 0 ) ;
if ( FAILED ( hr ) )
return ;
2006-02-25 20:50:29 +00:00
hr = SSI263Voice [ g_nCurrentActivePhoneme ] . lpDSBvoice - > Play ( 0 , 0 , 0 ) ; // Not looping
if ( FAILED ( hr ) )
return ;
SSI263Voice [ g_nCurrentActivePhoneme ] . bActive = true ;
# else
HRESULT hr ;
bool bPause ;
if ( nPhoneme = = 1 )
nPhoneme = 2 ; // Missing this sample, so map to phoneme-2
if ( nPhoneme = = 0 )
{
bPause = true ;
}
else
{
// nPhoneme--;
nPhoneme - = 2 ; // Missing phoneme-1
bPause = false ;
}
DWORD dwDSLockedBufferSize = 0 ; // Size of the locked DirectSound buffer
SHORT * pDSLockedBuffer ;
hr = SSI263Voice . lpDSBvoice - > Stop ( ) ;
if ( ! DSGetLock ( SSI263Voice . lpDSBvoice , 0 , 0 , & pDSLockedBuffer , & dwDSLockedBufferSize , NULL , 0 ) )
return ;
unsigned int nPhonemeShortLength = g_nPhonemeInfo [ nPhoneme ] . nLength ;
unsigned int nPhonemeByteLength = g_nPhonemeInfo [ nPhoneme ] . nLength * sizeof ( SHORT ) ;
if ( bPause )
{
// 'pause' length is length of 1st phoneme (arbitrary choice, since don't know real length)
memset ( pDSLockedBuffer , 0 , g_dwMaxPhonemeLen ) ;
}
else
{
memcpy ( pDSLockedBuffer , & g_nPhonemeData [ g_nPhonemeInfo [ nPhoneme ] . nOffset ] , nPhonemeByteLength ) ;
memset ( & pDSLockedBuffer [ nPhonemeShortLength ] , 0 , g_dwMaxPhonemeLen - nPhonemeByteLength ) ;
}
#if 0
DSBPOSITIONNOTIFY PositionNotify ;
PositionNotify . dwOffset = nPhonemeByteLength - 1 ; // End of phoneme
PositionNotify . hEventNotify = g_hSSI263Event [ 0 ] ;
hr = SSI263Voice . lpDSNotify - > SetNotificationPositions ( 1 , & PositionNotify ) ;
if ( FAILED ( hr ) )
{
DirectSound_ErrorText ( hr ) ;
return ;
}
# endif
hr = SSI263Voice . lpDSBvoice - > Unlock ( ( void * ) pDSLockedBuffer , dwDSLockedBufferSize , NULL , 0 ) ;
if ( FAILED ( hr ) )
return ;
hr = SSI263Voice . lpDSBvoice - > Play ( 0 , 0 , 0 ) ; // Not looping
if ( FAILED ( hr ) )
return ;
SSI263Voice . bActive = true ;
# endif
}
//-----------------------------------------------------------------------------
static bool MB_DSInit ( )
{
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_DSInit \n " , g_bMBAvailable ) ;
2012-10-05 07:01:27 +00:00
# ifdef NO_DIRECT_X
return false ;
# else // NO_DIRECT_X
2006-02-25 20:50:29 +00:00
//
// Create single Mockingboard voice
//
DWORD dwDSLockedBufferSize = 0 ; // Size of the locked DirectSound buffer
SHORT * pDSLockedBuffer ;
if ( ! g_bDSAvailable )
return false ;
HRESULT hr = DSGetSoundBuffer ( & MockingboardVoice , DSBCAPS_CTRLVOLUME , g_dwDSBufferSize , SAMPLE_RATE , 2 ) ;
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_DSInit: DSGetSoundBuffer(), hr=0x%08X \n " , hr ) ;
2006-02-25 20:50:29 +00:00
if ( FAILED ( hr ) )
{
if ( g_fh ) fprintf ( g_fh , " MB: DSGetSoundBuffer failed (%08X) \n " , hr ) ;
return false ;
}
2013-03-23 13:34:01 +00:00
bool bRes = DSZeroVoiceBuffer ( & MockingboardVoice , " MB " , g_dwDSBufferSize ) ;
LogFileOutput ( " MB_DSInit: DSZeroVoiceBuffer(), res=%d \n " , bRes ? 1 : 0 ) ;
if ( ! bRes )
2006-02-25 20:50:29 +00:00
return false ;
MockingboardVoice . bActive = true ;
// Volume might've been setup from value in Registry
if ( ! MockingboardVoice . nVolume )
MockingboardVoice . nVolume = DSBVOLUME_MAX ;
2013-03-23 13:34:01 +00:00
hr = MockingboardVoice . lpDSBvoice - > SetVolume ( MockingboardVoice . nVolume ) ;
LogFileOutput ( " MB_DSInit: SetVolume(), hr=0x%08X \n " , hr ) ;
2006-02-25 20:50:29 +00:00
//---------------------------------
//
// Create SSI263 voice
//
#if 0
g_dwMaxPhonemeLen = 0 ;
for ( int i = 0 ; i < sizeof ( g_nPhonemeInfo ) / sizeof ( PHONEME_INFO ) ; i + + )
if ( g_dwMaxPhonemeLen < g_nPhonemeInfo [ i ] . nLength )
g_dwMaxPhonemeLen = g_nPhonemeInfo [ i ] . nLength ;
g_dwMaxPhonemeLen * = sizeof ( SHORT ) ;
# endif
g_hSSI263Event [ 0 ] = CreateEvent ( NULL , // lpEventAttributes
FALSE , // bManualReset (FALSE = auto-reset)
FALSE , // bInitialState (FALSE = non-signaled)
NULL ) ; // lpName
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_DSInit: CreateEvent(), g_hSSI263Event[0]=0x%08X \n " , ( UINT32 ) g_hSSI263Event [ 0 ] ) ;
2006-02-25 20:50:29 +00:00
g_hSSI263Event [ 1 ] = CreateEvent ( NULL , // lpEventAttributes
FALSE , // bManualReset (FALSE = auto-reset)
FALSE , // bInitialState (FALSE = non-signaled)
NULL ) ; // lpName
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_DSInit: CreateEvent(), g_hSSI263Event[1]=0x%08X \n " , ( UINT32 ) g_hSSI263Event [ 1 ] ) ;
2006-02-25 20:50:29 +00:00
if ( ( g_hSSI263Event [ 0 ] = = NULL ) | | ( g_hSSI263Event [ 1 ] = = NULL ) )
{
if ( g_fh ) fprintf ( g_fh , " SSI263: CreateEvent failed \n " ) ;
return false ;
}
for ( int i = 0 ; i < 64 ; i + + )
{
unsigned int nPhoneme = i ;
bool bPause ;
if ( nPhoneme = = 1 )
nPhoneme = 2 ; // Missing this sample, so map to phoneme-2
if ( nPhoneme = = 0 )
{
bPause = true ;
}
else
{
// nPhoneme--;
nPhoneme - = 2 ; // Missing phoneme-1
bPause = false ;
}
unsigned int nPhonemeByteLength = g_nPhonemeInfo [ nPhoneme ] . nLength * sizeof ( SHORT ) ;
2006-12-27 19:11:19 +00:00
// NB. DSBCAPS_LOCSOFTWARE required for Phoneme+2==0x28 - sample too short (see KB327698)
hr = DSGetSoundBuffer ( & SSI263Voice [ i ] , DSBCAPS_CTRLVOLUME + DSBCAPS_CTRLPOSITIONNOTIFY + DSBCAPS_LOCSOFTWARE , nPhonemeByteLength , 22050 , 1 ) ;
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_DSInit: (%02d) DSGetSoundBuffer(), hr=0x%08X \n " , i , hr ) ;
2006-02-25 20:50:29 +00:00
if ( FAILED ( hr ) )
{
if ( g_fh ) fprintf ( g_fh , " SSI263: DSGetSoundBuffer failed (%08X) \n " , hr ) ;
return false ;
}
2013-03-23 13:34:01 +00:00
bRes = DSGetLock ( SSI263Voice [ i ] . lpDSBvoice , 0 , 0 , & pDSLockedBuffer , & dwDSLockedBufferSize , NULL , 0 ) ;
2013-03-23 14:14:48 +00:00
//LogFileOutput("MB_DSInit: (%02d) DSGetLock(), res=%d\n", i, bRes ? 1 : 0); // WARNING: Lock acquired && doing heavy-weight logging
2006-02-25 20:50:29 +00:00
if ( FAILED ( hr ) )
{
if ( g_fh ) fprintf ( g_fh , " SSI263: DSGetLock failed (%08X) \n " , hr ) ;
return false ;
}
if ( bPause )
{
// 'pause' length is length of 1st phoneme (arbitrary choice, since don't know real length)
memset ( pDSLockedBuffer , 0x00 , nPhonemeByteLength ) ;
}
else
{
memcpy ( pDSLockedBuffer , & g_nPhonemeData [ g_nPhonemeInfo [ nPhoneme ] . nOffset ] , nPhonemeByteLength ) ;
}
hr = SSI263Voice [ i ] . lpDSBvoice - > QueryInterface ( IID_IDirectSoundNotify , ( LPVOID * ) & SSI263Voice [ i ] . lpDSNotify ) ;
2013-03-23 14:14:48 +00:00
//LogFileOutput("MB_DSInit: (%02d) QueryInterface(), hr=0x%08X\n", i, hr); // WARNING: Lock acquired && doing heavy-weight logging
2006-02-25 20:50:29 +00:00
if ( FAILED ( hr ) )
{
if ( g_fh ) fprintf ( g_fh , " SSI263: QueryInterface failed (%08X) \n " , hr ) ;
return false ;
}
DSBPOSITIONNOTIFY PositionNotify ;
// PositionNotify.dwOffset = nPhonemeByteLength - 1; // End of buffer
PositionNotify . dwOffset = DSBPN_OFFSETSTOP ; // End of buffer
PositionNotify . hEventNotify = g_hSSI263Event [ 0 ] ;
hr = SSI263Voice [ i ] . lpDSNotify - > SetNotificationPositions ( 1 , & PositionNotify ) ;
2013-03-23 14:14:48 +00:00
//LogFileOutput("MB_DSInit: (%02d) SetNotificationPositions(), hr=0x%08X\n", i, hr); // WARNING: Lock acquired && doing heavy-weight logging
2006-02-25 20:50:29 +00:00
if ( FAILED ( hr ) )
{
if ( g_fh ) fprintf ( g_fh , " SSI263: SetNotifyPos failed (%08X) \n " , hr ) ;
return false ;
}
hr = SSI263Voice [ i ] . lpDSBvoice - > Unlock ( ( void * ) pDSLockedBuffer , dwDSLockedBufferSize , NULL , 0 ) ;
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_DSInit: (%02d) Unlock(),hr=0x%08X \n " , i , hr ) ;
2006-02-25 20:50:29 +00:00
if ( FAILED ( hr ) )
{
if ( g_fh ) fprintf ( g_fh , " SSI263: DSUnlock failed (%08X) \n " , hr ) ;
return false ;
}
SSI263Voice [ i ] . bActive = false ;
SSI263Voice [ i ] . nVolume = MockingboardVoice . nVolume ; // Use same volume as MB
2013-03-23 13:34:01 +00:00
hr = SSI263Voice [ i ] . lpDSBvoice - > SetVolume ( SSI263Voice [ i ] . nVolume ) ;
LogFileOutput ( " MB_DSInit: (%02d) SetVolume(), hr=0x%08X \n " , i , hr ) ;
2006-02-25 20:50:29 +00:00
}
//
DWORD dwThreadId ;
g_hThread = CreateThread ( NULL , // lpThreadAttributes
0 , // dwStackSize
SSI263Thread ,
NULL , // lpParameter
0 , // dwCreationFlags : 0 = Run immediately
& dwThreadId ) ; // lpThreadId
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_DSInit: CreateThread(), g_hThread=0x%08X \n " , ( UINT32 ) g_hThread ) ;
2006-02-25 20:50:29 +00:00
2013-03-23 13:34:01 +00:00
BOOL bRes2 = SetThreadPriority ( g_hThread , THREAD_PRIORITY_TIME_CRITICAL ) ;
LogFileOutput ( " MB_DSInit: SetThreadPriority(), bRes=%d \n " , bRes2 ? 1 : 0 ) ;
2006-02-25 20:50:29 +00:00
return true ;
2012-10-05 07:01:27 +00:00
# endif // NO_DIRECT_X
2006-02-25 20:50:29 +00:00
}
static void MB_DSUninit ( )
{
if ( g_hThread )
{
DWORD dwExitCode ;
SetEvent ( g_hSSI263Event [ g_nNumEvents - 1 ] ) ; // Signal to thread that it should exit
do
{
if ( GetExitCodeThread ( g_hThread , & dwExitCode ) )
{
if ( dwExitCode = = STILL_ACTIVE )
Sleep ( 10 ) ;
else
break ;
}
}
while ( 1 ) ;
CloseHandle ( g_hThread ) ;
g_hThread = NULL ;
}
//
if ( MockingboardVoice . lpDSBvoice & & MockingboardVoice . bActive )
{
MockingboardVoice . lpDSBvoice - > Stop ( ) ;
MockingboardVoice . bActive = false ;
}
DSReleaseSoundBuffer ( & MockingboardVoice ) ;
//
for ( int i = 0 ; i < 64 ; i + + )
{
if ( SSI263Voice [ i ] . lpDSBvoice & & SSI263Voice [ i ] . bActive )
{
SSI263Voice [ i ] . lpDSBvoice - > Stop ( ) ;
SSI263Voice [ i ] . bActive = false ;
}
DSReleaseSoundBuffer ( & SSI263Voice [ i ] ) ;
}
//
if ( g_hSSI263Event [ 0 ] )
{
CloseHandle ( g_hSSI263Event [ 0 ] ) ;
g_hSSI263Event [ 0 ] = NULL ;
}
if ( g_hSSI263Event [ 1 ] )
{
CloseHandle ( g_hSSI263Event [ 1 ] ) ;
g_hSSI263Event [ 1 ] = NULL ;
}
}
//=============================================================================
//
// ----- ALL GLOBALLY ACCESSIBLE FUNCTIONS ARE BELOW THIS LINE -----
//
//=============================================================================
void MB_Initialize ( )
{
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_Initialize: g_bDisableDirectSound=%d, g_bDisableDirectSoundMockingboard=%d \n " , g_bDisableDirectSound , g_bDisableDirectSoundMockingboard ) ;
2009-10-07 21:38:42 +00:00
if ( g_bDisableDirectSound | | g_bDisableDirectSoundMockingboard )
2006-02-25 20:50:29 +00:00
{
MockingboardVoice . bMute = true ;
2012-03-20 23:17:06 +00:00
g_SoundcardType = CT_Empty ;
2006-02-25 20:50:29 +00:00
}
else
{
memset ( & g_MB , 0 , sizeof ( g_MB ) ) ;
2006-02-28 18:40:05 +00:00
int i ;
for ( i = 0 ; i < NUM_VOICES ; i + + )
2006-02-25 20:50:29 +00:00
ppAYVoiceBuffer [ i ] = new short [ SAMPLE_RATE ] ; // Buffer can hold a max of 1 seconds worth of samples
AY8910_InitAll ( ( int ) g_fCurrentCLK6502 , SAMPLE_RATE ) ;
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_Initialize: AY8910_InitAll() \n " ) ;
2006-02-25 20:50:29 +00:00
for ( i = 0 ; i < NUM_AY8910 ; i + + )
g_MB [ i ] . nAY8910Number = i ;
//
g_bMBAvailable = MB_DSInit ( ) ;
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_Initialize: MB_DSInit(), g_bMBAvailable=%d \n " , g_bMBAvailable ) ;
2006-02-25 20:50:29 +00:00
MB_Reset ( ) ;
2013-03-23 13:34:01 +00:00
LogFileOutput ( " MB_Initialize: MB_Reset() \n " ) ;
2006-02-25 20:50:29 +00:00
}
}
//-----------------------------------------------------------------------------
// NB. Called when /g_fCurrentCLK6502/ changes
void MB_Reinitialize ( )
{
2015-04-11 21:24:54 +00:00
AY8910_InitClock ( ( int ) g_fCurrentCLK6502 ) ; // todo: account for g_PhasorClockScaleFactor?
// NB. Other calls to AY8910_InitClock() use the constant CLK_6502
2006-02-25 20:50:29 +00:00
}
//-----------------------------------------------------------------------------
void MB_Destroy ( )
{
MB_DSUninit ( ) ;
for ( int i = 0 ; i < NUM_VOICES ; i + + )
delete [ ] ppAYVoiceBuffer [ i ] ;
}
//-----------------------------------------------------------------------------
2012-08-12 11:03:38 +00:00
static void ResetState ( )
{
g_n6522TimerPeriod = 0 ;
g_nMBTimerDevice = TIMERDEVICE_INVALID ;
g_uLastCumulativeCycles = 0 ;
g_nSSI263Device = 0 ;
g_nCurrentActivePhoneme = - 1 ;
g_bStopPhoneme = false ;
g_bVotraxPhoneme = false ;
g_nMB_InActiveCycleCount = 0 ;
g_bMB_RegAccessedFlag = false ;
g_bMB_Active = false ;
//g_bMBAvailable = false;
2015-04-11 21:24:54 +00:00
// g_SoundcardType = CT_Empty; // Don't uncomment, else _ASSERT will fire in MB_Read() after an F2->MB_Reset()
// g_bPhasorEnable = false;
2012-08-12 11:03:38 +00:00
g_nPhasorMode = 0 ;
2015-04-11 21:24:54 +00:00
g_PhasorClockScaleFactor = 1 ;
2012-08-12 11:03:38 +00:00
}
2006-02-25 20:50:29 +00:00
void MB_Reset ( )
{
if ( ! g_bDSAvailable )
return ;
for ( int i = 0 ; i < NUM_AY8910 ; i + + )
{
ResetSY6522 ( & g_MB [ i ] ) ;
AY8910_reset ( i ) ;
}
2012-08-12 11:03:38 +00:00
ResetState ( ) ;
2006-02-25 20:50:29 +00:00
MB_Reinitialize ( ) ; // Reset CLK for AY8910s
}
//-----------------------------------------------------------------------------
2007-05-28 11:16:42 +00:00
static BYTE __stdcall MB_Read ( WORD PC , WORD nAddr , BYTE bWrite , BYTE nValue , ULONG nCyclesLeft )
2006-02-25 20:50:29 +00:00
{
2007-08-06 21:38:35 +00:00
MB_UpdateCycles ( nCyclesLeft ) ;
2007-05-28 11:16:42 +00:00
2013-03-22 20:54:14 +00:00
# ifdef _DEBUG
2007-05-28 11:16:42 +00:00
if ( ! IS_APPLE2 & & ! MemCheckSLOTCXROM ( ) )
2013-03-22 20:54:14 +00:00
{
_ASSERT ( 0 ) ; // Card ROM disabled, so IORead_Cxxx() returns the internal ROM
2007-05-28 11:16:42 +00:00
return mem [ nAddr ] ;
2013-03-22 20:54:14 +00:00
}
2007-05-28 11:16:42 +00:00
2013-03-22 20:54:14 +00:00
if ( g_SoundcardType = = CT_Empty )
2012-03-20 23:17:06 +00:00
{
2013-03-22 20:54:14 +00:00
_ASSERT ( 0 ) ; // Card unplugged, so IORead_Cxxx() returns the floating bus
2012-01-21 14:36:35 +00:00
return MemReadFloatingBus ( nCyclesLeft ) ;
2012-03-20 23:17:06 +00:00
}
2013-03-22 20:54:14 +00:00
# endif
2006-02-25 20:50:29 +00:00
BYTE nMB = ( nAddr > > 8 ) & 0xf - SLOT4 ;
BYTE nOffset = nAddr & 0xff ;
if ( g_bPhasorEnable )
{
if ( nMB ! = 0 ) // Slot4 only
2012-01-21 14:36:35 +00:00
return MemReadFloatingBus ( nCyclesLeft ) ;
2006-02-25 20:50:29 +00:00
int CS ;
if ( g_nPhasorMode & 1 )
CS = ( ( nAddr & 0x80 ) > > 6 ) | ( ( nAddr & 0x10 ) > > 4 ) ; // 0, 1, 2 or 3
else // Mockingboard Mode
CS = ( ( nAddr & 0x80 ) > > 7 ) + 1 ; // 1 or 2
2012-01-21 14:36:35 +00:00
BYTE nRes = 0 ;
2006-02-25 20:50:29 +00:00
if ( CS & 1 )
nRes | = SY6522_Read ( nMB * NUM_DEVS_PER_MB + SY6522_DEVICE_A , nAddr & 0xf ) ;
if ( CS & 2 )
nRes | = SY6522_Read ( nMB * NUM_DEVS_PER_MB + SY6522_DEVICE_B , nAddr & 0xf ) ;
2012-01-21 14:36:35 +00:00
bool bAccessedDevice = ( CS & 3 ) ? true : false ;
2006-02-25 20:50:29 +00:00
if ( ( nOffset > = SSI263_Offset ) & & ( nOffset < = ( SSI263_Offset + 0x05 ) ) )
2012-01-21 14:36:35 +00:00
{
2006-02-25 20:50:29 +00:00
nRes | = SSI263_Read ( nMB , nAddr & 0xf ) ;
2012-01-21 14:36:35 +00:00
bAccessedDevice = true ;
}
2006-02-25 20:50:29 +00:00
2012-01-21 14:36:35 +00:00
return bAccessedDevice ? nRes : MemReadFloatingBus ( nCyclesLeft ) ;
2006-02-25 20:50:29 +00:00
}
if ( nOffset < = ( SY6522A_Offset + 0x0F ) )
return SY6522_Read ( nMB * NUM_DEVS_PER_MB + SY6522_DEVICE_A , nAddr & 0xf ) ;
else if ( ( nOffset > = SY6522B_Offset ) & & ( nOffset < = ( SY6522B_Offset + 0x0F ) ) )
return SY6522_Read ( nMB * NUM_DEVS_PER_MB + SY6522_DEVICE_B , nAddr & 0xf ) ;
else if ( ( nOffset > = SSI263_Offset ) & & ( nOffset < = ( SSI263_Offset + 0x05 ) ) )
return SSI263_Read ( nMB , nAddr & 0xf ) ;
else
2012-01-21 14:36:35 +00:00
return MemReadFloatingBus ( nCyclesLeft ) ;
2006-02-25 20:50:29 +00:00
}
//-----------------------------------------------------------------------------
2007-05-28 11:16:42 +00:00
static BYTE __stdcall MB_Write ( WORD PC , WORD nAddr , BYTE bWrite , BYTE nValue , ULONG nCyclesLeft )
2006-02-25 20:50:29 +00:00
{
2007-08-06 21:38:35 +00:00
MB_UpdateCycles ( nCyclesLeft ) ;
2007-05-28 11:16:42 +00:00
2013-03-22 20:54:14 +00:00
# ifdef _DEBUG
2007-05-28 11:16:42 +00:00
if ( ! IS_APPLE2 & & ! MemCheckSLOTCXROM ( ) )
2013-03-22 20:54:14 +00:00
{
_ASSERT ( 0 ) ; // Card ROM disabled, so IORead_Cxxx() returns the internal ROM
2007-05-28 11:16:42 +00:00
return 0 ;
2013-03-22 20:54:14 +00:00
}
2007-05-28 11:16:42 +00:00
2012-03-20 23:17:06 +00:00
if ( g_SoundcardType = = CT_Empty )
{
2013-03-22 20:54:14 +00:00
_ASSERT ( 0 ) ; // Card unplugged, so IORead_Cxxx() returns the floating bus
2007-05-28 11:16:42 +00:00
return 0 ;
2012-03-20 23:17:06 +00:00
}
2013-03-22 20:54:14 +00:00
# endif
2006-02-25 20:50:29 +00:00
BYTE nMB = ( nAddr > > 8 ) & 0xf - SLOT4 ;
BYTE nOffset = nAddr & 0xff ;
if ( g_bPhasorEnable )
{
if ( nMB ! = 0 ) // Slot4 only
2007-05-28 11:16:42 +00:00
return 0 ;
2006-02-25 20:50:29 +00:00
int CS ;
if ( g_nPhasorMode & 1 )
CS = ( ( nAddr & 0x80 ) > > 6 ) | ( ( nAddr & 0x10 ) > > 4 ) ; // 0, 1, 2 or 3
else // Mockingboard Mode
CS = ( ( nAddr & 0x80 ) > > 7 ) + 1 ; // 1 or 2
if ( CS & 1 )
SY6522_Write ( nMB * NUM_DEVS_PER_MB + SY6522_DEVICE_A , nAddr & 0xf , nValue ) ;
if ( CS & 2 )
SY6522_Write ( nMB * NUM_DEVS_PER_MB + SY6522_DEVICE_B , nAddr & 0xf , nValue ) ;
if ( ( nOffset > = SSI263_Offset ) & & ( nOffset < = ( SSI263_Offset + 0x05 ) ) )
SSI263_Write ( nMB * 2 + 1 , nAddr & 0xf , nValue ) ; // Second 6522 is used for speech chip
2007-05-28 11:16:42 +00:00
return 0 ;
2006-02-25 20:50:29 +00:00
}
if ( nOffset < = ( SY6522A_Offset + 0x0F ) )
SY6522_Write ( nMB * NUM_DEVS_PER_MB + SY6522_DEVICE_A , nAddr & 0xf , nValue ) ;
else if ( ( nOffset > = SY6522B_Offset ) & & ( nOffset < = ( SY6522B_Offset + 0x0F ) ) )
SY6522_Write ( nMB * NUM_DEVS_PER_MB + SY6522_DEVICE_B , nAddr & 0xf , nValue ) ;
else if ( ( nOffset > = SSI263_Offset ) & & ( nOffset < = ( SSI263_Offset + 0x05 ) ) )
SSI263_Write ( nMB * 2 + 1 , nAddr & 0xf , nValue ) ; // Second 6522 is used for speech chip
2007-05-28 11:16:42 +00:00
return 0 ;
2006-02-25 20:50:29 +00:00
}
//-----------------------------------------------------------------------------
2013-03-22 20:54:14 +00:00
static BYTE __stdcall PhasorIO ( WORD PC , WORD nAddr , BYTE bWrite , BYTE nValue , ULONG nCyclesLeft )
2006-02-25 20:50:29 +00:00
{
if ( ! g_bPhasorEnable )
2007-08-11 11:25:51 +00:00
return MemReadFloatingBus ( nCyclesLeft ) ;
2006-02-25 20:50:29 +00:00
if ( g_nPhasorMode < 2 )
2007-05-28 11:16:42 +00:00
g_nPhasorMode = nAddr & 1 ;
2006-02-25 20:50:29 +00:00
2015-04-11 21:24:54 +00:00
g_PhasorClockScaleFactor = ( nAddr & 4 ) ? 2 : 1 ;
2006-02-25 20:50:29 +00:00
2015-04-11 21:24:54 +00:00
AY8910_InitClock ( ( int ) ( CLK_6502 * g_PhasorClockScaleFactor ) ) ;
2006-02-25 20:50:29 +00:00
2007-08-11 11:25:51 +00:00
return MemReadFloatingBus ( nCyclesLeft ) ;
2006-02-25 20:50:29 +00:00
}
//-----------------------------------------------------------------------------
2009-04-16 21:18:13 +00:00
void MB_InitializeIO ( LPBYTE pCxRomPeripheral , UINT uSlot4 , UINT uSlot5 )
{
2012-03-20 23:17:06 +00:00
// Mockingboard: Slot 4 & 5
// Phasor : Slot 4
// <other> : Slot 4 & 5
if ( g_Slot4 ! = CT_MockingboardC & & g_Slot4 ! = CT_Phasor )
2012-01-22 13:46:36 +00:00
{
2012-03-20 23:17:06 +00:00
MB_SetSoundcardType ( CT_Empty ) ;
return ;
2012-01-22 13:46:36 +00:00
}
2012-03-20 23:17:06 +00:00
if ( g_Slot4 = = CT_MockingboardC )
RegisterIoHandler ( uSlot4 , IO_Null , IO_Null , MB_Read , MB_Write , NULL , NULL ) ;
else // Phasor
RegisterIoHandler ( uSlot4 , PhasorIO , PhasorIO , MB_Read , MB_Write , NULL , NULL ) ;
if ( g_Slot5 = = CT_MockingboardC )
RegisterIoHandler ( uSlot5 , IO_Null , IO_Null , MB_Read , MB_Write , NULL , NULL ) ;
MB_SetSoundcardType ( g_Slot4 ) ;
2009-04-16 21:18:13 +00:00
}
//-----------------------------------------------------------------------------
2006-02-25 20:50:29 +00:00
void MB_Mute ( )
{
2012-03-20 23:17:06 +00:00
if ( g_SoundcardType = = CT_Empty )
2006-02-25 20:50:29 +00:00
return ;
if ( MockingboardVoice . bActive & & ! MockingboardVoice . bMute )
{
MockingboardVoice . lpDSBvoice - > SetVolume ( DSBVOLUME_MIN ) ;
MockingboardVoice . bMute = true ;
}
if ( g_nCurrentActivePhoneme > = 0 )
SSI263Voice [ g_nCurrentActivePhoneme ] . lpDSBvoice - > SetVolume ( DSBVOLUME_MIN ) ;
}
//-----------------------------------------------------------------------------
void MB_Demute ( )
{
2012-03-20 23:17:06 +00:00
if ( g_SoundcardType = = CT_Empty )
2006-02-25 20:50:29 +00:00
return ;
if ( MockingboardVoice . bActive & & MockingboardVoice . bMute )
{
MockingboardVoice . lpDSBvoice - > SetVolume ( MockingboardVoice . nVolume ) ;
MockingboardVoice . bMute = false ;
}
if ( g_nCurrentActivePhoneme > = 0 )
SSI263Voice [ g_nCurrentActivePhoneme ] . lpDSBvoice - > SetVolume ( SSI263Voice [ g_nCurrentActivePhoneme ] . nVolume ) ;
}
//-----------------------------------------------------------------------------
2007-08-06 21:38:35 +00:00
// Called by CpuExecute() before doing CPU emulation
void MB_StartOfCpuExecute ( )
{
g_uLastCumulativeCycles = g_nCumulativeCycles ;
}
2006-02-25 20:50:29 +00:00
// Called by ContinueExecution() at the end of every video frame
2007-08-06 21:38:35 +00:00
void MB_EndOfVideoFrame ( )
2006-02-25 20:50:29 +00:00
{
2012-03-20 23:17:06 +00:00
if ( g_SoundcardType = = CT_Empty )
2006-02-25 20:50:29 +00:00
return ;
2009-01-09 23:27:29 +00:00
if ( ! g_bMBTimerIrqActive )
2006-02-25 20:50:29 +00:00
MB_Update ( ) ;
}
//-----------------------------------------------------------------------------
2009-01-09 23:27:29 +00:00
// Called by CpuExecute() after every N opcodes (N = ~1000 @ 1MHz)
2007-08-06 21:38:35 +00:00
void MB_UpdateCycles ( ULONG uExecutedCycles )
2006-02-25 20:50:29 +00:00
{
2012-03-20 23:17:06 +00:00
if ( g_SoundcardType = = CT_Empty )
2006-02-25 20:50:29 +00:00
return ;
2007-08-06 21:38:35 +00:00
CpuCalcCycles ( uExecutedCycles ) ;
UINT64 uCycles = g_nCumulativeCycles - g_uLastCumulativeCycles ;
g_uLastCumulativeCycles = g_nCumulativeCycles ;
_ASSERT ( uCycles < 0x10000 ) ;
USHORT nClocks = ( USHORT ) uCycles ;
2006-02-25 20:50:29 +00:00
for ( int i = 0 ; i < NUM_SY6522 ; i + + )
{
SY6522_AY8910 * pMB = & g_MB [ i ] ;
USHORT OldTimer1 = pMB - > sy6522 . TIMER1_COUNTER . w ;
USHORT OldTimer2 = pMB - > sy6522 . TIMER2_COUNTER . w ;
pMB - > sy6522 . TIMER1_COUNTER . w - = nClocks ;
pMB - > sy6522 . TIMER2_COUNTER . w - = nClocks ;
// Check for counter underflow
bool bTimer1Underflow = ( ! ( OldTimer1 & 0x8000 ) & & ( pMB - > sy6522 . TIMER1_COUNTER . w & 0x8000 ) ) ;
bool bTimer2Underflow = ( ! ( OldTimer2 & 0x8000 ) & & ( pMB - > sy6522 . TIMER2_COUNTER . w & 0x8000 ) ) ;
if ( bTimer1Underflow & & ( g_nMBTimerDevice = = i ) & & g_bMBTimerIrqActive )
{
2009-01-09 23:27:29 +00:00
# ifdef _DEBUG
2006-05-02 21:56:28 +00:00
g_uTimer1IrqCount + + ; // DEBUG
2009-01-09 23:27:29 +00:00
# endif
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR | = IxR_TIMER1 ;
2006-02-25 20:50:29 +00:00
UpdateIFR ( pMB ) ;
2006-05-02 21:56:28 +00:00
2006-02-25 20:50:29 +00:00
if ( ( pMB - > sy6522 . ACR & RUNMODE ) = = RM_ONESHOT )
{
// One-shot mode
2009-01-09 23:27:29 +00:00
// - Phasor's playback code uses one-shot mode
// - Willy Byte sets to one-shot to stop the timer IRQ
StopTimer ( pMB ) ;
2006-02-25 20:50:29 +00:00
}
else
{
// Free-running mode
// - Ultima4/5 change ACCESS_TIMER1 after a couple of IRQs into tune
pMB - > sy6522 . TIMER1_COUNTER . w = pMB - > sy6522 . TIMER1_LATCH . w ;
StartTimer ( pMB ) ;
}
2009-01-09 23:27:29 +00:00
MB_Update ( ) ;
}
else if ( bTimer1Underflow
& & ! g_bMBTimerIrqActive // StopTimer() has been called
& & ( pMB - > sy6522 . IFR & IxR_TIMER1 ) // IRQ
& & ( ( pMB - > sy6522 . ACR & RUNMODE ) = = RM_ONESHOT ) ) // One-shot mode
{
// Fix for Willy Byte - need to confirm that 6522 really does this!
// . It never accesses IER/IFR/TIMER1 regs to clear IRQ
pMB - > sy6522 . IFR & = ~ IxR_TIMER1 ; // Deassert the TIMER IRQ
UpdateIFR ( pMB ) ;
2006-02-25 20:50:29 +00:00
}
}
}
//-----------------------------------------------------------------------------
2012-03-20 23:17:06 +00:00
SS_CARDTYPE MB_GetSoundcardType ( )
2006-02-25 20:50:29 +00:00
{
return g_SoundcardType ;
}
2012-03-20 23:17:06 +00:00
void MB_SetSoundcardType ( SS_CARDTYPE NewSoundcardType )
2006-02-25 20:50:29 +00:00
{
2012-03-20 23:17:06 +00:00
// if ((NewSoundcardType == SC_UNINIT) || (g_SoundcardType == NewSoundcardType))
if ( g_SoundcardType = = NewSoundcardType )
2006-02-25 20:50:29 +00:00
return ;
g_SoundcardType = NewSoundcardType ;
2012-03-20 23:17:06 +00:00
if ( g_SoundcardType = = CT_Empty )
2006-02-25 20:50:29 +00:00
MB_Mute ( ) ;
2012-03-20 23:17:06 +00:00
g_bPhasorEnable = ( g_SoundcardType = = CT_Phasor ) ;
2006-02-25 20:50:29 +00:00
}
//-----------------------------------------------------------------------------
double MB_GetFramePeriod ( )
{
2006-05-02 21:56:28 +00:00
return ( g_bMBTimerIrqActive | | ( g_MB [ 0 ] . sy6522 . IFR & IxR_TIMER1 ) ) ? ( double ) g_n6522TimerPeriod : g_f6522TimerPeriod_NoIRQ ;
2006-02-25 20:50:29 +00:00
}
bool MB_IsActive ( )
{
if ( ! MockingboardVoice . bActive )
return false ;
// Ignore /g_bMBTimerIrqActive/ as timer's irq handler will access 6522 regs affecting /g_bMB_Active/
return g_bMB_Active ;
}
//-----------------------------------------------------------------------------
DWORD MB_GetVolume ( )
{
return MockingboardVoice . dwUserVolume ;
}
void MB_SetVolume ( DWORD dwVolume , DWORD dwVolumeMax )
{
MockingboardVoice . dwUserVolume = dwVolume ;
MockingboardVoice . nVolume = NewVolume ( dwVolume , dwVolumeMax ) ;
if ( MockingboardVoice . bActive )
MockingboardVoice . lpDSBvoice - > SetVolume ( MockingboardVoice . nVolume ) ;
}
//===========================================================================
2015-02-13 22:40:53 +00:00
// Called by debugger - Debugger_Display.cpp
2015-04-11 21:24:54 +00:00
void MB_GetSnapshot_v1 ( SS_CARD_MOCKINGBOARD_v1 * const pSS , const DWORD dwSlot )
2006-02-25 20:50:29 +00:00
{
2015-04-11 21:24:54 +00:00
pSS - > Hdr . UnitHdr . hdr . v2 . Length = sizeof ( SS_CARD_MOCKINGBOARD_v1 ) ;
2015-02-13 22:40:53 +00:00
pSS - > Hdr . UnitHdr . hdr . v2 . Type = UT_Card ;
pSS - > Hdr . UnitHdr . hdr . v2 . Version = 1 ;
2006-02-25 20:50:29 +00:00
2015-02-13 22:40:53 +00:00
pSS - > Hdr . Slot = dwSlot ;
pSS - > Hdr . Type = CT_MockingboardC ;
2006-02-25 20:50:29 +00:00
UINT nMbCardNum = dwSlot - SLOT4 ;
UINT nDeviceNum = nMbCardNum * 2 ;
SY6522_AY8910 * pMB = & g_MB [ nDeviceNum ] ;
2015-04-11 21:24:54 +00:00
for ( UINT i = 0 ; i < MB_UNITS_PER_CARD_v1 ; i + + )
2006-02-25 20:50:29 +00:00
{
memcpy ( & pSS - > Unit [ i ] . RegsSY6522 , & pMB - > sy6522 , sizeof ( SY6522 ) ) ;
memcpy ( & pSS - > Unit [ i ] . RegsAY8910 , AY8910_GetRegsPtr ( nDeviceNum ) , 16 ) ;
memcpy ( & pSS - > Unit [ i ] . RegsSSI263 , & pMB - > SpeechChip , sizeof ( SSI263A ) ) ;
pSS - > Unit [ i ] . nAYCurrentRegister = pMB - > nAYCurrentRegister ;
2015-04-11 21:24:54 +00:00
pSS - > Unit [ i ] . bTimer1IrqPending = false ;
pSS - > Unit [ i ] . bTimer2IrqPending = false ;
pSS - > Unit [ i ] . bSpeechIrqPending = false ;
2006-02-25 20:50:29 +00:00
nDeviceNum + + ;
pMB + + ;
}
}
2015-04-11 21:24:54 +00:00
int MB_SetSnapshot_v1 ( const SS_CARD_MOCKINGBOARD_v1 * const pSS , const DWORD /*dwSlot*/ )
2006-02-25 20:50:29 +00:00
{
2015-02-13 22:40:53 +00:00
if ( pSS - > Hdr . UnitHdr . hdr . v1 . dwVersion ! = MAKE_VERSION ( 1 , 0 , 0 , 0 ) )
2006-02-25 20:50:29 +00:00
return - 1 ;
2015-02-13 22:40:53 +00:00
UINT nMbCardNum = pSS - > Hdr . Slot - SLOT4 ;
2006-02-25 20:50:29 +00:00
UINT nDeviceNum = nMbCardNum * 2 ;
SY6522_AY8910 * pMB = & g_MB [ nDeviceNum ] ;
g_nSSI263Device = 0 ;
g_nCurrentActivePhoneme = - 1 ;
2015-04-11 21:24:54 +00:00
for ( UINT i = 0 ; i < MB_UNITS_PER_CARD_v1 ; i + + )
2006-02-25 20:50:29 +00:00
{
memcpy ( & pMB - > sy6522 , & pSS - > Unit [ i ] . RegsSY6522 , sizeof ( SY6522 ) ) ;
memcpy ( AY8910_GetRegsPtr ( nDeviceNum ) , & pSS - > Unit [ i ] . RegsAY8910 , 16 ) ;
memcpy ( & pMB - > SpeechChip , & pSS - > Unit [ i ] . RegsSSI263 , sizeof ( SSI263A ) ) ;
pMB - > nAYCurrentRegister = pSS - > Unit [ i ] . nAYCurrentRegister ;
StartTimer ( pMB ) ; // Attempt to start timer
//
// Crude - currently only support a single speech chip
2006-05-02 21:56:28 +00:00
// FIX THIS:
// . Speech chip could be Votrax instead
// . Is this IRQ compatible with Phasor?
2015-12-05 16:50:27 +00:00
if ( pMB - > SpeechChip . DurationPhoneme )
2006-02-25 20:50:29 +00:00
{
g_nSSI263Device = nDeviceNum ;
2006-05-02 21:56:28 +00:00
if ( ( pMB - > SpeechChip . CurrentMode ! = MODE_IRQ_DISABLED ) & & ( pMB - > sy6522 . PCR = = 0x0C ) & & ( pMB - > sy6522 . IER & IxR_PERIPHERAL ) )
2006-02-25 20:50:29 +00:00
{
2006-05-02 21:56:28 +00:00
pMB - > sy6522 . IFR | = IxR_PERIPHERAL ;
2006-02-25 20:50:29 +00:00
UpdateIFR ( pMB ) ;
2006-05-02 21:56:28 +00:00
pMB - > SpeechChip . CurrentMode | = 1 ; // Set SSI263's D7 pin
2006-02-25 20:50:29 +00:00
}
}
nDeviceNum + + ;
pMB + + ;
}
return 0 ;
}
2015-02-13 22:40:53 +00:00
//===========================================================================
2015-04-11 21:24:54 +00:00
static UINT DoWriteFile ( const HANDLE hFile , const void * const pData , const UINT Length )
{
DWORD dwBytesWritten ;
BOOL bRes = WriteFile ( hFile ,
pData ,
Length ,
& dwBytesWritten ,
NULL ) ;
if ( ! bRes | | ( dwBytesWritten ! = Length ) )
{
//dwError = GetLastError();
throw std : : string ( " Card: save error " ) ;
}
return dwBytesWritten ;
}
static UINT DoReadFile ( const HANDLE hFile , void * const pData , const UINT Length )
{
DWORD dwBytesRead ;
BOOL bRes = ReadFile ( hFile ,
pData ,
Length ,
& dwBytesRead ,
NULL ) ;
if ( dwBytesRead ! = Length )
throw std : : string ( " Card: file corrupt " ) ;
return dwBytesRead ;
}
//===========================================================================
2015-12-05 16:50:27 +00:00
const UINT NUM_MB_UNITS = 2 ;
const UINT NUM_PHASOR_UNITS = 2 ;
# define SS_YAML_KEY_MB_UNIT "Unit"
# define SS_YAML_KEY_SY6522 "SY6522"
# define SS_YAML_KEY_SY6522_REG_ORB "ORB"
# define SS_YAML_KEY_SY6522_REG_ORA "ORA"
# define SS_YAML_KEY_SY6522_REG_DDRB "DDRB"
# define SS_YAML_KEY_SY6522_REG_DDRA "DDRA"
# define SS_YAML_KEY_SY6522_REG_T1_COUNTER "Timer1 Counter"
# define SS_YAML_KEY_SY6522_REG_T1_LATCH "Timer1 Latch"
# define SS_YAML_KEY_SY6522_REG_T2_COUNTER "Timer2 Counter"
# define SS_YAML_KEY_SY6522_REG_T2_LATCH "Timer2 Latch"
# define SS_YAML_KEY_SY6522_REG_SERIAL_SHIFT "Serial Shift"
# define SS_YAML_KEY_SY6522_REG_ACR "ACR"
# define SS_YAML_KEY_SY6522_REG_PCR "PCR"
# define SS_YAML_KEY_SY6522_REG_IFR "IFR"
# define SS_YAML_KEY_SY6522_REG_IER "IER"
# define SS_YAML_KEY_SSI263 "SSI263"
# define SS_YAML_KEY_SSI263_REG_DUR_PHON "Duration / Phoneme"
# define SS_YAML_KEY_SSI263_REG_INF "Inflection"
# define SS_YAML_KEY_SSI263_REG_RATE_INF "Rate / Inflection"
# define SS_YAML_KEY_SSI263_REG_CTRL_ART_AMP "Control / Articulation / Amplitude"
# define SS_YAML_KEY_SSI263_REG_FILTER_FREQ "Filter Frequency"
# define SS_YAML_KEY_SSI263_REG_CURRENT_MODE "Current Mode"
# define SS_YAML_KEY_AY_CURR_REG "AY Current Register"
# define SS_YAML_KEY_TIMER1_IRQ "Timer1 IRQ Pending"
# define SS_YAML_KEY_TIMER2_IRQ "Timer2 IRQ Pending"
# define SS_YAML_KEY_SPEECH_IRQ "Speech IRQ Pending"
# define SS_YAML_KEY_PHASOR_UNIT "Unit"
# define SS_YAML_KEY_PHASOR_CLOCK_SCALE_FACTOR "Clock Scale Factor"
# define SS_YAML_KEY_PHASOR_MODE "Mode"
std : : string MB_GetSnapshotCardName ( void )
{
static const std : : string name ( " Mockingboard C " ) ;
return name ;
}
std : : string Phasor_GetSnapshotCardName ( void )
{
static const std : : string name ( " Phasor " ) ;
return name ;
}
static void SaveSnapshotSY6522 ( YamlSaveHelper & yamlSaveHelper , SY6522 & sy6522 )
{
YamlSaveHelper : : Label label ( yamlSaveHelper , " %s: \n " , SS_YAML_KEY_SY6522 ) ;
2016-03-04 21:26:14 +00:00
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_ORB , sy6522 . ORB ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_ORA , sy6522 . ORA ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_DDRB , sy6522 . DDRB ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_DDRA , sy6522 . DDRA ) ;
yamlSaveHelper . SaveHexUint16 ( SS_YAML_KEY_SY6522_REG_T1_COUNTER , sy6522 . TIMER1_COUNTER . w ) ;
yamlSaveHelper . SaveHexUint16 ( SS_YAML_KEY_SY6522_REG_T1_LATCH , sy6522 . TIMER1_LATCH . w ) ;
yamlSaveHelper . SaveHexUint16 ( SS_YAML_KEY_SY6522_REG_T2_COUNTER , sy6522 . TIMER2_COUNTER . w ) ;
yamlSaveHelper . SaveHexUint16 ( SS_YAML_KEY_SY6522_REG_T2_LATCH , sy6522 . TIMER2_LATCH . w ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_SERIAL_SHIFT , sy6522 . SERIAL_SHIFT ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_ACR , sy6522 . ACR ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_PCR , sy6522 . PCR ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_IFR , sy6522 . IFR ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SY6522_REG_IER , sy6522 . IER ) ;
2015-12-05 16:50:27 +00:00
// NB. No need to write ORA_NO_HS, since same data as ORA, just without handshake
}
static void SaveSnapshotSSI263 ( YamlSaveHelper & yamlSaveHelper , SSI263A & ssi263 )
{
YamlSaveHelper : : Label label ( yamlSaveHelper , " %s: \n " , SS_YAML_KEY_SSI263 ) ;
2016-03-04 21:26:14 +00:00
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SSI263_REG_DUR_PHON , ssi263 . DurationPhoneme ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SSI263_REG_INF , ssi263 . Inflection ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SSI263_REG_RATE_INF , ssi263 . RateInflection ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SSI263_REG_CTRL_ART_AMP , ssi263 . CtrlArtAmp ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SSI263_REG_FILTER_FREQ , ssi263 . FilterFreq ) ;
yamlSaveHelper . SaveHexUint8 ( SS_YAML_KEY_SSI263_REG_CURRENT_MODE , ssi263 . CurrentMode ) ;
2015-12-05 16:50:27 +00:00
}
void MB_SaveSnapshot ( YamlSaveHelper & yamlSaveHelper , const UINT uSlot )
{
const UINT nMbCardNum = uSlot - SLOT4 ;
UINT nDeviceNum = nMbCardNum * 2 ;
SY6522_AY8910 * pMB = & g_MB [ nDeviceNum ] ;
YamlSaveHelper : : Slot slot ( yamlSaveHelper , MB_GetSnapshotCardName ( ) , uSlot , 1 ) ; // fixme: object should be just 1 Mockingboard card & it will know its slot
YamlSaveHelper : : Label state ( yamlSaveHelper , " %s: \n " , SS_YAML_KEY_STATE ) ;
for ( UINT i = 0 ; i < NUM_MB_UNITS ; i + + )
{
YamlSaveHelper : : Label unit ( yamlSaveHelper , " %s%d: \n " , SS_YAML_KEY_MB_UNIT , i ) ;
SaveSnapshotSY6522 ( yamlSaveHelper , pMB - > sy6522 ) ;
AY8910_SaveSnapshot ( yamlSaveHelper , nDeviceNum , std : : string ( " " ) ) ;
SaveSnapshotSSI263 ( yamlSaveHelper , pMB - > SpeechChip ) ;
2016-03-04 21:26:14 +00:00
yamlSaveHelper . SaveHexUint4 ( SS_YAML_KEY_AY_CURR_REG , pMB - > nAYCurrentRegister ) ;
2016-03-01 22:31:17 +00:00
yamlSaveHelper . Save ( " %s: %s # Not supported \n " , SS_YAML_KEY_TIMER1_IRQ , " false " ) ;
yamlSaveHelper . Save ( " %s: %s # Not supported \n " , SS_YAML_KEY_TIMER2_IRQ , " false " ) ;
yamlSaveHelper . Save ( " %s: %s # Not supported \n " , SS_YAML_KEY_SPEECH_IRQ , " false " ) ;
2015-12-05 16:50:27 +00:00
nDeviceNum + + ;
pMB + + ;
}
}
static void LoadSnapshotSY6522 ( YamlLoadHelper & yamlLoadHelper , SY6522 & sy6522 )
{
if ( ! yamlLoadHelper . GetSubMap ( SS_YAML_KEY_SY6522 ) )
throw std : : string ( " Card: Expected key: " ) + std : : string ( SS_YAML_KEY_SY6522 ) ;
2016-02-24 22:38:59 +00:00
sy6522 . ORB = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_ORB ) ;
sy6522 . ORA = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_ORA ) ;
sy6522 . DDRB = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_DDRB ) ;
sy6522 . DDRA = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_DDRA ) ;
sy6522 . TIMER1_COUNTER . w = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_T1_COUNTER ) ;
sy6522 . TIMER1_LATCH . w = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_T1_LATCH ) ;
sy6522 . TIMER2_COUNTER . w = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_T2_COUNTER ) ;
sy6522 . TIMER2_LATCH . w = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_T2_LATCH ) ;
sy6522 . SERIAL_SHIFT = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_SERIAL_SHIFT ) ;
sy6522 . ACR = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_ACR ) ;
sy6522 . PCR = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_PCR ) ;
sy6522 . IFR = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_IFR ) ;
sy6522 . IER = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SY6522_REG_IER ) ;
2015-12-05 16:50:27 +00:00
sy6522 . ORA_NO_HS = 0 ; // Not saved
yamlLoadHelper . PopMap ( ) ;
}
static void LoadSnapshotSSI263 ( YamlLoadHelper & yamlLoadHelper , SSI263A & ssi263 )
{
if ( ! yamlLoadHelper . GetSubMap ( SS_YAML_KEY_SSI263 ) )
throw std : : string ( " Card: Expected key: " ) + std : : string ( SS_YAML_KEY_SSI263 ) ;
2016-02-24 22:38:59 +00:00
ssi263 . DurationPhoneme = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SSI263_REG_DUR_PHON ) ;
ssi263 . Inflection = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SSI263_REG_INF ) ;
ssi263 . RateInflection = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SSI263_REG_RATE_INF ) ;
ssi263 . CtrlArtAmp = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SSI263_REG_CTRL_ART_AMP ) ;
ssi263 . FilterFreq = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SSI263_REG_FILTER_FREQ ) ;
ssi263 . CurrentMode = yamlLoadHelper . LoadUint ( SS_YAML_KEY_SSI263_REG_CURRENT_MODE ) ;
2015-12-05 16:50:27 +00:00
yamlLoadHelper . PopMap ( ) ;
}
bool MB_LoadSnapshot ( YamlLoadHelper & yamlLoadHelper , UINT slot , UINT version )
{
if ( slot ! = 4 & & slot ! = 5 ) // fixme
throw std : : string ( " Card: wrong slot " ) ;
if ( version ! = 1 )
throw std : : string ( " Card: wrong version " ) ;
AY8910UpdateSetCycles ( ) ;
const UINT nMbCardNum = slot - SLOT4 ;
UINT nDeviceNum = nMbCardNum * 2 ;
SY6522_AY8910 * pMB = & g_MB [ nDeviceNum ] ;
g_nSSI263Device = 0 ;
g_nCurrentActivePhoneme = - 1 ;
for ( UINT i = 0 ; i < NUM_MB_UNITS ; i + + )
{
char szNum [ 2 ] = { ' 0 ' + i , 0 } ;
std : : string unit = std : : string ( SS_YAML_KEY_MB_UNIT ) + std : : string ( szNum ) ;
if ( ! yamlLoadHelper . GetSubMap ( unit ) )
throw std : : string ( " Card: Expected key: " ) + std : : string ( unit ) ;
LoadSnapshotSY6522 ( yamlLoadHelper , pMB - > sy6522 ) ;
AY8910_LoadSnapshot ( yamlLoadHelper , nDeviceNum , std : : string ( " " ) ) ;
LoadSnapshotSSI263 ( yamlLoadHelper , pMB - > SpeechChip ) ;
2016-02-24 22:38:59 +00:00
pMB - > nAYCurrentRegister = yamlLoadHelper . LoadUint ( SS_YAML_KEY_AY_CURR_REG ) ;
2016-03-01 22:31:17 +00:00
yamlLoadHelper . LoadBool ( SS_YAML_KEY_TIMER1_IRQ ) ; // Consume
yamlLoadHelper . LoadBool ( SS_YAML_KEY_TIMER2_IRQ ) ; // Consume
yamlLoadHelper . LoadBool ( SS_YAML_KEY_SPEECH_IRQ ) ; // Consume
2015-12-05 16:50:27 +00:00
yamlLoadHelper . PopMap ( ) ;
//
StartTimer ( pMB ) ; // Attempt to start timer
// Crude - currently only support a single speech chip
// FIX THIS:
// . Speech chip could be Votrax instead
// . Is this IRQ compatible with Phasor?
if ( pMB - > SpeechChip . DurationPhoneme )
{
g_nSSI263Device = nDeviceNum ;
if ( ( pMB - > SpeechChip . CurrentMode ! = MODE_IRQ_DISABLED ) & & ( pMB - > sy6522 . PCR = = 0x0C ) & & ( pMB - > sy6522 . IER & IxR_PERIPHERAL ) )
{
pMB - > sy6522 . IFR | = IxR_PERIPHERAL ;
UpdateIFR ( pMB ) ;
pMB - > SpeechChip . CurrentMode | = 1 ; // Set SSI263's D7 pin
}
}
nDeviceNum + + ;
pMB + + ;
}
AY8910_InitClock ( ( int ) CLK_6502 ) ;
// Setup in MB_InitializeIO() -> MB_SetSoundcardType()
g_SoundcardType = CT_Empty ;
g_bPhasorEnable = false ;
return true ;
}
void Phasor_SaveSnapshot ( YamlSaveHelper & yamlSaveHelper , const UINT uSlot )
{
if ( uSlot ! = 4 )
throw std : : string ( " Card: Phasor only supported in slot-4 " ) ;
UINT nDeviceNum = 0 ;
SY6522_AY8910 * pMB = & g_MB [ 0 ] ; // fixme: Phasor uses MB's slot4(2x6522), slot4(2xSSI263), but slot4+5(4xAY8910)
YamlSaveHelper : : Slot slot ( yamlSaveHelper , Phasor_GetSnapshotCardName ( ) , uSlot , 1 ) ; // fixme: object should be just 1 Mockingboard card & it will know its slot
YamlSaveHelper : : Label state ( yamlSaveHelper , " %s: \n " , SS_YAML_KEY_STATE ) ;
2016-02-24 21:51:20 +00:00
yamlSaveHelper . SaveUint ( SS_YAML_KEY_PHASOR_CLOCK_SCALE_FACTOR , g_PhasorClockScaleFactor ) ;
yamlSaveHelper . SaveUint ( SS_YAML_KEY_PHASOR_MODE , g_nPhasorMode ) ;
2015-12-05 16:50:27 +00:00
for ( UINT i = 0 ; i < NUM_PHASOR_UNITS ; i + + )
{
YamlSaveHelper : : Label unit ( yamlSaveHelper , " %s%d: \n " , SS_YAML_KEY_PHASOR_UNIT , i ) ;
SaveSnapshotSY6522 ( yamlSaveHelper , pMB - > sy6522 ) ;
AY8910_SaveSnapshot ( yamlSaveHelper , nDeviceNum + 0 , std : : string ( " -A " ) ) ;
AY8910_SaveSnapshot ( yamlSaveHelper , nDeviceNum + 1 , std : : string ( " -B " ) ) ;
SaveSnapshotSSI263 ( yamlSaveHelper , pMB - > SpeechChip ) ;
2016-03-04 21:26:14 +00:00
yamlSaveHelper . SaveHexUint4 ( SS_YAML_KEY_AY_CURR_REG , pMB - > nAYCurrentRegister ) ;
2016-03-01 22:31:17 +00:00
yamlSaveHelper . Save ( " %s: %s # Not supported \n " , SS_YAML_KEY_TIMER1_IRQ , " false " ) ;
yamlSaveHelper . Save ( " %s: %s # Not supported \n " , SS_YAML_KEY_TIMER2_IRQ , " false " ) ;
yamlSaveHelper . Save ( " %s: %s # Not supported \n " , SS_YAML_KEY_SPEECH_IRQ , " false " ) ;
2015-12-05 16:50:27 +00:00
nDeviceNum + = 2 ;
pMB + + ;
}
}
bool Phasor_LoadSnapshot ( YamlLoadHelper & yamlLoadHelper , UINT slot , UINT version )
{
if ( slot ! = 4 ) // fixme
throw std : : string ( " Card: wrong slot " ) ;
if ( version ! = 1 )
throw std : : string ( " Card: wrong version " ) ;
2016-02-24 22:38:59 +00:00
g_PhasorClockScaleFactor = yamlLoadHelper . LoadUint ( SS_YAML_KEY_PHASOR_CLOCK_SCALE_FACTOR ) ;
g_nPhasorMode = yamlLoadHelper . LoadUint ( SS_YAML_KEY_PHASOR_MODE ) ;
2015-12-05 16:50:27 +00:00
AY8910UpdateSetCycles ( ) ;
UINT nDeviceNum = 0 ;
SY6522_AY8910 * pMB = & g_MB [ 0 ] ;
g_nSSI263Device = 0 ;
g_nCurrentActivePhoneme = - 1 ;
for ( UINT i = 0 ; i < NUM_PHASOR_UNITS ; i + + )
{
char szNum [ 2 ] = { ' 0 ' + i , 0 } ;
std : : string unit = std : : string ( SS_YAML_KEY_MB_UNIT ) + std : : string ( szNum ) ;
if ( ! yamlLoadHelper . GetSubMap ( unit ) )
throw std : : string ( " Card: Expected key: " ) + std : : string ( unit ) ;
LoadSnapshotSY6522 ( yamlLoadHelper , pMB - > sy6522 ) ;
AY8910_LoadSnapshot ( yamlLoadHelper , nDeviceNum + 0 , std : : string ( " -A " ) ) ;
AY8910_LoadSnapshot ( yamlLoadHelper , nDeviceNum + 1 , std : : string ( " -B " ) ) ;
LoadSnapshotSSI263 ( yamlLoadHelper , pMB - > SpeechChip ) ;
2016-02-24 22:38:59 +00:00
pMB - > nAYCurrentRegister = yamlLoadHelper . LoadUint ( SS_YAML_KEY_AY_CURR_REG ) ;
2016-03-01 22:31:17 +00:00
yamlLoadHelper . LoadBool ( SS_YAML_KEY_TIMER1_IRQ ) ; // Consume
yamlLoadHelper . LoadBool ( SS_YAML_KEY_TIMER2_IRQ ) ; // Consume
yamlLoadHelper . LoadBool ( SS_YAML_KEY_SPEECH_IRQ ) ; // Consume
2015-12-05 16:50:27 +00:00
yamlLoadHelper . PopMap ( ) ;
//
StartTimer ( pMB ) ; // Attempt to start timer
// Crude - currently only support a single speech chip
// FIX THIS:
// . Speech chip could be Votrax instead
// . Is this IRQ compatible with Phasor?
if ( pMB - > SpeechChip . DurationPhoneme )
{
g_nSSI263Device = nDeviceNum ;
if ( ( pMB - > SpeechChip . CurrentMode ! = MODE_IRQ_DISABLED ) & & ( pMB - > sy6522 . PCR = = 0x0C ) & & ( pMB - > sy6522 . IER & IxR_PERIPHERAL ) )
{
pMB - > sy6522 . IFR | = IxR_PERIPHERAL ;
UpdateIFR ( pMB ) ;
pMB - > SpeechChip . CurrentMode | = 1 ; // Set SSI263's D7 pin
}
}
nDeviceNum + = 2 ;
pMB + + ;
}
AY8910_InitClock ( ( int ) ( CLK_6502 * g_PhasorClockScaleFactor ) ) ;
// Setup in MB_InitializeIO() -> MB_SetSoundcardType()
g_SoundcardType = CT_Empty ;
g_bPhasorEnable = false ;
return true ;
}