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
base64 encode/decode v1.2
Go Frame X
IMidi Xtra
Drop-Down Boxes in Director
Focus 3D
Set ButtonsEnabled Property of a Flash Cast member
Object Serializer
Video Cleanup
Hold on a frame till Flash finishes playing
UltimateNet Xtra
 

 

 

Behavior Pendulum Rotate-Alphamania

Added on 6/10/1999

 

Compatibilities:
D6_5 D7 D8 Mac PC Script

Required Xtras:
Alphamania
Effector Set I for Alphamania

This item has not yet been rated

Author: MediaLab (website)

Requires Effector Set 1 Behavior Support Scripts.

Property pSpeed, pInterp, pLeftLimit, pRightLimit, pEaseIn, pEaseOut

on getPropertyDescriptionList
  --if not alphamaniacCheck(the currentSpriteNum) then exit
  
  set pList=[:]
  addProp pList,#pSpeed,[format:#integer,comment:"Number of Frames", Default:6, range:[min:1,max:100]]
  addProp pList,#pLeftLimit,[format:#integer,comment:"Start(degrees):", Default:-90, range:[min:-360,max:360]]
  addProp pList,#pRightLimit,[format:#integer,comment:"End(degrees):", Default:90, range:[min:-360,max:360]]
  addProp pList,#pEaseIn,[format:#integer,comment:"Ease In Frames:", Default:0, range:[min:0,max:20]]
  addProp pList,#pEaseOut,[format:#integer,comment:"Ease Out Frames:", Default:0, range:[min:0,max:20]]
  addProp pList,#pInterp,[format:#symbol,
                               comment:"Interpolation:",
                               Default:#On,range:[#Off,#On,#Paused]]
  
  return pList
end

on beginSprite me
  set s=the spriteNum of me
  if not alphaManiac(s) then exit
  
  set pInterp=interpolation(pInterp)
  rotate(sprite s, [animMode:#pendulum, numFrames:pSpeed, startDegrees:pLeftLimit, endDegrees:pRightLimit, easeIn:pEaseIn, easeOut:pEaseOut, interpolation:pInterp])
end




on getBehaviorDescription me
  set msg= "Pendulum Rotation with Ease In and Out"
  put return & return after msg
  put "Parameters:" & return & "-----------" & return  after msg
  put "*  NumFrames:  How fast does it turn?" & return after msg
  put "*  Start degrees" & return after msg
  put "*  End Degrees" & return after msg
  put "*  Ease In Frames" & return after msg
  put "*  Ease Out Frames" & return after msg
  put "*   Interpolation:   On,Off,or While Paused" after msg
  put return & "-----------" & return & return  & ">>>" && amTip()  after msg
  return msg
end  

 


Contact

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

Send e-mail