delta position script

script dump pos-change/accel


int $currentFrame=`currentTime -query`;

float $currentX, $currentY, $currentZ, $pastX,$pastY,$pastZ;
currentTime $currentFrame;
$currentX=`getAttr camera1_animatic8:pCube1.tx`;
$currentY=`getAttr camera1_animatic8:pCube1.ty`;
$currentZ=`getAttr camera1_animatic8:pCube1.tz`;

//currentTime $pastTime;
$pastX=`getAttr -t ($currentFrame-1) camera1_animatic8:pCube1.tx`;
$pastY=`getAttr -t ($currentFrame-1) camera1_animatic8:pCube1.ty`;
$pastZ=`getAttr -t ($currentFrame-1) camera1_animatic8:pCube1.tz`;

float $deltaX, $deltaY, $deltaZ;
$deltaX = $currentX-$pastX;
$deltaY = $currentY-$pastY;
$deltaZ = $currentZ-$pastZ;
float $deltaXsq= `pow $deltaX 2`;
float $deltaYsq=`pow $deltaY 2`;
float $deltaZsq=`pow $deltaZ 2`;
float $magDelta;
$magDelta=(`sqrt ($deltaXsq+$deltaYsq+$deltaZsq)`);
textEm1.speed = $magDelta * 100;