motorboat/motorboat_control.lua at fork-master · C-C-Minetest-Server/motorboat · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
--global constants

motorboat.motorboat_last_time_command = 0
motorboat.vector_up = vector.new(0, 1, 0)

function motorboat.get_pointer_angle(energy)
    local angle = energy * 18
    angle = angle - 90
    angle = angle * -1
	return angle
end

function motorboat.check_node_below(obj)
	local pos_below = obj:get_pos()
	pos_below.y = pos_below.y - 0.1
	local node_below = minetest.get_node(pos_below).name
	local nodedef = minetest.registered_nodes[node_below]
	local touching_ground = not nodedef or -- unknown nodes are solid
			nodedef.walkable or false
	local liquid_below = not touching_ground and nodedef.liquidtype ~= "none"
	return touching_ground, liquid_below
end

function motorboat.powerAdjust(self,dtime,factor,dir,max_power)
    local max = max_power or 100
    local add_factor = factor*10
    add_factor = add_factor * (dtime/0.2) --adjusting the command speed by dtime
    local power_index = self._power_lever
    --minetest.chat_send_all(power_index)

    if dir == 1 then
        if self._power_lever < max then
            self._power_lever = self._power_lever + add_factor
        end
        if self._power_lever > max then
            self._power_lever = max
        end
    end
    if dir == -1 then
        if self._power_lever > 0 then
            self._power_lever = self._power_lever - add_factor
            if self._power_lever < 0 then self._power_lever = 0 end
        end
        if self._power_lever <= 0 then
            self._power_lever = 0
        end
    end
end

function motorboat.motorboat_control(self, dtime, hull_direction, longit_speed,
        longit_drag, later_speed, later_drag, accel)
    motorboat.motorboat_last_time_command = motorboat.motorboat_last_time_command + dtime
    if motorboat.motorboat_last_time_command > 1 then motorboat.motorboat_last_time_command = 1 end
	local player = minetest.get_player_by_name(self.driver_name)
    local retval_accel = accel;

	-- player control
	if player then
        --minetest.chat_send_all('teste')
		local ctrl = player:get_player_control()
        local max_speed_anchor = 0.2
        if ctrl.sneak and motorboat.motorboat_last_time_command > 0.3 and
                longit_speed < max_speed_anchor and longit_speed > -max_speed_anchor then
            motorboat.motorboat_last_time_command = 0
		    if self.anchored == false then
                self.anchored = true
                self.object:set_velocity(vector.new())
                minetest.chat_send_player(self.driver_name, 'anchors away!')
            else
                self.anchored = false
                minetest.chat_send_player(self.driver_name, 'weigh anchor!')
            end
        end

		if ctrl.sneak then
            if longit_speed >= max_speed_anchor or longit_speed <= -max_speed_anchor then
                self.rudder_angle = 0
            end
		end

        if self.anchored == false then
            if self._engine_running then
                local factor = 1
                --increase power lever
                if ctrl.up then
                    motorboat.powerAdjust(self, dtime, factor, 1)
                end
                --decrease power lever
                if ctrl.down then
                    motorboat.powerAdjust(self, dtime, factor, -1)
                    if self._power_lever <= 0 and is_flying == false then
                        --break
                        if longit_speed > 0 then
                            engineacc = -1
                            if (longit_speed + engineacc) < 0 then
                                engineacc = longit_speed * -1
                            end
                        end
                        if longit_speed < 0 then
                            engineacc = 1
                            if (longit_speed + engineacc) > 0 then
                                engineacc = longit_speed * -1
                            end
                        end
                        if abs(longit_speed) == 0 then
                            stop = true
                        end
                    end
                end

                local max_engine_acc = 1.5
                local engineacc = (self._power_lever * max_engine_acc) / 100;
                local max_speed = 8.0
                if longit_speed > max_speed then
                    engineacc = engineacc - (longit_speed-max_speed)
                    if engineacc < 0 then engineacc = 0 end
                end

		        if engineacc then retval_accel=vector.add(accel,vector.multiply(hull_direction,engineacc)) end
                --minetest.chat_send_all('paddle: '.. paddleacc)
            else
		        local paddleacc
		        if longit_speed < 1.0 and ctrl.up then
			        paddleacc = 0.5
		        elseif longit_speed >  -1.0 and ctrl.down then
			        paddleacc = -0.5
		        end
		        if paddleacc then retval_accel=vector.add(accel,vector.multiply(hull_direction,paddleacc)) end
                --minetest.chat_send_all('paddle: '.. paddleacc)
            end
        end

		if ctrl.aux1 then
            --sets the engine running - but sets a delay also, cause keypress
            if motorboat.motorboat_last_time_command > 0.3 then
                motorboat.motorboat_last_time_command = 0
			    if self._engine_running then
				    self._engine_running = false
			        -- sound and animation
                    if self.sound_handle then
                        minetest.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 = minetest.sound_play({name = "motorboat_engine"},
			                {object = self.object, gain = 1.0, pitch = 0.5, max_hear_distance = 32, loop = true,})
                    self.engine:set_animation_frame_speed(30)
			    end
            end
		end

		-- rudder
        local rudder_limit = 30
		if ctrl.right then
			self.rudder_angle = math.max(self.rudder_angle-20*dtime,-rudder_limit)
		elseif ctrl.left then
			self.rudder_angle = math.min(self.rudder_angle+20*dtime,rudder_limit)
		end
	end
    return retval_accel
end