Changeset 182 for branches/virtualcpu4/Forms/UFormMain.pas

Timestamp:

Apr 13, 2019, 1:32:32 PM (6 years ago)

Author:

chronos

Message:

• Fixed: Allow to use multiple prefix instructions in row.

File:

• branches/virtualcpu4/Forms/UFormMain.pas (modified) (2 diffs)

branches/virtualcpu4/Forms/UFormMain.pas

@@ -159 +159 @@
   LabelPrintLoop := IP;
     DataPrefix8; LoadMem(R3, R1);
-    DataPrefix8; Output(0, R3);
+    AddrPrefix8; DataPrefix8; Output(0, R3);
     Increment(R1);
     Decrement(R2);
@@ -199 +199 @@
 
     // Read keyboard and print to console
-    Loadi(R1, 100);
+    Loadi(R1, 0);
   LabelConsole := IP;
     Increment(R1);
-    Loadi(R2, $100);
+    Loadi(R2, $ff);
     DataPrefix8; StoreMem(R2, R1);
-    DataPrefix8; Input(R2, 0);
-    DataPrefix8; Output(0, R2);
+    AddrPrefix8; DataPrefix8; Input(R2, 0);
+    AddrPrefix8; DataPrefix8; Output(0, R2);
     Jump(LabelConsole);