home *** CD-ROM | disk | FTP | other *** search
/ Computer Music Interactif 2 / cd.iso / mac / share / Funkit / FunKit / funkit16.Dxr / 00030.ls < prev    next >
Encoding:
Text File  |  1997-07-03  |  200 b   |  10 lines
  1. on tappit
  2.   global gDrumList, gDrumFillinLength, gFillinName
  3.   if gDrumFillinLength > 0 then
  4.     puppetSound(1, cast gFillinName)
  5.   else
  6.     puppetSound(1, cast gDrumList)
  7.   end if
  8.   startTimer()
  9. end
  10.