Moved old turbobasic files to directory 1998 and added new directory for new files

[mirrors/Programs.git] / turbobasic / floppy-party / STROBE.BAS

diff --git a/turbobasic/floppy-party/STROBE.BAS b/turbobasic/floppy-party/STROBE.BAS
new file mode 100644 (file)
index 0000000..076688c
--- /dev/null
+++ b/turbobasic/floppy-party/STROBE.BAS
@@ -0,0 +1,11 @@
+'TURBO BASIC STROBE BY HARVIE 2010\r
+\r
+SCREEN 1\r
+DO\r
+       COLOR 255: CLS\r
+       DELAY 0.07\r
+       COLOR 0: CLS\r
+       DELAY 0.2\r
+       IF INKEY$<>"" THEN EXIT LOOP\r
+LOOP\r
+\1a
\ No newline at end of file