Changeset 223 for branches/CpuSingleSize/UInstructions.pas

Timestamp:

Jul 12, 2022, 10:43:40 PM (2 years ago)

Author:

chronos

Message:

• Modified: More instructions.
• Modified: Optimized instruction execution with procedure array instead case.

File:

• branches/CpuSingleSize/UInstructions.pas (modified) (2 diffs)

branches/CpuSingleSize/UInstructions.pas

@@ -1 +1 @@
 unit UInstructions;
-
-{$mode delphi}
 
 interface
@@ -102 +100 @@
   AddNew(inJumpRel, 'JR', [ptNumber], 'Unconditional relative jump to defined address.');
   AddNew(inLoadIndex, 'LDI', [ptReg, ptRegIndirectIndex], 'Loads value from memory with numeric index to register.');
-  AddNew(inStoreIndex, 'STI', [ptRegIndirectIndex, ptReg], 'Stores value from register to memory with numeric index .');
+  AddNew(inStoreIndex, 'STI', [ptRegIndirectIndex, ptReg], 'Stores value from register to memory with numeric index.');
+  AddNew(inLoadCpu, 'LDC', [], 'Loads value from system register.');
+  AddNew(inStoreCpu, 'STC', [], 'Stores value to system register.');
+  AddNew(inEi, 'EI', [], 'Enables interrupts.');
+  AddNew(inDi, 'DI', [], 'Disables interrupts.');
 end;