|
|
Face Mouse-Alphamania
Added on 6/10/1999
|
Requires Effector Set 1 Behavior Support Scripts
property pOffset
on getPropertyDescriptionList
if not alphamaniacCheck(the currentSpriteNum) then exit
set pList=[:]
addProp pList,#pOffset,[format:#integer,comment:"Offset Angle:", Default:0,range:[min:0,max:360]]
return pList
end
on beginSprite me
set s=the spriteNum of me
if not alphaManiac(s) then exit
rotate(sprite s,[animMode:#RelativeToPoint,relativeTo:point(the mouseH,the mouseV)])
end
on exitFrame me
set s=the spriteNum of me
if not alphaManiac(s) then exit
rotate(sprite s,[animMode:#RelativeToPoint,relativeTo:point(the mouseH,the mouseV)])
end
|
|