for ($i = 1; $i < 376; $i++) {
string $curve = ("curve"+$i);
select -r nurbsPlane1;
select -tgl $curve;
projectCurve -ch true -rn false -un false -tol 0.01 $curve "nurbsPlane1";
string $newcurve = ("bodycurveA"+$i);
duplicateCurve -ch 1 -rn 0 -local 0;
rename $newcurve;
string $curvea = ($newcurve+".visibility");
string $curveb = ($newcurve+".v");
int $a = $i;
int $b = 3 + (($i - 1) * 2);
int $c = 5 + (($i - 1) * 2);
currentTime $b;
DeleteHistory;
setAttr $curvea off;
setKeyframe -t $a $curveb;
setAttr $curvea on;
setKeyframe -t $b $curveb;
setAttr $curvea off;
setKeyframe -t $c $curveb;
}