on.touch_move = function(id, x,y, dx,dy, pressure)
	if car.touchmoved then
		call_protected(car.touchmoved, id, x,y, dx,dy, pressure)
	end
	if car.touch_move then
		call_protected(car.touch_move, id, x,y, dx,dy, pressure)
	end
end

on.touch_release = function(id, x,y, dx,dy, pressure)
	if car.touchreleased then
		call_protected(car.touchreleased, id, x,y, dx,dy, pressure)
	end
	if car.touch_release then
		call_protected(car.touch_release, id, x,y, dx,dy, pressure)
	end
end

on.touch_press = function(id, x,y, dx,dy, pressure)
	if car.touchpressed then
		call_protected(car.touchpressed, id, x,y, dx,dy, pressure)
	end
	if car.touch_press then
		call_protected(car.touch_press, id, x,y, dx,dy, pressure)
	end
end