home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 6 / cybernetinteractivo06.ISO / demos / kerouac / shared.dxr / 00877_sprng.ls < prev    next >
Encoding:
Text File  |  1996-02-15  |  228 b   |  14 lines
  1. on mouseUp
  2.   global gFPDemoList
  3.   if getOne(gFPDemoList, "prng") = 0 then
  4.     beep()
  5.   else
  6.     puppetsOff()
  7.     if the movieName contains "prng" then
  8.       go("sprng")
  9.     else
  10.       go("sprng", "prng")
  11.     end if
  12.   end if
  13. end
  14.