GIT.Harvie.CZ
/
mirrors
/
Programs.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
6002c6b4fc5ccd1daf2e7971a3cc19d72151c1c4
[mirrors/Programs.git]
/
SYSTEM.BAS
1
SKODA:
2
CLS
3
SCREEN 1
4
COLOR 0,15
5
LOCATE 2,2
6
INPUT " ZADEJTE VSTUPNI PIN NA TOTO CD " ; No$
7
IF No$ = "TTDA" THEN GOTO POKR
8
GOTO SKODA
9
POKR:
10
CLS
11
LOCATE 2,2
12
INPUT " JMENO UZIVATELE " ;N$
13
CLS
14
LOCATE 2,2
15
PRINT " CD VITA UZIVATELE " N$
16
LOCATE 25,2
17
INPUT " ZMACKNETE LIBOVOLNOU KLAVESU " ;X10$
18
END
\1a
This page took
0.27989 seconds
and
3
git commands to generate.