Add a skeletal half way house between a 6809 tester and a CoCo 2 emulator.

Signed-off-by: Adrian Conlon <Adrian.conlon@gmail.com>
2025-01-18 01:29:49 +00:00 · 2018-08-26 19:09:34 +01:00 · 2018-08-26 19:09:34 +01:00 · e88cbc269b
commit e88cbc269b
parent a22c5a5c78
9 changed files with 413 additions and 0 deletions
--- a/EightBit.sln
+++ b/EightBit.sln
@ -27,7 +27,12 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "test_M6502", "M6502\test\te
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "MC6809", "MC6809\src\MC6809.vcxproj", "{09C1B50E-408E-48B1-A616-8400904B5829}"
 EndProject
+Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "test_MC6809", "MC6809\test\test_MC6809.vcxproj", "{80412055-64FB-417B-B017-EBF92770C922}"
+EndProject
 Global
+	GlobalSection(Performance) = preSolution
+		HasPerformanceSessions = true
+	EndGlobalSection
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
 		Debug|x64 = Debug|x64
 		Debug|x86 = Debug|x86
@ -131,6 +136,14 @@ Global
 		{09C1B50E-408E-48B1-A616-8400904B5829}.Release|x64.Build.0 = Release|x64
 		{09C1B50E-408E-48B1-A616-8400904B5829}.Release|x86.ActiveCfg = Release|Win32
 		{09C1B50E-408E-48B1-A616-8400904B5829}.Release|x86.Build.0 = Release|Win32
