function setVehiclePitch(vehicle, pDeg)
local pitch = math.rad(pDeg)
local x, y, z, w = getVehicleQuaternion(vehicle)
local yaw = math.atan2(2 * (w * z + x * y), 1 - 2 * (y * y + z * z))
local roll = math.atan2(2 * (w * y + x * z), 1 - 2 * (x * x + y * y))
local cy, sy = math.cos(yaw * 0.5), math.sin(yaw * 0.5)
local cp, sp = math.cos(pitch * 0.5), math.sin(pitch * 0.5)
local cr, sr = math.cos(roll * 0.5), math.sin(roll * 0.5)
local qw = cr * cp * cy + sr * sp * sy
local qx = sr * cp * cy - cr * sp * sy
local qy = cr * sp * cy + sr * cp * sy
local qz = cr * cp * sy - sr * sp * cy
setVehicleQuaternion(vehicle, qx, qy, qz, qw)
return true
end