Contents
Articles
Behaviors
Books
Director News
Director Web Sites
FAQ
Games
Mailing Lists
News Groups
Project Examples
Reviews
Software
Tools
Useful Web Sites
Utilities
Xtras

Don't miss these
ToolTips for Shockwave 3D
Atom
Fire in Shockwave 3d
PrefsFolder XObject
Director 7 and Lingo Authorized
Ripple Follow Sprite-Alphamania
RealLingo
Key Code
PowerPoint / PPT Access
LineHiLiter
 

 

 

Behavior Emboss trick

Added on 9/27/2001

 

Compatibilities:
behavior D6_5 D7 D8 D8_5 Mac PC Shockwave

This item has not yet been rated

Author: SunilBalan

A very simple trick to get a emboss effect on roll over

Download PC Source
property pSprite, pState, pVel, pSet

on getBehaviorDescription
  description = "This is a simple trick to get a emboss effect on roll over on. Here I have changed the reg point of the first image and changed the line spaciing of the text member to get a emboss an effect. This behaviour does nothing but blend one layer and make another puppetted layer to TRUE. A very simple trick, explore in your own ways with different ink effects, But you have to remember always two things when you drop this behaviour on a sprite."& RETURN & RETURN & "1: First image to appear should always precede final image in your cast library."& RETURN & RETURN &"2: The channel above the sprite which contains this behaviour should always be empty."
  return description
end getBehaviorDescription

on getPropertyDescriptionList
  description = [:]
  addprop description, #pSet, [#comment:"Set the speed to blend", #format:#integer, #range:[1, 2, 5, 10, 20, 50], #default: 10]
  return description
end getPropertyDescriptionList

on prepareFrame me
  puppetsprite the currentspritenum - 1, TRUE
  sprite(the currentspritenum - 1).membernum = sprite(me.spriteNum).membernum -1
  sprite(the currentspritenum - 1).loc = sprite(me.spriteNum).loc
  sprite(the currentspritenum - 1).ink = 36
  case pState of
    #in: Fadein()
    #out: FadeOut()
  end case
end

on beginSprite me
  pSprite    = sprite(me.spriteNum)
  pState    = #off
  pVel  = pSet
  pSprite.blend = 0  
end

on mouseEnter me
  pState = #in
end

on mouseLeave me
  puppetsprite 1, FALSE
  pState = #out
end

on FadeIn me
  if pSprite.blend = 100 then pState = #off
  else pSprite.blend = pSprite.blend + pVel
end

on FadeOut me
  if pSprite.blend = 0 then pState = #off
  else pSprite.blend = pSprite.blend - pVel
end

 


Contact

MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA

Send e-mail