GIT.Harvie.CZ / mirrors / Programs.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Borland TurboBASIC & TurboPASCAL stuff from 1998 when i started with programming...
[mirrors/Programs.git] / turbobasic / CIS1AZ10.BAS
1 SCREEN 1
2 V=TIMER
3 PRINT "CAS" V
4 V=INT(((V-INT(V))+.2)*10)
5 PRINT "DALE" V
6 FOR I=1 TO 19
7 A=INT(RND*V+1)
8 IF A=11 THEN A=A-V+1
9 PRINT A
10 NEXT I
11 SOUND 1200,2\1a
https://github.com/Harvie/Programs.git (mirrored @ Sat, 01 Jun 2024 15:10:11 +0200)
This page took 0.266039 seconds and 4 git commands to generate.