Changeset 44 for branches/templates/Cpu.pas

Timestamp:

Oct 3, 2023, 12:09:51 AM (8 months ago)

Author:

chronos

Message:

• Added: More devices.

Location:

branches/templates

Files:

• . (modified) (1 prop)
• Cpu.pas (modified) (9 diffs)

branches/templates/Cpu.pas

@@ -9 +9 @@
   {$MACRO ON}
 
-  TOpcode = (opNop, opHalt,
+  TOpcode = (opNop, opHalt, opInt, opSetC, opResC,
     opLoadImmediate, opLoadImmediate8, opLoadImmediate16, opLoadImmediate32, opLoadImmediate64,
-    opOutput, opOutput8, opOutput16, opOutput32, opOutput64
+    opLoad, opLoad8, opLoad16, opLoad32, opLoad64,
+    opStore, opStore8, opStore16, opStore32, opStore64,
+    opLoadBase, opLoadBase8, opLoadBase16, opLoadBase32, opLoadBase64,
+    opStoreBase, opStoreBase8, opStoreBase16, opStoreBase32, opStoreBase64,
+    opInput, opInput8, opInput16, opInput32, opInput64,
+    opOutput, opOutput8, opOutput16, opOutput32, opOutput64,
+    opInc, opInc8, opInc16, opInc32, opInc64,
+    opDec, opDec8, opDec16, opDec32, opDec64,
+    opAdd, opAdd8, opAdd16, opAdd32, opAdd64,
+    opSub, opSub8, opSub16, opSub32, opSub64,
+    opMul, opMul8, opMul16, opMul32, opMul64,
+    opDiv, opDiv8, opDiv16, opDiv32, opDiv64,
+    opMod, opMod8, opMod16, opMod32, opMod64,
+    opShr, opShr8, opShr16, opShr32, opShr64,
+    opShl, opShl8, opShl16, opShl32, opShl64,
+    opRor,
+    opRol,
+    opJump,
+    opJumpRel,
+    opCall,
+    opRet,
+    opRetI,
+    opPush, opPush8, opPush16, opPush32, opPush64,
+    opPop, opPop8, opPop16, opPop32, opPop64,
+    opXor,
+    opOr,
+    opAnd,
+    opLoadSys,
+    opStoreSys
     );
 
@@ -19 +47 @@
   {$DEFINE TGCpuWidth := 8}
   {$DEFINE INTERFACE}
-  {$I 'GenericCpu.inc'}
+  {$I 'Cpu.inc'}
 
   {$DEFINE TGCpu := TCpu16}
@@ -26 +54 @@
   {$DEFINE TGCpuWidth := 16}
   {$DEFINE INTERFACE}
-  {$I 'GenericCpu.inc'}
+  {$I 'Cpu.inc'}
 
   {$DEFINE TGCpu := TCpu32}
@@ -33 +61 @@
   {$DEFINE TGCpuWidth := 32}
   {$DEFINE INTERFACE}
-  {$I 'GenericCpu.inc'}
+  {$I 'Cpu.inc'}
 
   {$DEFINE TGCpu := TCpu64}
@@ -40 +68 @@
   {$DEFINE TGCpuWidth := 64}
   {$DEFINE INTERFACE}
-  {$I 'GenericCpu.inc'}
+  {$I 'Cpu.inc'}
 
   { TCpu }
@@ -140 +168 @@
 {$DEFINE TGCpuWidth := 8}
 {$DEFINE IMPLEMENTATION}
-{$I 'GenericCpu.inc'}
+{$I 'Cpu.inc'}
 
 {$DEFINE TGCpu := TCpu16}
@@ -147 +175 @@
 {$DEFINE TGCpuWidth := 16}
 {$DEFINE IMPLEMENTATION}
-{$I 'GenericCpu.inc'}
+{$I 'Cpu.inc'}
 
 {$DEFINE TGCpu := TCpu32}
@@ -154 +182 @@
 {$DEFINE TGCpuWidth := 32}
 {$DEFINE IMPLEMENTATION}
-{$I 'GenericCpu.inc'}
+{$I 'Cpu.inc'}
 
 {$DEFINE TGCpu := TCpu64}
@@ -161 +189 @@
 {$DEFINE TGCpuWidth := 64}
 {$DEFINE IMPLEMENTATION}
-{$I 'GenericCpu.inc'}
+{$I 'Cpu.inc'}
 
 end.