home *** CD-ROM | disk | FTP | other *** search
/ Virtual Top Model / Virtual Top Model - Disc 1.iso / modulos / mod-2.dxr / Internal_9_boton panic.ls < prev    next >
Encoding:
Text File  |  1997-04-01  |  565 b   |  23 lines
  1. on mouseUp
  2.   if rollOver(13) then
  3.     set the member of sprite 13 to member "Fd_Bt_A/4" of castLib "elementos graficos"
  4.     puppetSprite(13, 0)
  5.     updateStage()
  6.     cursor(200)
  7.     set the soundLevel to 0
  8.     play frame "panic"
  9.   end if
  10. end
  11.  
  12. on mouseDown
  13.   repeat while the stillDown
  14.     puppetSprite(13, 1)
  15.     if rollOver(13) then
  16.       set the member of sprite 13 to member "Fd_Bt_B/4" of castLib "elementos graficos"
  17.     else
  18.       set the member of sprite 13 to member "Fd_Bt_A/4" of castLib "elementos graficos"
  19.     end if
  20.     updateStage()
  21.   end repeat
  22. end
  23.