anime=
Table[
x=2 t+4 t^2/2 -80;
x2 = t +2 t^2/2-80;
x3=t+3 t^2/2-150;
x4 = t +3 t^2/2-180;
y=7 Sin[1.2 t];
y2=-25 Cos[t/2];

body1=Cuboid[{x-11,y+5,0},{x+10,y+15,4}];
body2=Cuboid[{x-8,y+5,4},{x+5,y+15,7}];
wheellf=Cylinder[{{x+5,y+15,1.2},{x+5,y+16.5,1.2}},2];
wheellr=Cylinder[{{x-7,y+15,1.2},{x-7,y+16.5,1.2}},2];
wheelrf=Cylinder[{{x+5,y+5,1.2},{x+5,y+3.5,1.2}},2];
wheelrr=Cylinder[{{x-7,y+5,1.2},{x-7,y+3.5,1.2}},2];

bbody1=Cuboid[{-x2+11,-17,0},{-x2-10,-7,4}];
bbody2=Cuboid[{-x2+8,-17,4},{-x2-5,-7,7}];
bwheellf=Cylinder[{{-x2-5,-7,1.2},{-x2-5,-5.5,1.2}},2];
bwheellr=Cylinder[{{-x2+7,-7,1.2},{-x2+7,-5.5,1.2}},2];
bwheelrf=Cylinder[{{-x2-5,-17,1.2},{-x2-5,-18.5,1.2}},2];
bwheelrr=Cylinder[{{-x2+7,-17,1.2},{-x2+7,-18.5,1.2}},2];

cbody1=Cuboid[{x3-11,5,0},{x3+10,15,2}];
cbody2=Cuboid[{x3-11,5,2},{x3+10,15,4}];
cbody3=Cuboid[{x3-8,5,4},{x3+5,15,7}];
cwheellf=Cylinder[{{x3+5,15,1.2},{x3+5,16.5,1.2}},2];
cwheellr=Cylinder[{{x3-7,15,1.2},{x3-7,16.5,1.2}},2];
cwheelrf=Cylinder[{{x3+5,5,1.2},{x3+5,3.5,1.2}},2];
cwheelrr=Cylinder[{{x3-7,5,1.2},{x3-7,3.5,1.2}},2];
clanp=Cuboid[{x3-1,5.5,7},{x3,13.5,8.5}];

dbody1=Cuboid[{-x4+11,y2-17,0},{-x4-10,y2-7,4}];
dbody2=Cuboid[{-x4+8,y2-17,4},{-x4-5,y2-7,7}];
dwheellf=Cylinder[{{-x4-5,y2-7,1.2},{-x4-5,y2-5.5,1.2}},2];
dwheellr=Cylinder[{{-x4+7,y2-7,1.2},{-x4+7,y2-5.5,1.2}},2];
dwheelrf=Cylinder[{{-x4-5,y2-17,1.2},{-x4-5,y2-18.5,1.2}},2];
dwheelrr=Cylinder[{{-x4+7,y2-17,1.2},{-x4+7,y2-18.5,1.2}},2];

center=Polygon[{{-100,0,-1.2},{100,0,-1.2},{100,-2,-1.2},{-100,-2,-1.2}}];

ground=Polygon[{{-100,-50,-1.2},{100,-50,-1.2},{100,50,-1.2},{-100,50,-1.2}}];

Show[Graphics3D[{Red,body1}],Graphics3D[{Red,body2}],
Graphics3D[{Gray,wheellf}],Graphics3D[{Gray,wheellr}],
Graphics3D[{Gray,wheelrf}],Graphics3D[{Gray, wheelrr}],

Graphics3D[{Yellow,bbody1}],Graphics3D[{Yellow,bbody2}],
Graphics3D[{Gray,bwheellf}],Graphics3D[{Gray,bwheellr}],
Graphics3D[{Gray,bwheelrf}],Graphics3D[{Gray, bwheelrr}],

Graphics3D[{Black,cbody1}],Graphics3D[{White,cbody2}],
Graphics3D[{White,cbody3}],
Graphics3D[{Gray,cwheellf}],Graphics3D[{Gray,cwheellr}],
Graphics3D[{Gray,cwheelrf}],Graphics3D[{Gray, cwheelrr}],
Graphics3D[{Red,clanp}],

Graphics3D[{Blue,dbody1}],Graphics3D[{Blue,dbody2}],
Graphics3D[{Gray,dwheellf}],Graphics3D[{Gray,dwheellr}],
Graphics3D[{Gray,dwheelrf}],Graphics3D[{Gray, dwheelrr}],

Graphics3D[{Gray,ground}],
Graphics3D[{White,center}],
Background->Black,
Lighting->"Neutral",

ViewPoint->{2,4,3},
ViewAngle->Pi/30,

PlotRange->{{-100,80},{-50,50},{-1.2,50}},
Boxed->False],

{t,0,20,0.3}
];

ListAnimate[anime]
Export["highway.gif",anime]
highway.gif