Skip to content

Instantly share code, notes, and snippets.

@denzuko

denzuko/POWERBALL.BAS

Created August 22, 2020 03:06
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save denzuko/f34e8cbf96c8cb373a325b9eb26b6c19 to your computer and use it in GitHub Desktop.
Save denzuko/f34e8cbf96c8cb373a325b9eb26b6c19 to your computer and use it in GitHub Desktop.
Download ZIP
Random Program found while restoring a C128. Author is unattributed. Seems to print five random numbers after each press of return...
Raw
POWERBALL.BAS
100 REM**RANDOM NUMBERS**
200 REM**CLEAR THE SCREEN**
210 PRINT CHR$(147)
220 REM**GET A NUMBER**
240 PRINT "PRESS RETURN"
260 INPUT NUM
300 REM**PRINT RANDOM NUMBERS**
310 FOR N=1TO5
315 V=INT(RND(0)*41)+5
320 PRINT INT(V)
330 NEXT N
410 GOTO260
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment