GIT.Harvie.CZ
/
mirrors
/
Programs.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
4077caa1b8e991e6e4eb524bc4103532973f654c
[mirrors/Programs.git]
/
turbobasic
/
1998
/
HESLO.BAS
1
cls
2
open "heslo.dta" For random AS #1
3
c$=input$(137,#1)
4
b$=mid$(C$,129,7)
5
input "Zadej vstupni heslo"; a$
6
if a$=b$ then end
7
shell "date>>HESLO.TXT"
8
shell "K>>HESLO.TXT"
9
shell "KONEC"
10
end
11
\1a
This page took
0.261467 seconds
and
4
git commands to generate.