Return to Snippet

Revision: 14580
at June 7, 2009 11:10 by Zufolek


Initial Code
10 screen 1
30 for z=0 to 99
40 x=int(rnd(1)*320)
42 y=int(rnd(1)*200)
44 c=int(rnd(1)*4)
50 pset(x,y),c
60 next z
70 if inkey$="" goto 30
90 stop

Initial URL


Initial Description
Displays simple visual effect until you press a key.

Initial Title
GW-BASIC random video - Old BASIC

Initial Tags


Initial Language
Other