home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / progbas / autil101.arj / SIREN.ASI < prev    next >
Encoding:
Text File  |  1991-06-08  |  99 b   |  9 lines
  1. again:
  2. for a=1 to 300
  3. sound a,1
  4. next a
  5. a$=inkey$
  6. if a$="" then again: else exit:
  7. exit:
  8. end
  9.