Manualy fixed encoding of few files...
[mirrors/Programs.git] / turbobasic / BUDIK.BAS
1 INPUT "POCET MINUT" ;M
2 FOR I = 1 TO M STEP 1
3 PRINT "MINUTA " I
4 WAIT(600)
5 C=M-I
6 PRINT "ZBYVA " C " MINUT"
7 NEXT I
8 FOR J = 1 TO 15 STEP 1
9 SOUND RND*200+11,12
10 WAIT(15)
11 NEXT J
12 END\1a
This page took 0.23074 seconds and 4 git commands to generate.