home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / devglry / elementl / source / fun.dir / 00029.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 35 to not (the visible of sprite 35)
  4.     if soundBusy(1) then
  5.       nothing()
  6.     else
  7.       puppetSound("beep.aiff")
  8.     end if
  9.     updateStage()
  10.   end if
  11. end
  12.  
  13. on mouseDown
  14.   set the visible of sprite 35 to 1
  15.   go("Start")
  16. end
  17.