Galleria D'arte: Manet/Manet.iso/Dati/Main.dxr/00020_slideshowtasto.ls

Text File | 2000-12-21 | 1.7 KB | 65 lines

property pCastORIG, pCastFB1
global finestra, gMovie

on getPropertyDescriptionList
  pippo = the memberNum of sprite the currentSpriteNum
  pluto = pippo + 1
  paperino = pippo + 2
  propertyDescriptionList = [#pCastORIG: [#comment: "Numero elemento del Cast di origine del bottone", #format: #integer, #default: pippo], #pCastFB1: [#comment: "Numero elemento del Cast del primo feedback", #format: #integer, #default: pluto]]
  return propertyDescriptionList
end

on mouseEnter me
  if sprite(the currentSpriteNum).member.name = "Proiett_F3" then
    exit
  end if
  set the memberNum of sprite the currentSpriteNum to pCastFB1
  cursor(280)
  updateStage()
end

on mouseLeave me
  if sprite(the currentSpriteNum).member.name = "Proiett_F3" then
    exit
  end if
  set the memberNum of sprite the currentSpriteNum to pCastORIG
  cursor(-1)
  updateStage()
end

on mouseDown me
  if sprite(the currentSpriteNum).member.name = "Proiett_F3" then
    exit
  end if
  cursor(280)
  updateStage()
end

on mouseUp me
  if sprite(the currentSpriteNum).member.name = "Proiett_F3" then
    exit
  end if
  set the memberNum of sprite the currentSpriteNum to pCastORIG
  cursor(-1)
  vecchia = gMovie
  finestra = "slideshow"
  if vecchia = finestra then
    exit
  end if
  unLoad()
  the windowList = []
  window(finestra).windowType = 2
  window(finestra).rect = rect(the stageLeft + 76, the stageTop + 60, the stageLeft + 716, the stageTop + 540)
  open(window(finestra))
end

on exitFrame me
  if gMovie = "slideshow" then
    sprite(the currentSpriteNum).member = "Proiett_F3"
  else
    if the rollOver <> 21 then
      sprite(the currentSpriteNum).member = "Proiett"
    end if
  end if
end