implement JSTR

Author: FalsePattern

src/main/java/com/falsepattern/jfunge/interpreter/instructions/Funge98.java

@@ -14,6 +14,7 @@
 import com.falsepattern.jfunge.interpreter.instructions.fingerprints.FPSP;
 import com.falsepattern.jfunge.interpreter.instructions.fingerprints.HRTI;
 import com.falsepattern.jfunge.interpreter.instructions.fingerprints.INDV;
+import com.falsepattern.jfunge.interpreter.instructions.fingerprints.JSTR;
 import com.falsepattern.jfunge.interpreter.instructions.fingerprints.MODE;
 import com.falsepattern.jfunge.interpreter.instructions.fingerprints.MODU;
 import com.falsepattern.jfunge.interpreter.instructions.fingerprints.NULL;
@@ -63,6 +64,7 @@ public class Funge98 implements InstructionSet {
         addFingerprint(FIXP.INSTANCE);
         addFingerprint(HRTI.INSTANCE);
         addFingerprint(INDV.INSTANCE);
+        addFingerprint(JSTR.INSTANCE);
         addFingerprint(MODE.INSTANCE);
         addFingerprint(MODU.INSTANCE);
         addFingerprint(NULL.INSTANCE);

src/main/java/com/falsepattern/jfunge/interpreter/instructions/fingerprints/JSTR.java

@@ -0,0 +1,59 @@
+package com.falsepattern.jfunge.interpreter.instructions.fingerprints;
+
+import com.falsepattern.jfunge.interpreter.ExecutionContext;
+import com.falsepattern.jfunge.interpreter.instructions.Fingerprint;
+import com.falsepattern.jfunge.util.MemoryStack;
+import lombok.AccessLevel;
+import lombok.Cleanup;
+import lombok.NoArgsConstructor;
+import lombok.val;
+
+@NoArgsConstructor(access = AccessLevel.PRIVATE)
+public class JSTR implements Fingerprint {
+    public static final JSTR INSTANCE = new JSTR();
+    @Override
+    public int code() {
+        return 0x4a535452;
+    }
+
+    @Instr('P')
+    public static void putString(ExecutionContext ctx) {
+        val stack = ctx.stack();
+        val ip = ctx.IP();
+        val fs = ctx.fungeSpace();
+        @Cleanup val mStack = MemoryStack.stackPush();
+        val position = mStack.vec3i();
+        val delta = mStack.vec3i();
+
+        val count = stack.pop();
+        stack.popVecDimProof(ctx.dimensions(), position);
+        stack.popVecDimProof(ctx.dimensions(), delta);
+
+        position.add(ip.storageOffset());
+        for (int i = 0; i < count; i++) {
+            fs.set(position, stack.pop());
+            position.add(delta);
+        }
+    }
+
+    @Instr('G')
+    public static void getString(ExecutionContext ctx) {
+        val stack = ctx.stack();
+        val ip = ctx.IP();
+        val fs = ctx.fungeSpace();
+        @Cleanup val mStack = MemoryStack.stackPush();
+        val position = mStack.vec3i();
+        val delta = mStack.vec3i();
+
+        val count = stack.pop();
+        stack.popVecDimProof(ctx.dimensions(), position);
+        stack.popVecDimProof(ctx.dimensions(), delta);
+
+        position.add(ip.storageOffset());
+        stack.push(0);
+        for (int i = 0; i < count; i++) {
+            stack.push(fs.get(position));
+            position.add(delta);
+        }
+    }
+}