home *** CD-ROM | disk | FTP | other *** search
/ PCMania 14 / Pcmania_Ep2_14_CD-ART_Futura_2000.iso / Datos / AnimE.dir / 00029.ls < prev    next >
Encoding:
Text File  |  2000-11-15  |  772 b   |  31 lines
  1. on mouseEnter me
  2.   spr = me.spriteNum
  3.   cursorLupa = [member("lupa"), member("lupamask")]
  4.   set the cursor of sprite spr to cursorLupa
  5. end
  6.  
  7. on mouseDown me
  8.   global posicion
  9.   if member(the member of sprite 70).name contains "video" then
  10.   else
  11.     puppetSound("transi")
  12.   end if
  13.   spr = me.spriteNum
  14.   if the rect of sprite spr <> rect(0, 0, 800, 600) then
  15.     posicion = the rect of sprite spr
  16.     set the rect of sprite spr to rect(0, 0, 800, 600)
  17.     sprite(2).visible = 0
  18.     sprite(3).visible = 0
  19.     sprite(4).visible = 0
  20.     puppetTransition(5, 1, 1, 1)
  21.     updateStage()
  22.   else
  23.     set the rect of sprite spr to posicion
  24.     sprite(2).visible = 1
  25.     sprite(3).visible = 1
  26.     sprite(4).visible = 1
  27.     puppetTransition(8, 1, 1, 1)
  28.     updateStage()
  29.   end if
  30. end
  31.