diff --git a/programs/programs/quine.sc b/programs/programs/quine.sc
new file mode 100644
index 0000000..85885cb
--- /dev/null
+++ b/programs/programs/quine.sc
@@ -0,0 +1,9 @@
+
+OPENFILE "quine.sc" FOR READ
+WHILE NOT EOF("quine.sc")
+  DECLARE buf: STRING
+  READFILE "quine.sc", buf
+  OUTPUT buf
+ENDWHILE
+CLOSEFILE "quine.sc"
+
diff --git a/programs/programs/test.sc b/programs/programs/test.sc
new file mode 100644
index 0000000..3c3a702
--- /dev/null
+++ b/programs/programs/test.sc
@@ -0,0 +1,7 @@
+
+OPENFILE "quine.sc" FOR READ
+DECLARE buf: STRING
+READFILE "nonexistent.txt", buf
+OUTPUT buf
+CLOSEFILE "quine.sc"
+