Setup Anim

 

Compatibilities: Required Xtras: Alphamania Effector Set I for Alphamania

This item has not yet been rated

Requires Effector Set 1 Behavior Support Scripts

Property pFrames,pStart,pEnd,pIn,pOut,pLoop 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,#pFrames,[format:#integer,comment:"Frames:",Default:15]      addProp pList,#pIn,[format:#integer,comment:"Ease In %:",¬                       Default:10,range:[min:0,max:100]]      addProp pList,#pOut,[format:#integer,comment:"Ease Out %:",¬                        Default:10,range:[min:0,max:100]]      addProp pList,#pLoop,[format:#boolean,comment:"Pendulum:",Default:false]      return pList end on beginSprite me   -- Convert Ease In & Out to frames   set pIn=(pIn*pFrames) / 100   set pOut=(pOut*pFrames) / 100   reset(me)    end on trigger me,reverseFlag   set s = the spriteNum of me   if not alphaManiac(s) then exit      if pLoop then     hsb(sprite s,[animMode:#Pendulum,startSat:pStart,¬                      endSat:pEnd,numFrames:pFrames,EaseIn:pIn,EaseOut:pOut])   else     if reverseFlag then       hsb(sprite s,[animMode:#Range,startSat:pEnd,¬                      endSat:pStart,numFrames:pFrames,EaseIn:pIn,EaseOut:pOut])     else       hsb(sprite s,[animMode:#Range,startSat:pStart,¬                      endSat:pEnd,numFrames:pFrames,EaseIn:pIn,EaseOut:pOut])     end if   end if end on reset me   set s=the spriteNum of me   if not alphaManiac(s) then exit      hsb(sprite s,[animMode:#Static,forceSat:pStart]) end

Upload Provided by ABCUpload ASP