批处理序列动画演员的注册点

　　在许多情况下，我们会用到比如Film Loop的序列动画。这时如果构成序列动画的每一张图形演员的注册点不统一，那么动画的效果就会大打折扣。虽然Director演员对应的编辑器为我们提供了调整注册点的工具，但是如果需要调整大量的图片则会非常的繁琐，不过我们可以写一个批处理程序来进行批量调整。
eN7nk5jPV$e
Z%D'iJ/R(pgG on AGSetRegpoint fMembersInfoList,fPointSetType奥古多媒体vqT&P }g@
　if ilk(fMembersInfoList[1])=#list then
Q#q,x"vjc 　　if fMembersInfoList[1].count>=2 then
]/pWt9q r 　　　tcastnum=fMembersInfoList[2]
QN$fD-{B 　　else
#TMFR6m 　　　tcastnum=1奥古多媒体5\ fp!m!D-V*v3f
　　end if
EbIoM'f/R 　　repeat with i in fMembersInfoList[1]
Q,F+WfN t"mZ;h-Q 　　　if fPointSetType=#centered then
t)?0r1`?C&_$N 　　　　member(i,tcastnum).centerRegPoint =true
TB!M0IW 　　　else
/QN i-i^:i"^.] 　　　　member(i,tcastnum).RegPoint =fPointSetType奥古多媒体M KfH})v-L)_
　　　end if奥古多媒体$KzI/|(H!c3jo yl2?
V
　　end repeat奥古多媒体
|#F8QK_C)\*i
　else奥古多媒体!l.Kx[&c1a\'U
　　if fMembersInfoList.count>=3 then奥古多媒体a%t&M;Wy!k5y
　　　tcastnum=fMembersInfoList[3]奥古多媒体rv`'`$V eF
　　else奥古多媒体;E-t9?5yz |C
　　　tcastnum=1奥古多媒体W"C h)F5~0H
　　end if
_6w7J f'Nel` 　　repeat with i=fMembersInfoList[1] to fMembersInfoList[2]奥古多媒体e,El&X0bX7Ii,j%C
　　　if fPointSetType=#centered then奥古多媒体+V*v9|In&jFt
　　　　member(i,tcastnum).centerRegPoint =true
l@'U9~|AK7M 　　　else
8G6n1}bGY 　　　　member(i,tcastnum).RegPoint =fPointSetType奥古多媒体$N3}DU O7y'}(z7g
　　　end if奥古多媒体8@xe a2@X4I
　　end repeat
A2q;Cy?srSB&GR 　end if奥古多媒体)vU9RPE'CG
end
K$[~
p-I"ma
9q`1qqw 　　该函数的使用方法如下：
&}b0S3hK6C
O6WZ,o/Qx setregpoint([[1,2,3],],regpointSetMethod)奥古多媒体/z*^w
I(G7G
setregpoint([startMemberNum,endMemberNum,],regpointSetMethod)奥古多媒体!X xcZ'ilk

*Fj#~2n)C#f 　　其中参数CastNum可选，如果不传递此参数则默认为1号演员表，regpointSetMethod的值可以为#centered或者一个point。奥古多媒体
e2v"x7Vo'pg
奥古多媒体(D-\f6Dr,`L z
　　例如，以下语句将2号演员表中的1、3、4号演员的注册点居中：
^s)E*G'D3bS
f/~vD&Q,s/F;u8a8d setregpoint([[1,3,4],2],#centered)
^1MB
] y+P
EKs,Qa;O"E D Y 　　以下语句将1号演员表中的1至4号演员的注册点居设为point(0,0)：
PqB M l?YV7Be(M
K$x\J hh#k setregpoint([1,4],point(0,0))