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

[mirrors/Programs.git] / turbobasic / BINGO2.BAS

diff --git a/turbobasic/BINGO2.BAS b/turbobasic/BINGO2.BAS
new file mode 100755 (executable)
index 0000000..f45a7da
--- /dev/null
+++ b/turbobasic/BINGO2.BAS
@@ -0,0 +1,10 @@
+START:\r
+SCREEN 0\r
+CLS\r
+COLOR 4,15\r
+B=INT(RND*(4)*10+1)\r
+LOCATE 5,5\r
+PRINT B\r
+REM LOCATE 6,6\r
+REM INPUT " STISKNI ENTER "    ;A$\r
+END\1a
\ No newline at end of file