First commit of partial RosettaCode contents.

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

Task/FizzBuzz/BASIC/fizzbuzz-2.bas

@@ -0,0 +1,17 @@
+FOR A = 1 TO 100
+   OUT$ = ""
+
+   IF A MOD 3 = 0 THEN
+      OUT$ = "Fizz"
+   END IF
+
+   IF A MOD 5 = 0 THEN
+      OUT$ = OUT$ + "Buzz"
+   END IF
+
+   IF OUT$ = "" THEN
+      OUT$ = STR$(A)
+   END IF
+
+   PRINT OUT$
+NEXT A

Task/FizzBuzz/BASIC/fizzbuzz-3.bas

@@ -0,0 +1,8 @@
+10  DEF  FN M(N) = ((A / N) -  INT (A / N)) * N
+20  FOR A = 1 TO 100
+30  LET O$ = ""
+40  IF  FN M(3) = 0 THEN O$ = "FIZZ"
+50  IF  FN M(5) = 0 THEN O$ = O$ + "BUZZ"
+60  IF O$ = "" THEN O$ =  STR$ (A)
+70  PRINT O$
+80  NEXT A

Task/FizzBuzz/BASIC/fizzbuzz.bas

@@ -0,0 +1,11 @@
+FOR A = 1 TO 100
+   IF A MOD 15 = 0 THEN
+      PRINT "FizzBuzz"
+   ELSE IF A MOD 3 = 0 THEN
+      PRINT "Fizz"
+   ELSE IF A MOD 5 = 0 THEN
+      PRINT "Buzz"
+   ELSE
+      PRINT A
+   END IF
+NEXT A