home *** CD-ROM | disk | FTP | other *** search
/ Roboty / ROBOTS_CD.iso / CD / circuits.dxr / 00040_robotmouth.ls < prev    next >
Encoding:
Text File  |  2005-05-13  |  287 b   |  20 lines
  1. property spriteNum
  2.  
  3. on beginSprite
  4.   sprite(spriteNum).visible = 0
  5. end
  6.  
  7. on endSprite
  8.   sprite(spriteNum).visible = 1
  9.   sound(2).stop()
  10. end
  11.  
  12. on robotItem me, pPower
  13.   sprite(spriteNum).visible = pPower
  14.   if pPower then
  15.     puppetSound(2, "buzzer")
  16.   else
  17.     sound(2).stop()
  18.   end if
  19. end
  20.