mit/cadr.cpp, cpu/cadr, cadr.xml: Added initial MIT CADR emulation. (#13340)

AI disclosure: Claude Sonnet 5 assisted with debugging and fixing some small issues.

New systems marked not working
------------------
MIT Cadr [Wilbert Pol, Bitsavers]

New software list items marked not working (cadr.xml)
-------------------------
System 78.48 [ams]
System 100.0 [ams]
System 300.0 [ams]
System 301.0 [ams]
System 302.0 [ams]
System 303.0 [ams]

Author: wilbertpol

hash/cadr.xml

@@ -0,0 +1,80 @@
+<?xml version="1.0"?>
+<!DOCTYPE softwarelist SYSTEM "softwarelist.dtd">
+<!--
+license:CC0-1.0
+-->
+<softwarelist name="cadr" description="MIT CADR hard disk images">
+
+	<software name="sys78" supported="no">
+		<description>System 78.48</description>
+		<year>1981</year>
+		<publisher>MIT</publisher>
+		<notes>Expects to run on a single board disk controller. Gives errors about no local filesystem. Network not supported yet.</notes>
+		<part name="hdd" interface="hdd">
+			<diskarea name="harddriv">
+				<disk name="sys78" sha1="8dd933b7a26dd13d01e1fe9573224d21778cf26f" writeable="yes"/>
+			</diskarea>
+		</part>
+	</software>
+
+	<software name="sys100" supported="no">
+		<description>System 100.0</description>
+		<year>2023</year>
+		<publisher>ams</publisher>
+		<notes>Network not supported yet.</notes>
+		<part name="hdd" interface="hdd">
+			<diskarea name="harddriv">
+				<disk name="sys100" sha1="e9e3efeaa3bf40456570c1b3a010123b2878280d" writeable="yes"/>
+			</diskarea>
+		</part>
+	</software>
+
+	<software name="sys300" supported="no">
+		<description>System 300.0</description>
+		<year>2023</year>
+		<publisher>ams</publisher>
+		<notes>Network not supported yet.</notes>
+		<part name="hdd" interface="hdd">
+			<diskarea name="harddriv">
+				<disk name="sys300" sha1="aaa5fe8572c0ad8bfb234c0940b347eb3d872205" writeable="yes"/>
+			</diskarea>
+		</part>
+	</software>
+
+	<software name="sys301" supported="no">
+		<description>System 301.0</description>
+		<year>2024</year>
+		<publisher>ams</publisher>
+		<notes>Network not supported yet.</notes>
+		<part name="hdd" interface="hdd">
+			<diskarea name="harddriv">
+				<disk name="sys301" sha1="037304d40e70dd09ddf3e0e082a292134271c504" writeable="yes"/>
+			</diskarea>
+		</part>
+	</software>
+
+	<software name="sys302" supported="no">
+		<description>System 302.0</description>
+		<year>2024</year>
+		<publisher>ams</publisher>
+		<notes>Network not supported yet.</notes>
+		<part name="hdd" interface="hdd">
+			<diskarea name="harddriv">
+				<disk name="sys302" sha1="fdcdbf9d8ff3f4a1e37a4411ebf29c5fbc0d2c44" writeable="yes"/>
+			</diskarea>
+		</part>
+	</software>
+
+	<software name="sys303" supported="no">
+		<description>System 303.0</description>
+		<year>2025</year>
+		<publisher>ams</publisher>
+		<notes>Network not supported yet.</notes>
+		<part name="hdd" interface="hdd">
+			<diskarea name="harddriv">
+				<disk name="sys303" sha1="1d46b8bc70186e9cdce09a14f41a0e5c19e3f09a" writeable="yes"/>
+			</diskarea>
+		</part>
+	</software>
+
+</softwarelist>

scripts/src/cpu.lua

@@ -396,6 +396,23 @@ if opt_tool(CPUS, "JAGUAR") then
 	table.insert(disasm_files , MAME_DIR .. "src/devices/cpu/jaguar/jagdasm.h")
 end
 
+--------------------------------------------------
+-- MIT CADR cpu
+--@src/devices/cpu/cadr/cadr.h,CPUS["CADR"] = true
+--------------------------------------------------
+
+if CPUS["CADR"] then
+	files {
+		MAME_DIR .. "src/devices/cpu/cadr/cadr.cpp",
+		MAME_DIR .. "src/devices/cpu/cadr/cadr.h",
+	}
+end
+
+if opt_tool(CPUS, "CADR") then
+	table.insert(disasm_files , MAME_DIR .. "src/devices/cpu/cadr/cadr_dasm.cpp")
+	table.insert(disasm_files , MAME_DIR .. "src/devices/cpu/cadr/cadr_dasm.h")
+end
+
 --------------------------------------------------
 -- Simutrek Cube Quest bit-sliced CPUs
 --@src/devices/cpu/cubeqcpu/cubeqcpu.h,CPUS["CUBEQCPU"] = true