+CHDIR ".\qbasicapps\unsorted"\r
+\r
+\r
DECLARE SUB bar ()\r
DECLARE SUB help (a!)\r
DECLARE SUB alarm (a!)\r
PRINT "and specified weekdays."\r
\r
LOCATE 15, 24\r
-PRINT " This program is property of"\r
+PRINT " Copyright"\r
LOCATE 16, 24\r
-PRINT "Vova German & Svjatoslav Agejenko"\r
+PRINT "Vladimir German &"\r
LOCATE 17, 24\r
-PRINT " All rights reserved."\r
+PRINT "Svjatoslav Agejenko"\r
br$ = "Press any key to close this window"\r
\r
CASE 2\r