1 files changed, 6 insertions, 0 deletions
diff --git a/2019/07/machine.lisp b/2019/07/machine.lisp
new file mode 100755
index 0000000..798bbb8
--- /dev/null
+++ b/2019/07/machine.lisp
@@ -0,0 +1,6 @@
+#!/usr/bin/sbcl --script
+
+(load "../interpreter.lisp")
+
+(intcode:run (intcode:parse "input") *standard-input* *standard-output*
+             :initial-arguments (mapcar #'parse-integer (cdr *posix-argv*)))
+\ No newline at end of file