Color Fader-Alphamania

 

Compatibilities:

This item has not yet been rated

These behaviors are for use with the Alphamania Xtra and its add-on effector sets. Requires Effector Set 1 Behavior Support Scripts

Property pStart,pEnd,pSpeed on getPropertyDescriptionList   if not alphamaniacCheck(the currentSpriteNum) then exit      set pList=[:]   addProp pList,#pStart,[format:#integer,comment:"Start Saturation %:",¬                          Default:0, range:[min:-255,max:255]]   addProp pList,#pEnd,[format:#integer,comment:"End Saturation %:",¬                        Default:0, range:[min:-255,max:255]]   addProp pList,#pSpeed,[format:#integer,comment:"Frames:", Default:30]   return pList end on beginSprite me   set s=the spriteNum of me   if not alphaManiac(s) then exit      hsb(sprite s,[animMode:#Range,numFrames:pSpeed, startSat:pStart, endSat:pEnd]) end on getBehaviorDescription me   set msg= "Fade the color on your AlphaManiac!"   put return & return after msg   put "Parameters:" & return & "-----------" & return  after msg   put "*  Start Saturation %: -255 to 255" & return after msg   put "*     End Saturation %: -255 to 255" & return after msg   put "*                    Frames: Lower numbers are faster"  after msg   put return & "-----------" & return & return  & ">>>" && amTip()  after msg   return msg end