Posted By

Zufolek on 06/07/09


Tagged

GW-BASIC


Versions (?)

GW-BASIC random video - Old BASIC


 / Published in: Other
 

Displays simple visual effect until you press a key.

  1. 10 screen 1
  2. 30 for z=0 to 99
  3. 40 x=int(rnd(1)*320)
  4. 42 y=int(rnd(1)*200)
  5. 44 c=int(rnd(1)*4)
  6. 50 pset(x,y),c
  7. 60 next z
  8. 70 if inkey$="" goto 30
  9. 90 stop

Report this snippet  

You need to login to post a comment.