home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / devglry / elementl / source / fun.dir / 00075.ls < prev    next >
Encoding:
Text File  |  1996-11-11  |  296 b   |  17 lines
  1. on enterFrame
  2.   if random(5) = 5 then
  3.     set the visible of sprite 32 to not (the visible of sprite 32)
  4.     if soundBusy(1) then
  5.       nothing()
  6.     else
  7.       puppetSound("Buzz.aiff")
  8.     end if
  9.     updateStage()
  10.   end if
  11. end
  12.  
  13. on mouseDown
  14.   set the visible of sprite 28 to 1
  15.   go("Start")
  16. end
  17.