Search content:

 

Personal Menu
Username:
Password:
Save password

Become a member

Forgot Password?

 

Don't miss these
Lingo Web Logs / Journals
Blur Rollover-Alphamania
Go Marker of a Movie in current Directory
AppSafe Xtra for Authorware and Director
Lingo MarkUp Xtra
Go to net movie
xMedia
Dual Button With Rollover Effect
SpellCatcher
CD Autorun
MediaMacros Xtras Mall
 

 

 

Behavior FADER

Added on 7/19/2004

 

Compatibilities:
D6_5 Mac PC Shockwave

Rating:

Author: Diego (website)

Create a blend effect on rollover.

-- FADER
-- (c) 2004 Diego Mangoni
-- http://dmzone.it
-- dmzone@dmzone.it


property mySelf,blend_start, blend_end, blend_speed

on beginSprite me
  --
  if blend_end < blend_start then
    blend_speed = blend_speed *(-1)
  end if
  --
  theGap = abs(blend_end) - abs(blend_start)
  theGap = abs(theGap)
  theMod = theGap mod blend_speed
  repeat while theMod <> 0
    blend_speed = blend_speed -1
    theMod = theGap mod blend_speed
  end repeat
  mySelf = sprite(me.spriteNum)
  mySelf.blend = blend_start
end

on exitFrame me
  if the rollover = me.spriteNum then
    if mySelf.blend <> blend_end then
      mySelf.blend = mySelf.blend +blend_speed
    end if
  else
    if mySelf.blend <> blend_start then
      mySelf.blend = mySelf.blend -blend_speed
    end if
  end if
  
on getPropertyDescriptionList me
  
  props=[:]
  
  props[#blend_start]= [
  #comment: " Initial blend value",
  #format:  #integer,
  #range: [#min:0,#max:100],
  #default:  0]
  
  props[#blend_end]= [
  #comment: "Final blend value",
  #format:  #integer,
  #range: [#min:0,#max:100],
  #default:  100]
  
  props[#blend_speed]= [
  #comment: "Speed",
  #format:  #integer,
  #range: [#min:0,#max:25],
  #default:  10]
  
  return props
  
end getPropertyDescriptionList    


on getBehaviorDescription
  return "FADER" & RETURN &
    "(c) 2004 Diego Mangoni" & RETURN &
    "http://dmzone.it" & RETURN & RETURN &
    "Use this behavior to create a fade animation effect." & RETURN &
    "Parameters:" & RETURN &
    "* Initial blend value" & RETURN &
    "* Final blend value" & RETURN &
    "* Speed"
end getBehaviorDescription

 


Upload Provided by ABCUpload ASP

Contact

MMI
22 West Court Sq
Suite 2C
Newnan, GA 30263
USA

Fax - (206) 339-5833

Send e-mail