MAYA表达式控制动力学动画之小鸡抢食的场景方法介绍

　　global float $tx[],$tz[],$dx[],$dz[],$lx[],$lz[],$vx[],
$vz[],$aFx[],$afx[],$aFz[],$afz[],$ax[],$az[],$t=0.053,
$sign[],$zx[],$zz[],$k1=0.5,$k2=0.5,$k3=2,$k4;
int $code[],$i,$j,$k,$m,$n[];for($k=1;$k<41;$k=$k 1)
{
if(frame==1)
{$tx[0]=ball.translateX;//
$tx[1]=ball1.translateX=7.9;
$tx[2]=ball2.translateX=3;
$tx[3]=ball3.translateX=-0.8;
$tx[4]=ball4.translateX=1.3;
$tx[5]=ball5.translateX=-2;
$tx[6]=ball6.translateX=-4.3;
$tx[7]=ball7.translateX=8.8;
$tx[8]=ball8.translateX=16.02;
$tx[9]=ball9.translateX=12.0;
$tx[10]=ball10.translateX=5.2;
$tx[11]=ball1.translateX=-7.9;
$tx[12]=ball2.translateX=13;
$tx[13]=ball3.translateX=-10.8;
$tx[14]=ball4.translateX=21.3;
$tx[15]=ball5.translateX=-12;
$tx[16]=ball6.translateX=-14.3;
$tx[17]=ball7.translateX=28.8;
$tx[18]=ball8.translateX=10.02;
$tx[19]=ball9.translateX=18.0;
$tx[20]=ball10.translateX=15.2;$tz[0]=ball.translateZ;
$tz[1]=ball1.translateZ=1;
$tz[2]=ball2.translateZ=3.347;
$tz[3]=ball3.translateZ=8.908;
$tz[4]=ball4.translateZ=0.736;
$tz[5]=ball5.translateZ=2.525;
$tz[6]=ball6.translateZ=-2.145;
$tz[7]=ball7.translateZ=4.207;
$tz[8]=ball8.translateZ=0.542;
$tz[9]=ball9.translateZ=6.277;
$tz[10]=ball10.translateZ=5;
$tz[11]=ball11.translateZ=-1;
$tz[12]=ball12.translateZ=-3.347;
$tz[13]=ball13.translateZ=-8.908;
$tz[14]=ball14.translateZ=-0.736;
$tz[15]=ball15.translateZ=-2.525;
$tz[16]=ball16.translateZ=-10.145;
$tz[17]=ball17.translateZ=-4.207;
$tz[18]=ball18.translateZ=-5.542;
$tz[19]=ball19.translateZ=16.277;
$tz[20]=ball20.translateZ=15;for($i=1;$i<41;$i=$i 1)
{$aFz[$i]=$afz[$i]=$vz[$i]=$az[$i]=$n[$i]=0;
$z[$i]=$lz[$i]=5;
$aFx[$i]=$afx[$i]=$vx[$i]=$ax[$i]=0;
$lx[$i]=3;}}if(frame>=1)
{
$tz[0]=ball.translateZ;
$tx[0]=50*noise(0.006*frame);
$dz[$k]=$tz[$k]-$tz[0];
$n[$k]=0;
$z[$k]=5;
{for($j=0;$j<41;$j=$j 1){$dz[$j]=$tz[$j]-$tz[0];
$sign[$k]=sign($vz[$k])*sign($tz[$k]-$tz[$j]);
$dx[$j]=abs($tx[$j]-$tx[$k]);
if((abs($dz[$k]-$dz[$j])<5)
&&($sign[$k]>0)&&($dx[$j]<=5))
{
$lz[$k]=abs($dz[$k]-$dz[$j]);
$lz[$k]=min($lz[$k],$zz[$k]);
$zz[$k]=$lz[$k];$code[$k]=$j;
$n[$k]=$n[$k] 1;}
}
}}
if($n[$k]==0)
$aFz[$k]=15 0*rand($k) 0*abs($dz[$k]/3);
else
$aFz[$k]=15 0*abs($dz[$k]/3)-$k1*(7-$lz[$k]);
if($tz[$k]<$tz[0])
$aFz[$k]=-$aFz[$k];
if(($lz[$k]<3)&&($n[$k]>0))
$afz[$k]=8*$k2*$vz[$k] 10*sign($vz[$k]);
else
$afz[$k]=$k2*$vz[$k];
$az[$k]=$aFz[$k]-$afz[$k];
if(($lz[$k]<2)&&($n[$k]>0))
$vz[$k]=$vz[$code[$k]];
else
$vz[$k]=$vz[$k] $az[$k]*$t;$tz[$k]=-$vz[$k]*$t-0.5*$az[$k]*$t*$t $tz[$k];$lx[$k]=$tx[$k]-$tx[$code[$k]];
$dx[$k]=$tx[$k]-$tx[0];
$aFx[$k]=-3*($dx[$k]/5) 0.05*sign($dx[$k]);
if(($lx[$k]<2)&&($n[$k]>0)&&($lz[$k]<2))
{$afx[$k]=-5*sign($lx[$k])*((2.5-$lx[$k])/2)*((2.5-$lx[$k])/2) $k3*$vx[$k];
$ax[$k]=0;}
else if(($n[$k]>0)&&($lz[$k]>=2))
$afx[$k]=-0.1*sign($lx[$k])*((5-$lx[$k])/2) $k3*$vx[$k];
else
$afx[$k]=$k3*$vx[$k];
$ax[$k]=$aFx[$k]-$afx[$k];
$vx[$k]=$vx[$k] $ax[$k]*$t;
$tx[$k]=$tx[$k] $vx[$k]*$t 0.5*$ax[$k]*$t*$t;}
ball.translateX=$tx[0];
ball1.translateX=$tx[1];
ball2.translateX=$tx[2];
ball3.translateX=$tx[3];
ball4.translateX=$tx[4];
ball5.translateX=$tx[5];
ball6.translateX=$tx[6];
ball7.translateX=$tx[7];
ball8.translateX=$tx[8];
ball9.translateX=$tx[9];
ball10.translateX=$tx[10];
ball11.translateX=$tx[11];
ball12.translateX=$tx[12];
ball13.translateX=$tx[13];
ball14.translateX=$tx[14];
ball15.translateX=$tx[15];
ball16.translateX=$tx[16];
ball17.translateX=$tx[17];
ball18.translateX=$tx[18];
ball19.translateX=$tx[19];
ball20.translateX=$tx[20];ball1.translateZ=$tz[1];
ball2.translateZ=$tz[2];
ball3.translateZ=$tz[3];
ball4.translateZ=$tz[4];
ball5.translateZ=$tz[5];
ball6.translateZ=$tz[6];
ball7.translateZ=$tz[7];
ball8.translateZ=$tz[8];
ball9.translateZ=$tz[9];
ball10.translateZ=$tz[10];
ball11.translateZ=$tz[11];
ball12.translateZ=$tz[12];
ball13.translateZ=$tz[13];
ball14.translateZ=$tz[14];
ball15.translateZ=$tz[15];
ball16.translateZ=$tz[16];
ball17.translateZ=$tz[17];
ball18.translateZ=$tz[18];
ball19.translateZ=$tz[19];
ball20.translateZ=$tz[20];print("l:" $lx[2] " " $lx[5] " " $lx[10]
" n:" $n[1] ", " $n[2] ", " $n[3] ", " $n[4] ", " $n[5] ", " $n[6] ", " $n[7] ", " $n[8] ", " $n[10] "\n"
" dx:" $dx[2] " " $dx[5] " " $dx[10] "\n"
" aFx:" $aFx[2] " " $aFx[5] " " $aFx[10] "\n"
" ax:" $ax[2] " " $ax[5] " " $ax[10] " " "\n"
" afx:" $afx[2] " " $afx[5] " " $afx[10] "\n"
" vx:" $vx[2] " " $vx[5] " " $vx[10] "\n"