+		{80412055-64FB-417B-B017-EBF92770C922}.Debug|x64.ActiveCfg = Debug|x64
+		{80412055-64FB-417B-B017-EBF92770C922}.Debug|x64.Build.0 = Debug|x64
+		{80412055-64FB-417B-B017-EBF92770C922}.Debug|x86.ActiveCfg = Debug|Win32
+		{80412055-64FB-417B-B017-EBF92770C922}.Debug|x86.Build.0 = Debug|Win32
+		{80412055-64FB-417B-B017-EBF92770C922}.Release|x64.ActiveCfg = Release|x64
+		{80412055-64FB-417B-B017-EBF92770C922}.Release|x64.Build.0 = Release|x64
+		{80412055-64FB-417B-B017-EBF92770C922}.Release|x86.ActiveCfg = Release|Win32
+		{80412055-64FB-417B-B017-EBF92770C922}.Release|x86.Build.0 = Release|Win32
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE
--- a/MC6809/test/Board.cpp
+++ b/MC6809/test/Board.cpp
@ -0,0 +1,80 @@
+#include "stdafx.h"
+#include "Board.h"
+
+#include <iostream>
+#include <sstream>
+#include <iomanip>
+#include <assert.h>
+
+Board::Board(const Configuration& configuration)
+: m_configuration(configuration),
+  m_cpu(EightBit::mc6809(*this)),
+  m_disassembler(m_cpu) {}
+
+void Board::initialise() {
+
+	const auto directory = m_configuration.getRomDirectory() + "\\";
+
+	m_extendedBasic.load(directory + "extbas11.rom");
+	m_colorBasic.load(directory + "bas12.rom");
+	m_diskBasic.load(directory + "disk11.rom");
+
+	if (m_configuration.isDebugMode()) {
+		CPU().ExecutingInstruction.connect(std::bind(&Board::Cpu_ExecutingInstruction_Debug, this, std::placeholders::_1));
+	}
+
+	CPU().powerOn();
+	CPU().reset();
+}
+
+void Board::Cpu_ExecutingInstruction_Debug(EightBit::mc6809& cpu) {
+
+	auto address = cpu.PC().word;
+	auto cell = peek(address);
+
+	std::cout << std::hex;
+	std::cout << "PC=" << std::setw(4) << std::setfill('0') << address << ":";
+	std::cout << "CC=" << m_disassembler.dump_Flags(CPU().CC()) << ", ";
+	std::cout << "D=" << (int)CPU().D().word << ", ";
+	std::cout << "X=" << (int)CPU().X().word << ", ";
+	std::cout << "Y=" << (int)CPU().Y().word << ", ";
+	std::cout << "U=" << (int)CPU().U().word << ",";
+	std::cout << "S=" << (int)CPU().S().word << ", ";
+	std::cout << std::setw(2) << std::setfill('0');
+	std::cout << "DP=" << (int)CPU().DP() << "\t";
+
+	std::cout << m_disassembler.disassemble(address);
+
+	std::cout << "\n";
+}
+
+uint8_t& Board::reference(uint16_t address) {
+
+	// 0x0000 - 0x7fff
+	if (address < 0x8000)
+		return m_ram.reference(address);
+
+	// 0x8000 - 0x9fff
+	if (address < 0xa000)
+		return DATA() = m_extendedBasic.peek(address - 0x8000);
+
+	// 0xa000 - 0xbfff
+	if (address < 0xc000)
+		return DATA() = m_colorBasic.peek(address - 0xa000);
+
+	// 0xc000 - 0xdfff
+	if (address < 0xe000)
+		return DATA() = m_diskBasic.peek(address - 0xc000);
+
+	// 0xe000 - 0xfeff
+	if (address < 0xff00)
+		return DATA() = 0xff;
+
+	// 0xe000 - 0xfeff
+	if (address < 0xfff0)
+		return m_io.reference(address - 0xff00);
+
+	// 0xfff0 - 0xffff
+	const auto offset = address - 0xfff0;
+	return DATA() = m_colorBasic.peek(0x1ff0 + offset);
+}
--- a/MC6809/test/Board.h
+++ b/MC6809/test/Board.h
@ -0,0 +1,39 @@
+#pragma once
+
+#include "Configuration.h"
+
+#include <string>
+
+#include <Ram.h>
+#include <Bus.h>
+#include <mc6809.h>
+#include <Disassembly.h>
+
+class Board : public EightBit::Bus {
+public:
+	Board(const Configuration& configuration);
+
+	EightBit::mc6809& CPU() { return m_cpu; }
+
+	void initialise();
+
+protected:
+	virtual uint8_t& reference(uint16_t address) final;
+
+private:
+	const Configuration& m_configuration;
+	EightBit::Ram m_ram = 0x8000;			// 0000 - 7FFF, 32K RAM
+	EightBit::Rom m_extendedBasic = 0x2000;	// 8000 - 9FFF, 8K Extended BASIC ROM
+	EightBit::Rom m_colorBasic = 0x2000;	// A000 - BFFF, 8K Color BASIC ROM
+	EightBit::Rom m_cartridge = 0x2000;		// C000 - DFFF, 8K Cartridge ROM
+	EightBit::Rom m_diskBasic = 0x2000;		// C000 - DFFF, 8K Disk BASIC ROM
+											// E000 - FEFF, Unused
+	EightBit::Ram m_io = 0xf0;				// FF00 - FFEF, I/O Registers
+											// FFF0 - FFFF, Interrupt vectors (mapped from BFF0-BFFF)
+	EightBit::mc6809 m_cpu;
+	EightBit::Disassembly m_disassembler;
+
+	void pollKeyboard();
+
+	void Cpu_ExecutingInstruction_Debug(EightBit::mc6809& cpu);
+};
--- a/MC6809/test/Configuration.h
+++ b/MC6809/test/Configuration.h
@ -0,0 +1,19 @@
+#pragma once
+
+#include <cstdint>
+#include <string>
+#include <Register.h>
+
+class Configuration {
+public:
+	Configuration() = default;
+
+	bool isDebugMode() const { return m_debugMode; }
+	void setDebugMode(bool value) { m_debugMode = value; }
+
+	std::string getRomDirectory() const { return m_romDirectory; }
+
+private:
+	bool m_debugMode = false;
+	std::string m_romDirectory = "roms\\coco2h";
+};
--- a/MC6809/test/stdafx.cpp
+++ b/MC6809/test/stdafx.cpp
@ -0,0 +1 @@
+#include "stdafx.h"
--- a/MC6809/test/stdafx.h
+++ b/MC6809/test/stdafx.h
@ -0,0 +1,22 @@
+#ifdef _MSC_VER
+#pragma once
+#endif
+
+#include <cstdint>
+
+#include <string>
+
+#include <sstream>
+#include <iomanip>
+#include <iostream>
+
+#include <assert.h>
+
+#ifdef _MSC_VER
+#include <conio.h>
+#endif
+
+#include <Ram.h>
+#include <Bus.h>
+#include <mc6809.h>
+#include <TestHarness.h>
--- a/MC6809/test/test.cpp
+++ b/MC6809/test/test.cpp
@ -0,0 +1,22 @@
+#include "stdafx.h"
+#include "Configuration.h"
+#include "Board.h"
+
+#include <TestHarness.h>
+
+#include <iostream>
+
+int main(int argc, char* argv[]) {
+
+	Configuration configuration;
+
+#ifdef _DEBUG
+	configuration.setDebugMode(true);
+#endif
+
+	EightBit::TestHarness<Configuration, Board> harness(configuration);
+	harness.initialise();
+	harness.runLoop();
+
+	return 0;
+}
--- a/MC6809/test/test_MC6809.vcxproj
+++ b/MC6809/test/test_MC6809.vcxproj
@ -0,0 +1,178 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <ItemGroup Label="ProjectConfigurations">
+    <ProjectConfiguration Include="Debug|Win32">
+      <Configuration>Debug</Configuration>
+      <Platform>Win32</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Release|Win32">
+      <Configuration>Release</Configuration>
+      <Platform>Win32</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Debug|x64">
+      <Configuration>Debug</Configuration>
+      <Platform>x64</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Release|x64">
+      <Configuration>Release</Configuration>
+      <Platform>x64</Platform>
+    </ProjectConfiguration>
+  </ItemGroup>
+  <PropertyGroup Label="Globals">
+    <VCProjectVersion>15.0</VCProjectVersion>
+    <ProjectGuid>{80412055-64FB-417B-B017-EBF92770C922}</ProjectGuid>
+    <Keyword>Win32Proj</Keyword>
+    <RootNamespace>testMC6809</RootNamespace>
+  </PropertyGroup>
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" />
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration">
+    <ConfigurationType>Application</ConfigurationType>
+    <UseDebugLibraries>true</UseDebugLibraries>
+    <PlatformToolset>v141</PlatformToolset>
+    <CharacterSet>Unicode</CharacterSet>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration">
+    <ConfigurationType>Application</ConfigurationType>
+    <UseDebugLibraries>false</UseDebugLibraries>
+    <PlatformToolset>v141</PlatformToolset>
+    <WholeProgramOptimization>true</WholeProgramOptimization>
+    <CharacterSet>Unicode</CharacterSet>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|x64'" Label="Configuration">
+    <ConfigurationType>Application</ConfigurationType>
+    <UseDebugLibraries>true</UseDebugLibraries>
+    <PlatformToolset>v141</PlatformToolset>
+    <CharacterSet>Unicode</CharacterSet>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|x64'" Label="Configuration">
+    <ConfigurationType>Application</ConfigurationType>
+    <UseDebugLibraries>false</UseDebugLibraries>
+    <PlatformToolset>v141</PlatformToolset>
+    <WholeProgramOptimization>true</WholeProgramOptimization>
+    <CharacterSet>Unicode</CharacterSet>
+  </PropertyGroup>
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" />
+  <ImportGroup Label="ExtensionSettings">
+  </ImportGroup>
+  <ImportGroup Label="Shared">
+  </ImportGroup>
+  <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">
+    <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" />
+  </ImportGroup>
+  <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'">
+    <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" />
+  </ImportGroup>
+  <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|x64'">
+    <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" />
+  </ImportGroup>
+  <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|x64'">
+    <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" />
+  </ImportGroup>
+  <PropertyGroup Label="UserMacros" />
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|x64'">
+    <LinkIncremental>false</LinkIncremental>
+    <IncludePath>..\inc;..\..\inc;C:\Libraries\boost_1_65_1;$(IncludePath)</IncludePath>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">
+    <LinkIncremental>true</LinkIncremental>
+    <IncludePath>..\inc;..\..\inc;C:\Libraries\boost_1_65_1;$(IncludePath)</IncludePath>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|x64'">
+    <LinkIncremental>true</LinkIncremental>
+    <IncludePath>..\inc;..\..\inc;C:\Libraries\boost_1_65_1;$(IncludePath)</IncludePath>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'">
+    <LinkIncremental>false</LinkIncremental>
+    <IncludePath>..\inc;..\..\inc;C:\Libraries\boost_1_65_1;$(IncludePath)</IncludePath>
+  </PropertyGroup>
+  <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|x64'">
+    <ClCompile>
+      <PrecompiledHeader>Use</PrecompiledHeader>
+      <WarningLevel>Level3</WarningLevel>
+      <Optimization>MaxSpeed</Optimization>
+      <FunctionLevelLinking>true</FunctionLevelLinking>
+      <IntrinsicFunctions>true</IntrinsicFunctions>
+      <SDLCheck>true</SDLCheck>
+      <PreprocessorDefinitions>NDEBUG;_CONSOLE;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <ConformanceMode>true</ConformanceMode>
+    </ClCompile>
+    <Link>
+      <SubSystem>Console</SubSystem>
+      <EnableCOMDATFolding>true</EnableCOMDATFolding>
+      <OptimizeReferences>true</OptimizeReferences>
+      <GenerateDebugInformation>true</GenerateDebugInformation>
+    </Link>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">
+    <ClCompile>
+      <PrecompiledHeader>Use</PrecompiledHeader>
+      <WarningLevel>Level3</WarningLevel>
+      <Optimization>Disabled</Optimization>
+      <SDLCheck>true</SDLCheck>
+      <PreprocessorDefinitions>WIN32;_DEBUG;_CONSOLE;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <ConformanceMode>true</ConformanceMode>
+    </ClCompile>
+    <Link>
+      <SubSystem>Console</SubSystem>
+      <GenerateDebugInformation>true</GenerateDebugInformation>
+    </Link>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|x64'">
+    <ClCompile>
+      <PrecompiledHeader>Use</PrecompiledHeader>
+      <WarningLevel>Level3</WarningLevel>
+      <Optimization>Disabled</Optimization>
+      <SDLCheck>true</SDLCheck>
+      <PreprocessorDefinitions>_DEBUG;_CONSOLE;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <ConformanceMode>true</ConformanceMode>
+    </ClCompile>
+    <Link>
+      <SubSystem>Console</SubSystem>
+      <GenerateDebugInformation>true</GenerateDebugInformation>
+    </Link>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'">
+    <ClCompile>
+      <PrecompiledHeader>Use</PrecompiledHeader>
+      <WarningLevel>Level3</WarningLevel>
+      <Optimization>MaxSpeed</Optimization>
+      <FunctionLevelLinking>true</FunctionLevelLinking>
+      <IntrinsicFunctions>true</IntrinsicFunctions>
+      <SDLCheck>true</SDLCheck>
+      <PreprocessorDefinitions>WIN32;NDEBUG;_CONSOLE;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <ConformanceMode>true</ConformanceMode>
+    </ClCompile>
+    <Link>
+      <SubSystem>Console</SubSystem>
+      <EnableCOMDATFolding>true</EnableCOMDATFolding>
+      <OptimizeReferences>true</OptimizeReferences>
+      <GenerateDebugInformation>true</GenerateDebugInformation>
+    </Link>
+  </ItemDefinitionGroup>
+  <ItemGroup>
+    <ClInclude Include="Board.h" />
+    <ClInclude Include="Configuration.h" />
+    <ClInclude Include="stdafx.h" />
+  </ItemGroup>
+  <ItemGroup>
+    <ClCompile Include="Board.cpp" />
+    <ClCompile Include="stdafx.cpp">
+      <PrecompiledHeader Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">Create</PrecompiledHeader>
+      <PrecompiledHeader Condition="'$(Configuration)|$(Platform)'=='Release|Win32'">Create</PrecompiledHeader>
+      <PrecompiledHeader Condition="'$(Configuration)|$(Platform)'=='Debug|x64'">Create</PrecompiledHeader>
+      <PrecompiledHeader Condition="'$(Configuration)|$(Platform)'=='Release|x64'">Create</PrecompiledHeader>
+    </ClCompile>
+    <ClCompile Include="test.cpp" />
+  </ItemGroup>
+  <ItemGroup>
+    <ProjectReference Include="..\..\src\EightBit.vcxproj">
+      <Project>{a9c24bd9-0cb4-4c84-b09b-46b815f9da47}</Project>
+    </ProjectReference>
+    <ProjectReference Include="..\src\MC6809.vcxproj">
+      <Project>{09c1b50e-408e-48b1-a616-8400904b5829}</Project>
+    </ProjectReference>
+  </ItemGroup>
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" />
+  <ImportGroup Label="ExtensionTargets">
+  </ImportGroup>
+</Project>
--- a/MC6809/test/test_MC6809.vcxproj.filters
+++ b/MC6809/test/test_MC6809.vcxproj.filters
@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="4.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <ItemGroup>
+    <Filter Include="Source Files">
+      <UniqueIdentifier>{4FC737F1-C7A5-4376-A066-2A32D752A2FF}</UniqueIdentifier>
+      <Extensions>cpp;c;cc;cxx;def;odl;idl;hpj;bat;asm;asmx</Extensions>
+    </Filter>
+    <Filter Include="Header Files">
+      <UniqueIdentifier>{93995380-89BD-4b04-88EB-625FBE52EBFB}</UniqueIdentifier>
+      <Extensions>h;hh;hpp;hxx;hm;inl;inc;ipp;xsd</Extensions>
+    </Filter>
+    <Filter Include="Resource Files">
+      <UniqueIdentifier>{67DA6AB6-F800-4c08-8B7A-83BB121AAD01}</UniqueIdentifier>
+      <Extensions>rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe;resx;tiff;tif;png;wav;mfcribbon-ms</Extensions>
+    </Filter>
+  </ItemGroup>
+  <ItemGroup>
+    <ClInclude Include="Board.h">
+      <Filter>Header Files</Filter>
+    </ClInclude>
+    <ClInclude Include="stdafx.h">
+      <Filter>Header Files</Filter>
+    </ClInclude>
+    <ClInclude Include="Configuration.h">
+      <Filter>Header Files</Filter>
+    </ClInclude>
+  </ItemGroup>
+  <ItemGroup>
+    <ClCompile Include="Board.cpp">
+      <Filter>Source Files</Filter>
+    </ClCompile>
+    <ClCompile Include="stdafx.cpp">
+      <Filter>Source Files</Filter>
+    </ClCompile>
+    <ClCompile Include="test.cpp">
+      <Filter>Source Files</Filter>
+    </ClCompile>
+  </ItemGroup>
+</Project>