Confine Effect ot Mouse Over-Alphamania

 

Compatibilities:

This item has not yet been rated

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

property effectSym property sNum on getBehaviorDescription me   return "Will limit any effect to mouse over activity only." end on getPropertyDescriptionList me   set list = [:]   set mem = FindAlphaManiaMember()   if not voidP(mem) then     set fxList = GetListOfAllEffects(mem)          addProp list, #effectSym, [#comment: "Effect:", #format: #symbol, #range: fxList, #default: #scale]   else     addProp list, #hh, [#comment: "Not An AlphaMania Sprite!"]   end if   return list end on beginSprite me   set sNum = the spriteNum of me end on mouseEnter me   if symbolP(effectSym) then     ContinueEffect(sprite sNum, effectSym)   end if end on mouseLeave me   if symbolP(effectSym) then     PauseEffect(sprite sNum, effectSym)   end if end on FindAlphaManiaMember   repeat with x = 1 to the number of castLibs     repeat with y = 1 to the number of members of castLib x       if the type of member y of castLib x = #alpha then         return member y of castLib x       end if     end repeat   end repeat end