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

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

diff --git a/turbobasic/UZIVATEL.BAS b/turbobasic/UZIVATEL.BAS
new file mode 100755 (executable)
index 0000000..54c806e
--- /dev/null
+++ b/turbobasic/UZIVATEL.BAS
@@ -0,0 +1,12 @@
+CLS\r
+SCREEN 1\r
+COLOR 14,1\r
+LOCATE 2,2\r
+INPUT " JAK JSE JMENUJETE " ;A$\r
+CLS\r
+LOCATE 2,2\r
+PRINT " V¡T M U§IVATELE JM\82NEM "\r
+LOCATE 3,2\r
+PRINT A$\r
+SOUND 100+12,80\r
+END\1a
\ No newline at end of file