First commit of partial RosettaCode contents.

Pushing this for testing purposes. Lots of work still needed.

Task/Quine/BASIC/quine-2.bas

@@ -0,0 +1,25 @@
+READ d$
+DO
+    READ x$
+    PRINT x$
+LOOP UNTIL LEN(x$) < 1
+RESTORE
+DO
+    READ x$
+    PRINT d$; CHR$(34); x$; CHR$(34)
+LOOP UNTIL LEN(x$) < 1
+END
+
+DATA "DATA "
+DATA "READ d$"
+DATA "DO"
+DATA "    READ x$"
+DATA "    PRINT x$"
+DATA "LOOP UNTIL LEN(x$) < 1"
+DATA "RESTORE"
+DATA "DO"
+DATA "    READ x$"
+DATA "    PRINT d$; CHR$(34); x$; CHR$(34)"
+DATA "LOOP UNTIL LEN(x$) < 1"
+DATA "END"
+DATA ""

Task/Quine/BASIC/quine.bas

@@ -0,0 +1 @@
+10 LIST