home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1985 August / Ahoy_Magazine_85-08_1985_Double_L.d64 / simple gunshot (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1985-01-01  |  712 b   |  10 lines
  1. 0 print"":poke53280,9:poke53281,7:poke646,7
  2. 1 print"          sound effects"
  3. 2 print"          simple gunshot"
  4. 3 rem (note that lines 100 and above are "support"--lines 20-90 make the sound)
  5. 10 gosub 900:goto 100
  6. 20 poke ad(1),5:poke sr(1),0:poke fl(1),30:poke fh(1),30
  7. 30 poke vl,15:print "."
  8. 40 on***error******error***W***error******error******error******error******error******error******error***
  9. 8959  ***error***6***error******error******error***C***error******error******error******error******error******error******error******error***<
  10.