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

[mirrors/Programs.git] / turbobasic / POZDR-BL.BAS

diff --git a/turbobasic/POZDR-BL.BAS b/turbobasic/POZDR-BL.BAS
deleted file mode 100644 (file)
index af1533f..0000000
--- a/turbobasic/POZDR-BL.BAS
+++ /dev/null
@@ -1,26 +0,0 @@
-SCREEN 0\r
-INPUT " ZADEJ 1 (šEDá) NEBO JEN ENTER(MODRá)";L\r
-IF L=1 THEN COLOR 0,15:GOTO RAZ\r
-COLOR 14,1\r
-\r
-RAZ:\r
-FOR I=2 TO 500\r
-REM CLS PRI KAZDEM CYKLU VYMAZE OBRAZOVKU, TAKZE NAPIS BLIKA\r
-CLS\r
-SCREEN 0\r
-LOCATE 9,23\r
-PRINT " DOBRY DEN! JAK SE MATE ? "\r
-\r
-A$=INKEY$\r
-IF A$="X" THEN KONEC\r
-KEY (11) STOP\r
-\r
-FOR B=0 TO 300\r
-NEXT B\r
-\r
-NEXT I\r
-KONEC:\r
-REM CLS\r
-LOCATE 20,15\r
-\r
-PRINT "UKONCI stiskem enter"\1a
\ No newline at end of file