comet = createVehicle(480,0,4,10)
function tune()
compart1 = createObject(929,0,0,0)
compart2 = createObject(1010,0,0,0)
compart3 = createObject(1003,0,0,0)
compart4 = createObject(11470,0,0,0)
compart5 = createObject(7914,0,0,0)
compart6 = createObject(1073,0,0,0)
compart7 = createObject(16340,0,0,0)
compart8 = createObject(1252,0,0,0)
compart9 = createObject(2232,0,0,0)
attachElements(compart1,comet,0,1.2,-0.12)
attachElements(compart2,comet,-0.4,1,0,0,0,90)
attachElements(compart3,comet,0,-2.2,0.1)
attachElements(compart4,comet,0,0.4,0.3,0,0,180)
attachElements(compart5,comet,0,0.28,0.2)
attachElements(compart6,comet,-0.42,0.08,0.2,0,0,270)
attachElements(compart8,comet,0.48,1,0.1,90,0,0)
attachElements(compart9,comet,0,-1.6,-0.2,-70,90,0)
setObjectScale(compart1,0.5)
setObjectScale(compart4,0.02)
setObjectScale(compart5,0.01)
setObjectScale(compart6,0.1)
setObjectScale(compart7,0.1)
setElementCollisionsEnabled ( compart1, false )
setElementCollisionsEnabled ( compart2, false )
setElementCollisionsEnabled ( compart4, false )
setElementCollisionsEnabled ( compart5, false )
setElementCollisionsEnabled ( compart7, false )
setElementCollisionsEnabled ( compart9, false )
end
addCommandHandler("szmelc",tune)
function das()
setVehicleHandling ( comet, "mass", 1000 )
setVehicleHandling ( comet, "turnMass", 1800)
setVehicleHandling ( comet, "tractionMultiplier", 0.9)
setVehicleHandling ( comet, "suspensionLowerLimit", -0.01)
setVehicleHandling ( comet, "engineAcceleration", 14.2)
end
addCommandHandler("tune", das)