home *** CD-ROM | disk | FTP | other *** search
/ AMOS PD CD / amospdcd.iso / 501-525 / apd525 / starstruck / starplotter.amos / starplotter.amosSourceCode
AMOS Source Code  |  1989-08-15  |  171b  |  9 lines
  1. Screen Open 0,320,600,8,Lowres
  2. Curs Off : Flash Off : Hide 
  3. Load Iff "Stars1"
  4. Cls 0
  5. Randomize Timer
  6. For T=1 To 30
  7.  X=Rnd(319) : Y=Rnd(299)
  8. Plot X,Y,1 : Plot X,Y+300,1
  9. Next