Changeset 173 for branches/virtualcpu4/UFormMain.pas

Timestamp:

Apr 11, 2019, 11:43:06 PM (5 years ago)

Author:

chronos

Message:

• Added: More instructions.

File:

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

branches/virtualcpu4/UFormMain.pas

@@ -166 +166 @@
   with InstructionWriter do begin
     LabelText := 200;
-    LoadConst(R1, LabelText);
-    LoadConst(R2, 12);
+    Loadi(R1, LabelText);
+    Loadi(R2, 12);
   LabelPrint := IP;
     DataPrefix8; LoadMem(R3, R1);
@@ -176 +176 @@
     JumpNotZero(LabelPrint);
 
-    LoadConst(R1, 100);
+    Loadi(R1, 100);
   LabelStart := IP;
     Increment(R1);
-    LoadConst(R2, 100);
+    Loadi(R2, 100);
     DataPrefix8; StoreMem(R2, R1);
     DataPrefix8; Input(R2, 0);