174 lines
6.2 KiB
Lua
Executable File
174 lines
6.2 KiB
Lua
Executable File
--global constants
|
|
|
|
automobiles_lib.vector_up = vector.new(0, 1, 0)
|
|
|
|
function automobiles_lib.check_road_is_ok(obj, max_acc_factor)
|
|
local pos_below = obj:get_pos()
|
|
pos_below.y = pos_below.y - 0.1
|
|
local node_below = core.get_node(pos_below).name
|
|
--core.chat_send_all(node_below)
|
|
local nodedef = core.registered_nodes[node_below]
|
|
if nodedef.liquidtype == "none" then
|
|
local slow_nodes = {
|
|
['default:ice '] = 0.01,
|
|
['default:cave_ice'] = 0.01,
|
|
}
|
|
local acc = slow_nodes[node_below]
|
|
if acc == nil then acc = max_acc_factor end
|
|
return acc
|
|
else
|
|
return 0
|
|
end
|
|
end
|
|
|
|
function automobiles_lib.set_yaw_by_mouse(self, dir, steering_limit)
|
|
local rotation = self.object:get_rotation()
|
|
local rot_y = math.deg(rotation.y)
|
|
|
|
local total = math.abs(math.floor(rot_y/360))
|
|
|
|
if rot_y < 0 then rot_y = rot_y + (360*total) end
|
|
if rot_y > 360 then rot_y = rot_y - (360*total) end
|
|
if rot_y >= 270 and dir <= 90 then dir = dir + 360 end
|
|
if rot_y <= 90 and dir >= 270 then dir = dir - 360 end
|
|
|
|
local intensity = 2
|
|
if self._intensity then intensity = self._intensity end
|
|
local command = (rot_y - dir) * intensity
|
|
if command < -90 then command = -90
|
|
elseif command > 90 then command = 90 end
|
|
--core.chat_send_all("rotation y: "..rot_y.." - dir: "..dir.." - command: "..(rot_y - dir))
|
|
|
|
--core.chat_send_all("rotation y: "..rot_y.." - dir: "..dir.." - command: "..command)
|
|
|
|
return (-command * steering_limit)/90
|
|
end
|
|
|
|
function automobiles_lib.control(self, dtime, hull_direction, longit_speed, longit_drag, later_drag, accel, max_acc_factor, max_speed, steering_limit, steering_speed)
|
|
self._last_time_command = self._last_time_command + dtime
|
|
hull_direction = hull_direction or 0
|
|
longit_speed = longit_speed or 0
|
|
longit_drag = longit_drag or 0
|
|
later_drag = later_drag or 0
|
|
max_acc_factor = max_acc_factor or 0
|
|
max_speed = max_speed or 0
|
|
steering_limit = steering_limit or 0
|
|
steering_speed = steering_speed or 0
|
|
|
|
if self._last_time_command > 1 then self._last_time_command = 1 end
|
|
|
|
local player = core.get_player_by_name(self.driver_name)
|
|
local retval_accel = accel;
|
|
local stop = false
|
|
|
|
-- player control
|
|
if player then
|
|
local ctrl = player:get_player_control()
|
|
|
|
local acc = 0
|
|
if self._energy > 0 then
|
|
if longit_speed < max_speed and ctrl.up then
|
|
--get acceleration factor
|
|
acc = automobiles_lib.check_road_is_ok(self.object, max_acc_factor)
|
|
--core.chat_send_all('engineacc: '.. engineacc)
|
|
if acc > 1 and acc < max_acc_factor and longit_speed > 0 then
|
|
--improper road will reduce speed
|
|
acc = -1
|
|
end
|
|
end
|
|
|
|
|
|
--reversing
|
|
if ctrl.sneak and longit_speed <= 1.0 and longit_speed > -1.0 then
|
|
acc = -2
|
|
end
|
|
end
|
|
|
|
--break
|
|
if ctrl.down or ctrl.jump then
|
|
--[[if math.abs(longit_speed) > 0 then
|
|
acc = -5 / (longit_speed / 2) -- lets set a brake efficience based on speed
|
|
end]]--
|
|
|
|
--total stop
|
|
--wheel break
|
|
if longit_speed > 0 then
|
|
acc = -5
|
|
--[[if (longit_speed + acc) < 0 then
|
|
acc = longit_speed * -1
|
|
end]]--
|
|
end
|
|
if longit_speed < 0 then
|
|
acc = 5
|
|
if (longit_speed + acc) > 0 then
|
|
acc = longit_speed * -1
|
|
end
|
|
end
|
|
if math.abs(longit_speed) < 1 then
|
|
stop = true
|
|
end
|
|
end
|
|
|
|
if acc then retval_accel=vector.add(accel,vector.multiply(hull_direction,acc)) end
|
|
|
|
if ctrl.aux1 then
|
|
--[[
|
|
--sets the engine running - but sets a delay also, cause keypress
|
|
if self._last_time_command > 0.3 then
|
|
self._last_time_command = 0
|
|
if self._engine_running then
|
|
self._engine_running = false
|
|
-- sound and animation
|
|
if self.sound_handle then
|
|
core.sound_stop(self.sound_handle)
|
|
self.sound_handle = nil
|
|
end
|
|
--self.engine:set_animation_frame_speed(0)
|
|
|
|
elseif self._engine_running == false and self._energy > 0 then
|
|
self._engine_running = true
|
|
-- sound and animation
|
|
self.sound_handle = core.sound_play({name = "engine"},
|
|
{object = self.object, gain = 2.0, pitch = 1.0, max_hear_distance = 32, loop = true,})
|
|
--self.engine:set_animation_frame_speed(30)
|
|
end
|
|
end]]--
|
|
end
|
|
|
|
-- yaw
|
|
local yaw_cmd = 0
|
|
if self._yaw_by_mouse == true then
|
|
local rot_y = math.deg(player:get_look_horizontal())
|
|
self._steering_angle = automobiles_lib.set_yaw_by_mouse(self, rot_y, steering_limit)
|
|
else
|
|
-- steering
|
|
if ctrl.right then
|
|
self._steering_angle = math.max(self._steering_angle-steering_speed*dtime,-steering_limit)
|
|
elseif ctrl.left then
|
|
self._steering_angle = math.min(self._steering_angle+steering_speed*dtime,steering_limit)
|
|
else
|
|
--center steering
|
|
if longit_speed > 0 then
|
|
local factor = 1
|
|
if self._steering_angle > 0 then factor = -1 end
|
|
local correction = (steering_limit*(longit_speed/75)) * factor
|
|
local before_correction = self._steering_angle
|
|
self._steering_angle = self._steering_angle + correction
|
|
if math.sign(before_correction) ~= math.sign(self._steering_angle) then self._steering_angle = 0 end
|
|
end
|
|
end
|
|
end
|
|
|
|
local angle_factor = self._steering_angle / 60
|
|
if angle_factor < 0 then angle_factor = angle_factor * -1 end
|
|
local deacc_on_curve = longit_speed * angle_factor
|
|
deacc_on_curve = deacc_on_curve * -1
|
|
if deacc_on_curve then retval_accel=vector.add(retval_accel,vector.multiply(hull_direction,deacc_on_curve)) end
|
|
|
|
end
|
|
|
|
return retval_accel, stop
|
|
end
|
|
|
|
|