home *** CD-ROM | disk | FTP | other *** search
/ The Canadian Multi-Median 2 / cmm2.zip / FYRWRK2.BAS (.txt) < prev   
QuickBASIC Tokenized Source  |  1994-12-17  |  2KB  |  13 lines
  1. mapxx
  2. mapyy
  3. spark
  4. sparkler
  5. pause
  6. c15"m
  7. rkt2%
  8. mrkx% = POINT(0): mrky% = POINT(1)
  9. PSET (mrkx%, mrky%)r
  10. =spark starts here
  11. #=spark ends here
  12. SOUND iv% * 5, r
  13.