Changeset 220 for branches/CpuSingleSize/UInstructions.pas

Timestamp:

Oct 20, 2020, 1:10:09 AM (4 years ago)

Author:

chronos

Message:

• Added: Devices form with tree view of connected devices. Device control form can be opened by double click.
• Modifid: IN/OUT instructions now use also device group index to directly specify which device should be read/written.

File:

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

branches/CpuSingleSize/UInstructions.pas

@@ -9 +9 @@
 
 type
-  TParamType = (ptNone, ptNumber, ptReg, ptRegIndirect, ptRegIndirectIndex);
+  TParamType = (ptNone, ptNumber, ptReg, ptRegIndirect, ptRegIndirectIndex,
+    ptRegIndirectGroup);
   TParamTypeArray = array of TParamType;
 
@@ -82 +83 @@
   AddNew(inAdd, 'ADD', [ptReg, ptReg], 'Adds second register to first register.');
   AddNew(inSub, 'SUB', [ptReg, ptReg], 'Subtracts second register from first register.');
-  AddNew(inIn, 'IN', [ptReg, ptRegIndirect], 'Reads value from input port to register.');
-  AddNew(inOut, 'OUT', [ptRegIndirect, ptReg], 'Writes value from register to output port.');
+  AddNew(inIn, 'IN', [ptReg, ptRegIndirectGroup], 'Reads value from input port to register.');
+  AddNew(inOut, 'OUT', [ptRegIndirectGroup, ptReg], 'Writes value from register to output port.');
   AddNew(inJumpZero, 'JZ', [ptReg, ptNumber], 'Jumps to given address if value of register is zero');
   AddNew(inJumpNotZero, 'JNZ', [ptReg, ptNumber], 'Jumps to given address if value of register is not zero');