349 lines
9.3 KiB
C#
349 lines
9.3 KiB
C#
using System;
|
|
using System.IO;
|
|
|
|
using BizHawk.Emulation.Common;
|
|
using EMU7800.Core;
|
|
|
|
namespace BizHawk.Emulation.Cores.Atari.Atari7800
|
|
{
|
|
[CoreAttributes(
|
|
"EMU7800",
|
|
"",
|
|
isPorted: true,
|
|
isReleased: true,
|
|
portedVersion: "v1.5",
|
|
portedUrl: "http://emu7800.sourceforge.net/")]
|
|
[ServiceNotApplicable(typeof(ISettable<,>), typeof(IDriveLight))]
|
|
public partial class Atari7800 : IEmulator, ISaveRam, IDebuggable, IStatable, IInputPollable, IRegionable
|
|
{
|
|
// TODO:
|
|
// some things don't work when you try to plug in a 2600 game
|
|
static Atari7800()
|
|
{
|
|
// add alpha bits to palette tables
|
|
for (int i = 0; i < TIATables.NTSCPalette.Length; i++)
|
|
{
|
|
TIATables.NTSCPalette[i] |= unchecked((int)0xff000000);
|
|
}
|
|
|
|
for (int i = 0; i < TIATables.PALPalette.Length; i++)
|
|
{
|
|
TIATables.PALPalette[i] |= unchecked((int)0xff000000);
|
|
}
|
|
|
|
for (int i = 0; i < MariaTables.NTSCPalette.Length; i++)
|
|
{
|
|
MariaTables.NTSCPalette[i] |= unchecked((int)0xff000000);
|
|
}
|
|
|
|
for (int i = 0; i < MariaTables.PALPalette.Length; i++)
|
|
{
|
|
MariaTables.PALPalette[i] |= unchecked((int)0xff000000);
|
|
}
|
|
}
|
|
|
|
public Atari7800(CoreComm comm, GameInfo game, byte[] rom, string GameDBfn)
|
|
{
|
|
ServiceProvider = new BasicServiceProvider(this);
|
|
(ServiceProvider as BasicServiceProvider).Register<IVideoProvider>(_avProvider);
|
|
(ServiceProvider as BasicServiceProvider).Register<ISoundProvider>(_avProvider);
|
|
|
|
CoreComm = comm;
|
|
byte[] highscoreBIOS = comm.CoreFileProvider.GetFirmware("A78", "Bios_HSC", false, "Some functions may not work without the high score BIOS.");
|
|
byte[] pal_bios = comm.CoreFileProvider.GetFirmware("A78", "Bios_PAL", false, "The game will not run if the correct region BIOS is not available.");
|
|
byte[] ntsc_bios = comm.CoreFileProvider.GetFirmware("A78", "Bios_NTSC", false, "The game will not run if the correct region BIOS is not available.");
|
|
|
|
if (EMU7800.Win.GameProgramLibrary.EMU7800DB == null)
|
|
{
|
|
EMU7800.Win.GameProgramLibrary.EMU7800DB = new EMU7800.Win.GameProgramLibrary(new StreamReader(GameDBfn));
|
|
}
|
|
|
|
if (rom.Length % 1024 == 128)
|
|
{
|
|
Console.WriteLine("Trimming 128 byte .a78 header...");
|
|
byte[] newrom = new byte[rom.Length - 128];
|
|
Buffer.BlockCopy(rom, 128, newrom, 0, newrom.Length);
|
|
rom = newrom;
|
|
}
|
|
|
|
GameInfo = EMU7800.Win.GameProgramLibrary.EMU7800DB.TryRecognizeRom(rom);
|
|
CoreComm.RomStatusDetails = GameInfo.ToString();
|
|
Console.WriteLine("Rom Determiniation from 7800DB:");
|
|
Console.WriteLine(GameInfo.ToString());
|
|
|
|
this.rom = rom;
|
|
this.game = game;
|
|
this.hsbios = highscoreBIOS;
|
|
this.bios = GameInfo.MachineType == MachineType.A7800PAL ? pal_bios : ntsc_bios;
|
|
_pal = GameInfo.MachineType == MachineType.A7800PAL || GameInfo.MachineType == MachineType.A2600PAL;
|
|
|
|
if (bios == null)
|
|
{
|
|
throw new MissingFirmwareException("The BIOS corresponding to the region of the game you loaded is required to run Atari 7800 games.");
|
|
}
|
|
|
|
HardReset();
|
|
}
|
|
|
|
public IEmulatorServiceProvider ServiceProvider { get; private set; }
|
|
|
|
private readonly byte[] rom;
|
|
public readonly byte[] hsbios;
|
|
public readonly byte[] bios;
|
|
private Cart cart;
|
|
private MachineBase theMachine;
|
|
private readonly EMU7800.Win.GameProgram GameInfo;
|
|
public readonly byte[] hsram = new byte[2048];
|
|
|
|
public string SystemId => "A78"; // TODO 2600?
|
|
|
|
public GameInfo game;
|
|
|
|
public string BoardName => null;
|
|
|
|
public void FrameAdvance(bool render, bool rendersound)
|
|
{
|
|
_frame++;
|
|
|
|
if (Controller.IsPressed("Power"))
|
|
{
|
|
// it seems that theMachine.Reset() doesn't clear ram, etc
|
|
// this should leave hsram intact but clear most other things
|
|
HardReset();
|
|
}
|
|
|
|
ControlAdapter.Convert(Controller, theMachine.InputState);
|
|
theMachine.ComputeNextFrame(_avProvider.Framebuffer);
|
|
|
|
_islag = theMachine.InputState.Lagged;
|
|
|
|
if (_islag)
|
|
{
|
|
_lagcount++;
|
|
}
|
|
|
|
_avProvider.FillFrameBuffer();
|
|
}
|
|
|
|
public CoreComm CoreComm { get; }
|
|
public bool DeterministicEmulation { get; set; }
|
|
|
|
public int Frame => _frame;
|
|
|
|
private int _frame = 0;
|
|
|
|
public void Dispose()
|
|
{
|
|
if (_avProvider != null)
|
|
{
|
|
_avProvider.Dispose();
|
|
_avProvider = null;
|
|
}
|
|
}
|
|
|
|
public void ResetCounters()
|
|
{
|
|
_frame = 0;
|
|
_lagcount = 0;
|
|
_islag = false;
|
|
}
|
|
|
|
public Atari7800Control ControlAdapter { get; private set; }
|
|
|
|
public ControllerDefinition ControllerDefinition { get; private set; }
|
|
public IController Controller { private get; set; }
|
|
|
|
|
|
private class ConsoleLogger : ILogger
|
|
{
|
|
public void WriteLine(string format, params object[] args)
|
|
{
|
|
Console.WriteLine(format, args);
|
|
}
|
|
|
|
public void WriteLine(object value)
|
|
{
|
|
Console.WriteLine(value);
|
|
}
|
|
|
|
public void Write(string format, params object[] args)
|
|
{
|
|
Console.Write(format, args);
|
|
}
|
|
|
|
public void Write(object value)
|
|
{
|
|
Console.Write(value);
|
|
}
|
|
}
|
|
|
|
private readonly bool _pal;
|
|
public DisplayType Region => _pal ? DisplayType.PAL : DisplayType.NTSC;
|
|
|
|
private void HardReset()
|
|
{
|
|
cart = Cart.Create(rom, GameInfo.CartType);
|
|
ILogger logger = new ConsoleLogger();
|
|
|
|
HSC7800 hsc7800 = null;
|
|
if (hsbios != null)
|
|
{
|
|
hsc7800 = new HSC7800(hsbios, hsram);
|
|
}
|
|
|
|
Bios7800 bios7800 = new Bios7800(bios);
|
|
theMachine = MachineBase.Create
|
|
(GameInfo.MachineType,
|
|
cart,
|
|
bios7800,
|
|
hsc7800,
|
|
GameInfo.LController,
|
|
GameInfo.RController,
|
|
logger);
|
|
|
|
theMachine.Reset();
|
|
theMachine.InputState.InputPollCallback = InputCallbacks.Call;
|
|
|
|
ControlAdapter = new Atari7800Control(theMachine);
|
|
ControllerDefinition = ControlAdapter.ControlType;
|
|
|
|
_avProvider.ConnectToMachine(theMachine, GameInfo);
|
|
|
|
// to sync exactly with audio as this emulator creates and times it, the frame rate should be exactly 60:1 or 50:1
|
|
CoreComm.VsyncNum = theMachine.FrameHZ;
|
|
CoreComm.VsyncDen = 1;
|
|
|
|
SetupMemoryDomains(hsc7800);
|
|
}
|
|
|
|
#region audio\video
|
|
|
|
private MyAVProvider _avProvider = new MyAVProvider();
|
|
|
|
private class MyAVProvider : IVideoProvider, ISoundProvider, IDisposable
|
|
{
|
|
public FrameBuffer Framebuffer { get; private set; }
|
|
public void ConnectToMachine(MachineBase m, EMU7800.Win.GameProgram g)
|
|
{
|
|
Framebuffer = m.CreateFrameBuffer();
|
|
BufferWidth = Framebuffer.VisiblePitch;
|
|
BufferHeight = Framebuffer.Scanlines;
|
|
vidbuffer = new int[BufferWidth * BufferHeight];
|
|
|
|
uint newsamplerate = (uint)m.SoundSampleFrequency;
|
|
if (newsamplerate != samplerate)
|
|
{
|
|
// really shouldn't happen (after init), but if it does, we're ready
|
|
if (resampler != null)
|
|
resampler.Dispose();
|
|
resampler = new SpeexResampler(3, newsamplerate, 44100, newsamplerate, 44100, null, null);
|
|
samplerate = newsamplerate;
|
|
dcfilter = new DCFilter(256);
|
|
}
|
|
|
|
if (g.MachineType == MachineType.A2600PAL)
|
|
palette = TIATables.PALPalette;
|
|
else if (g.MachineType == MachineType.A7800PAL)
|
|
palette = MariaTables.PALPalette;
|
|
else if (g.MachineType == MachineType.A2600NTSC)
|
|
palette = TIATables.NTSCPalette;
|
|
else
|
|
palette = MariaTables.NTSCPalette;
|
|
}
|
|
|
|
private uint samplerate;
|
|
private int[] vidbuffer;
|
|
private SpeexResampler resampler;
|
|
private DCFilter dcfilter;
|
|
private int[] palette;
|
|
|
|
public void FillFrameBuffer()
|
|
{
|
|
unsafe
|
|
{
|
|
fixed (byte* src_ = Framebuffer.VideoBuffer)
|
|
fixed (int* dst_ = vidbuffer)
|
|
fixed (int* pal = palette)
|
|
{
|
|
byte* src = src_;
|
|
int* dst = dst_;
|
|
for (int i = 0; i < vidbuffer.Length; i++)
|
|
{
|
|
*dst++ = pal[*src++];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
public int[] GetVideoBuffer()
|
|
{
|
|
return vidbuffer;
|
|
}
|
|
|
|
public int VirtualWidth => 275;
|
|
public int VirtualHeight => BufferHeight;
|
|
public int BufferWidth { get; private set; }
|
|
public int BufferHeight { get; private set; }
|
|
public int BackgroundColor => unchecked((int)0xff000000);
|
|
|
|
#region ISoundProvider
|
|
|
|
public bool CanProvideAsync => false;
|
|
|
|
public void GetSamplesSync(out short[] samples, out int nsamp)
|
|
{
|
|
int nsampin = Framebuffer.SoundBufferByteLength;
|
|
unsafe
|
|
{
|
|
fixed (byte* src = Framebuffer.SoundBuffer)
|
|
{
|
|
for (int i = 0; i < nsampin; i++)
|
|
{
|
|
// the buffer values don't really get very large at all,
|
|
// so this doesn't overflow
|
|
short s = (short)(src[i] * 200);
|
|
resampler.EnqueueSample(s, s);
|
|
}
|
|
|
|
}
|
|
}
|
|
resampler.GetSamplesSync(out samples, out nsamp);
|
|
dcfilter.PushThroughSamples(samples, nsamp * 2);
|
|
}
|
|
|
|
public SyncSoundMode SyncMode => SyncSoundMode.Sync;
|
|
|
|
public void SetSyncMode(SyncSoundMode mode)
|
|
{
|
|
if (mode == SyncSoundMode.Async)
|
|
{
|
|
throw new NotSupportedException("Async mode is not supported.");
|
|
}
|
|
}
|
|
|
|
public void GetSamplesAsync(short[] samples)
|
|
{
|
|
throw new InvalidOperationException("Async mode is not supported.");
|
|
}
|
|
|
|
public void DiscardSamples()
|
|
{
|
|
resampler?.DiscardSamples();
|
|
}
|
|
|
|
#endregion
|
|
|
|
public void Dispose()
|
|
{
|
|
if (resampler != null)
|
|
{
|
|
resampler.Dispose();
|
|
resampler = null;
|
|
}
|
|
}
|
|
}
|
|
|
|
#endregion
|
|
}
|
|
}
|