Borland TurboBASIC & TurboPASCAL stuff from 1998 when i started with programming...

[mirrors/Programs.git] / turbobasic / DDM-CTV2.BAS

diff --git a/turbobasic/DDM-CTV2.BAS b/turbobasic/DDM-CTV2.BAS
new file mode 100755 (executable)
index 0000000..ea38e58
--- /dev/null
+++ b/turbobasic/DDM-CTV2.BAS
@@ -0,0 +1,11 @@
+cls\r
+color 5,7\r
+screen 1\r
+for a=1 to 319\r
+\r
+cls\r
+line (1,1)-(319,199),5,b\r
+wait (10)\r
+line (a,1)-(150,199)\r
+next a\r
+end\1a
\ No newline at end of file