added new vehicle

automobiles_motorcycle/motorcycle_player.lua

@@ -147,6 +147,7 @@ function motorcycle.attach_pax_stand(self, player)
 end
 
 function motorcycle.dettach_pax_stand(self, player)
+    if not player then return end
     local name = player:get_player_name() --self._passenger
 
     -- passenger clicked the object => driver gets off the vehicle

automobiles_vespa/README.md

@@ -0,0 +1,7 @@
+## Motorcycle
+
+This mod adds a motorcycle to Minetest.
+
+## Licenses
+- Code: see [LICENSE](/LICENSE)
+- Media: see [license_media.txt](/license_media.txt)

automobiles_vespa/init.lua

@@ -0,0 +1,26 @@
+--
+-- constants
+--
+vespa={}
+vespa.LONGIT_DRAG_FACTOR = 0.15*0.15
+vespa.LATER_DRAG_FACTOR = 30.0
+vespa.gravity = automobiles_lib.gravity
+vespa.max_speed = 20
+vespa.max_acc_factor = 6
+vespa.max_fuel = 3
+vespa.trunk_slots = 0
+
+vespa.front_wheel_xpos = 0
+vespa.rear_wheel_xpos = 0
+
+dofile(minetest.get_modpath("automobiles_lib") .. DIR_DELIM .. "custom_physics.lua")
+dofile(minetest.get_modpath("automobiles_lib") .. DIR_DELIM .. "control.lua")
+dofile(minetest.get_modpath("automobiles_lib") .. DIR_DELIM .. "fuel_management.lua")
+dofile(minetest.get_modpath("automobiles_lib") .. DIR_DELIM .. "ground_detection.lua")
+dofile(minetest.get_modpath("automobiles_vespa") .. DIR_DELIM .. "vespa_player.lua")
+dofile(minetest.get_modpath("automobiles_vespa") .. DIR_DELIM .. "vespa_utilities.lua")
+dofile(minetest.get_modpath("automobiles_vespa") .. DIR_DELIM .. "vespa_entities.lua")
+dofile(minetest.get_modpath("automobiles_vespa") .. DIR_DELIM .. "vespa_forms.lua")
+dofile(minetest.get_modpath("automobiles_vespa") .. DIR_DELIM .. "vespa_crafts.lua")
+
+

automobiles_vespa/locale/automobiles_vespa.eo.tr

@@ -0,0 +1,6 @@
+# textdomain: automobiles_vespa
+
+### motorcycle_crafts.lua ###
+Vespa Body=Vespa Korpo
+Vespa Wheel=Vespa Rado
+Vespa=Vespa

automobiles_vespa/locale/template.txt

@@ -0,0 +1,6 @@
+# textdomain: automobiles_vespa
+
+### motorcycle_crafts.lua ###
+Vespa Body=
+Vespa Wheel=
+Vespa=

automobiles_vespa/mod.conf

@@ -0,0 +1,5 @@
+name=automobiles_vespa
+title=Vespa
+description=A Vespa motorcycle
+author=apercy
+depends=biofuel,automobiles_lib

automobiles_vespa/vespa_crafts.lua

@@ -0,0 +1,75 @@
+local S = minetest.get_translator(minetest.get_current_modname())
+
+--
+-- items
+--
+
+-- body
+minetest.register_craftitem("automobiles_vespa:body",{
+	description = S("Vespa Body"),
+	inventory_image = "automobiles_vespa_body.png",
+})
+-- wheel
+minetest.register_craftitem("automobiles_vespa:wheel",{
+	description = S("Vespa Wheel"),
+	inventory_image = "automobiles_vespa_wheel_icon.png",
+})
+
+-- vespa
+minetest.register_craftitem("automobiles_vespa:vespa", {
+	description = S("Vespa"),
+	inventory_image = "automobiles_vespa.png",
+    liquids_pointable = false,
+
+	on_place = function(itemstack, placer, pointed_thing)
+		if pointed_thing.type ~= "node" then
+			return
+		end
+
+        local pointed_pos = pointed_thing.above
+		--pointed_pos.y=pointed_pos.y+0.2
+		local car = minetest.add_entity(pointed_pos, "automobiles_vespa:vespa")
+		if car and placer then
+            local ent = car:get_luaentity()
+            local owner = placer:get_player_name()
+            if ent then
+                ent.owner = owner
+			    car:set_yaw(placer:get_look_horizontal())
+			    itemstack:take_item()
+                ent.object:set_acceleration({x=0,y=-automobiles_lib.gravity,z=0})
+                automobiles_lib.setText(ent, "vespa")
+                automobiles_lib.create_inventory(ent, vespa.trunk_slots, owner)
+            end
+		end
+
+		return itemstack
+	end,
+})
+
+--
+-- crafting
+--
+if minetest.get_modpath("default") then
+	minetest.register_craft({
+		output = "automobiles_vespa:vespa",
+		recipe = {
+			{"automobiles_vespa:wheel", "automobiles_vespa:body", "automobiles_vespa:wheel"},
+		}
+	})
+	minetest.register_craft({
+		output = "automobiles_vespa:body",
+		recipe = {
+            {"default:glass" ,"","default:steel_ingot"},
+			{"default:steel_ingot","","default:steel_ingot"},
+			{"default:steel_ingot","automobiles_lib:engine", "default:steel_ingot"},
+		}
+	})
+	minetest.register_craft({
+		output = "automobiles_vespa:wheel",
+		recipe = {
+			{"default:steel_ingot", "default:tin_ingot", "default:steel_ingot"},
+			{"default:steel_ingot","default:steelblock",  "default:steel_ingot"},
+            {"default:steel_ingot", "default:tin_ingot", "default:steel_ingot"},
+		}
+	})
+end

automobiles_vespa/vespa_entities.lua

@@ -0,0 +1,591 @@
+--
+-- entity
+--
+
+minetest.register_entity('automobiles_vespa:lights',{
+initial_properties = {
+	physical = false,
+	collide_with_objects=false,
+	pointable=false,
+    glow = 0,
+	visual = "mesh",
+	mesh = "automobiles_vespa_lights.b3d",
+    textures = {"automobiles_grey.png",},
+	},
+
+    on_activate = function(self,std)
+	    self.sdata = minetest.deserialize(std) or {}
+	    if self.sdata.remove then self.object:remove() end
+    end,
+	    
+    get_staticdata=function(self)
+      self.sdata.remove=true
+      return minetest.serialize(self.sdata)
+    end,
+	
+})
+
+minetest.register_entity('automobiles_vespa:r_lights',{
+initial_properties = {
+	physical = false,
+	collide_with_objects=false,
+	pointable=false,
+    glow = 0,
+	visual = "mesh",
+	mesh = "automobiles_vespa_r_lights.b3d",
+    textures = {"automobiles_red.png",},
+	},
+
+    on_activate = function(self,std)
+	    self.sdata = minetest.deserialize(std) or {}
+	    if self.sdata.remove then self.object:remove() end
+    end,
+	    
+    get_staticdata=function(self)
+      self.sdata.remove=true
+      return minetest.serialize(self.sdata)
+    end,
+	
+})
+
+minetest.register_entity('automobiles_vespa:pivot_mesh',{
+initial_properties = {
+	physical = false,
+	collide_with_objects=false,
+	pointable=false,
+	visual = "mesh",
+	mesh = "automobiles_pivot_mesh.b3d",
+    textures = {"automobiles_black.png",},
+	},
+	
+    on_activate = function(self,std)
+	    self.sdata = minetest.deserialize(std) or {}
+	    if self.sdata.remove then self.object:remove() end
+    end,
+	    
+    get_staticdata=function(self)
+      self.sdata.remove=true
+      return minetest.serialize(self.sdata)
+    end,
+	
+})
+
+minetest.register_entity('automobiles_vespa:pointer',{
+initial_properties = {
+	physical = false,
+	collide_with_objects=false,
+	pointable=false,
+	visual = "mesh",
+	mesh = "automobiles_pointer.b3d",
+    visual_size = {x = 0.8, y = 0.8, z = 0.8},
+	textures = {"automobiles_white.png"},
+	},
+	
+    on_activate = function(self,std)
+	    self.sdata = minetest.deserialize(std) or {}
+	    if self.sdata.remove then self.object:remove() end
+    end,
+	    
+    get_staticdata=function(self)
+      self.sdata.remove=true
+      return minetest.serialize(self.sdata)
+    end,
+})
+
+minetest.register_entity("automobiles_vespa:vespa", {
+	initial_properties = {
+	    physical = true,
+        collide_with_objects = true,
+	    collisionbox = {-0.1, -0.24, -0.1, 0.1, 1, 0.1},
+	    selectionbox = {-1, 1, -1, 1, -1, 1},
+        stepheight = 0.8,
+	    visual = "mesh",
+	    mesh = "automobiles_vespa_body.b3d",
+        --use_texture_alpha = true,
+        backface_culling = false,
+        textures = {
+                "automobiles_black.png", --bancos
+                "automobiles_black.png", --escapamento
+                "automobiles_metal.png", --eixo motor
+                "automobiles_black.png", --motor
+                "automobiles_painting.png", --pintura guidão e paralama
+                "automobiles_black.png", --pneus
+                "automobiles_metal.png", --rodas e aros
+                "automobiles_painting.png", --pintura
+                "automobiles_metal.png", --cromo
+            },
+    },
+    textures = {},
+	driver_name = nil,
+	sound_handle = nil,
+    owner = "",
+    static_save = true,
+    infotext = "A very nice vespa!",
+    hp = 50,
+    buoyancy = 2,
+    physics = automobiles_lib.physics,
+    lastvelocity = vector.new(),
+    time_total = 0,
+    _passenger = nil,
+    _color = "#dc1818",
+    _steering_angle = 0,
+    _engine_running = false,
+    _last_checkpoint = "",
+    _total_laps = -1,
+    _race_id = "",
+    _energy = 1,
+    _last_time_collision_snd = 0,
+    _last_time_drift_snd = 0,
+    _last_time_command = 0,
+    _roll = math.rad(0),
+    _pitch = 0,
+    _longit_speed = 0,
+    _show_lights = false,
+    _light_old_pos = nil,
+    _last_ground_check = 0,
+    _last_light_move = 0,
+    _last_engine_sound_update = 0,
+    _inv = nil,
+    _inv_id = "",
+    _change_color = automobiles_lib.paint,
+    _intensity = 2,
+
+    get_staticdata = function(self) -- unloaded/unloads ... is now saved
+        return minetest.serialize({
+            stored_owner = self.owner,
+            stored_hp = self.hp,
+            stored_color = self._color,
+            stored_steering = self._steering_angle,
+            stored_energy = self._energy,
+            --race data
+            stored_last_checkpoint = self._last_checkpoint,
+            stored_total_laps = self._total_laps,
+            stored_race_id = self._race_id,
+            stored_rag = self._show_rag,
+            stored_pitch = self._pitch,
+            stored_light_old_pos = self._light_old_pos,
+            stored_inv_id = self._inv_id,
+        })
+    end,
+
+	on_deactivate = function(self)
+        automobiles_lib.save_inventory(self)
+	end,
+
+	on_activate = function(self, staticdata, dtime_s)
+        if staticdata ~= "" and staticdata ~= nil then
+            local data = minetest.deserialize(staticdata) or {}
+            self.owner = data.stored_owner
+            self.hp = data.stored_hp
+            self._color = data.stored_color
+            self._steering_angle = data.stored_steering
+            self._energy = data.stored_energy
+            --minetest.debug("loaded: ", self.energy)
+            --race data
+            self._last_checkpoint = data.stored_last_checkpoint
+            self._total_laps = data.stored_total_laps
+            self._race_id = data.stored_race_id
+            self._show_rag = data.stored_rag
+            self._pitch = data.stored_pitch
+            self._light_old_pos = data.stored_light_old_pos
+            self._inv_id = data.stored_inv_id
+            automobiles_lib.setText(self, "vespa")
+        end
+
+        self.object:set_animation({x = 1, y = 41}, 0, 0, true)
+
+        automobiles_lib.paint(self, self._color)
+        local pos = self.object:get_pos()
+
+        local lights = minetest.add_entity(pos,'automobiles_vespa:lights')
+	    lights:set_attach(self.object,'',{x=0,y=0,z=0},{x=0,y=0,z=0})
+	    self.lights = lights
+        self.lights:set_properties({is_visible=true})
+
+        local rlights = minetest.add_entity(pos,'automobiles_vespa:r_lights')
+	    rlights:set_attach(self.object,'',{x=0,y=0,z=0},{x=0,y=0,z=0})
+	    self.rlights = rlights
+        self.rlights:set_properties({is_visible=true})
+
+	    local driver_seat=minetest.add_entity(pos,'automobiles_vespa:pivot_mesh')
+        driver_seat:set_attach(self.object,'',{x=0.0,y=-1.1,z=5.5},{x=0,y=0,z=0})
+	    self.driver_seat = driver_seat
+
+	    local passenger_seat=minetest.add_entity(pos,'automobiles_vespa:pivot_mesh')
+        passenger_seat:set_attach(self.object,'',{x=0.0,y=1,z=0.09},{x=0,y=0,z=0})
+	    self.passenger_seat = passenger_seat
+
+		self.object:set_armor_groups({immortal=1})
+
+		local inv = minetest.get_inventory({type = "detached", name = self._inv_id})
+		-- if the game was closed the inventories have to be made anew, instead of just reattached
+		if not inv then
+            automobiles_lib.create_inventory(self, vespa.trunk_slots)
+		else
+		    self.inv = inv
+        end
+
+        self.object:set_bone_position("guidao", {x=0, y=0, z=14}, {x=22, y=180, z=0})
+        self.lights:set_bone_position("guidao", {x=0, y=0, z=14}, {x=22, y=180, z=0})
+
+        automobiles_lib.actfunc(self, staticdata, dtime_s)
+	end,
+
+	on_step = function(self, dtime)
+        automobiles_lib.stepfunc(self, dtime)
+        --[[sound play control]]--
+        self._last_time_collision_snd = self._last_time_collision_snd + dtime
+        if self._last_time_collision_snd > 1 then self._last_time_collision_snd = 1 end
+        --[[end sound control]]--
+
+        local rotation = self.object:get_rotation()
+        local yaw = rotation.y
+		local newyaw=yaw
+        local pitch = rotation.x
+
+        local hull_direction = minetest.yaw_to_dir(yaw)
+        local nhdir = {x=hull_direction.z,y=0,z=-hull_direction.x}		-- lateral unit vector
+        local velocity = self.object:get_velocity()
+
+        local longit_speed = automobiles_lib.dot(velocity,hull_direction)
+        local fuel_weight_factor = (5 - self._energy)/5000
+        local longit_drag = vector.multiply(hull_direction,(longit_speed*longit_speed) *
+            (vespa.LONGIT_DRAG_FACTOR - fuel_weight_factor) * -1 * automobiles_lib.sign(longit_speed))
+        
+		local later_speed = automobiles_lib.dot(velocity,nhdir)
+        local later_drag = vector.multiply(nhdir,later_speed*
+            later_speed*vespa.LATER_DRAG_FACTOR*-1*automobiles_lib.sign(later_speed))
+
+        local accel = vector.add(longit_drag,later_drag)
+        local stop = nil
+
+        local player = nil
+        local is_attached = false
+        if self.driver_name then
+            player = minetest.get_player_by_name(self.driver_name)
+            
+            if player then
+                local player_attach = player:get_attach()
+                if player_attach then
+                    if self.driver_seat then
+                        if player_attach == self.driver_seat then is_attached = true end
+                    end
+                end
+            end
+        end
+
+        local is_breaking = false
+        if is_attached then
+    		local ctrl = player:get_player_control()
+	        if ctrl.aux1 then
+                --sets the engine running - but sets a delay also, cause keypress
+                if self._last_time_command > 0.8 then
+                    self._last_time_command = 0
+                    --[[minetest.sound_play({name = "automobiles_horn"},
+	                        {object = self.object, gain = 0.6, pitch = 1.0, max_hear_distance = 32, loop = false,})]]--
+                end
+	        end
+            if ctrl.down then
+                is_breaking = true
+                self.lights:set_properties({textures={"automobiles_vespa_lights.png",}, glow=32})
+                self.rlights:set_properties({textures={"automobiles_vespa_rear_lights_full.png",}, glow=32})
+            end
+
+        else
+            --desligado
+            self.lights:set_properties({textures={"automobiles_grey.png",}, glow=0})
+            self.rlights:set_properties({textures={"automobiles_rear_lights_off.png",}, glow=0})
+        end
+
+        self._last_light_move = self._last_light_move + dtime
+        if self._last_light_move > 0.15 then
+            self._last_light_move = 0
+            if self._show_lights == true then
+                --self.lights:set_properties({is_visible=true})
+                self.lights:set_properties({textures={"automobiles_vespa_lights.png",}, glow=32})
+                self.rlights:set_properties({textures={"automobiles_vespa_rear_lights_full.png",}, glow=32})
+                if is_breaking == false then
+                    self.lights:set_properties({textures={"automobiles_vespa_lights.png",}, glow=32})
+                    self.rlights:set_properties({textures={"automobiles_vespa_rear_lights_full.png",}, glow=10})
+                end
+
+                --turn the light on just when needed to avoid lag
+                local target_pos = self.object:get_pos()
+                target_pos.y = target_pos.y + 2
+                local light_now = minetest.get_node_light(target_pos)
+                if light_now < 12 then
+                    automobiles_lib.put_light(self)
+                end
+            else
+                if is_breaking == false then
+                    --desligado
+                    self.lights:set_properties({textures={"automobiles_grey.png",}, glow=0})
+                    self.rlights:set_properties({textures={"automobiles_rear_lights_off.png",}, glow=0})
+                end
+                automobiles_lib.remove_light(self)
+            end
+        end
+
+        local curr_pos = self.object:get_pos()
+        local steering_angle_max = 30
+        self.object:move_to(curr_pos)
+		if is_attached then --and self.driver_name == self.owner then
+            self._show_lights = true
+            if self.driver_mesh then self.driver_mesh:set_properties({is_visible=true}) end
+            local impact = automobiles_lib.get_hipotenuse_value(velocity, self.lastvelocity)
+            if impact > 1 then
+                --self.damage = self.damage + impact --sum the impact value directly to damage meter
+                if self._last_time_collision_snd > 0.3 then
+                    self._last_time_collision_snd = 0
+                    minetest.sound_play("collision", {
+                        to_player = self.driver_name,
+	                    --pos = curr_pos,
+	                    --max_hear_distance = 5,
+	                    gain = 1.0,
+                        fade = 0.0,
+                        pitch = 1.0,
+                    })
+                end
+                --[[if self.damage > 100 then --if acumulated damage is greater than 100, adieu
+                    automobiles_lib.destroy(self)
+                end]]--
+            end
+
+            --control
+            local steering_speed = 80
+            if math.abs(longit_speed) > 3 then
+                local mid_speed = (steering_speed/2)
+                steering_speed = mid_speed + mid_speed / math.abs(longit_speed*0.25)
+            end
+			accel, stop = automobiles_lib.control(self, dtime, hull_direction, longit_speed, longit_drag, later_drag, accel, vespa.max_acc_factor, vespa.max_speed, steering_angle_max, steering_speed)
+        else
+            if self.driver_mesh then self.driver_mesh:set_properties({is_visible=false}) end
+            self._show_lights = false
+            if self.sound_handle ~= nil then
+	            minetest.sound_stop(self.sound_handle)
+	            self.sound_handle = nil
+            end
+		end
+
+        local angle_factor = self._steering_angle / 10
+        self.object:set_animation_frame_speed(longit_speed * (15 - angle_factor))
+
+        --whell turn
+        self.object:set_bone_position("eixo_direcao", {x=0, y=0, z=0}, {x=0, y=-self._steering_angle-angle_factor, z=0})
+        self.lights:set_bone_position("eixo_direcao", {x=0, y=0, z=0}, {x=0, y=-self._steering_angle-angle_factor, z=0})
+
+        if player then
+            -- -30 direita -> steering_angle_max
+            -- +30 esquerda
+            local arm_range = 2
+            local range = steering_angle_max * 2
+            local armZ = -((self._steering_angle+steering_angle_max) * arm_range) / 60
+            
+            --player:set_bone_position("Arm_Left", {x=3.0, y=5, z=-arm_range-armZ}, {x=240-(self._steering_angle/2), y=0, z=0})
+            --player:set_bone_position("Arm_Right", {x=-3.0, y=5, z=armZ}, {x=240+(self._steering_angle/2), y=0, z=0})
+            if self.driver_mesh then
+                self.driver_mesh:set_bone_position("Arm_Left", {x=3.0, y=5, z=-armZ-0.5}, {x=65-(self._steering_angle/2), y=0, z=0})
+                self.driver_mesh:set_bone_position("Arm_Right", {x=-3.0, y=5, z=armZ+1.5}, {x=65+(self._steering_angle/2), y=0, z=0})
+            end
+        end
+
+		if math.abs(self._steering_angle)>5 then
+            local turn_rate = math.rad(40)
+			newyaw = yaw + dtime*(1 - 1 / (math.abs(longit_speed) + 1)) *
+                self._steering_angle / 20 * turn_rate * automobiles_lib.sign(longit_speed)
+		end
+
+        --[[
+        accell correction
+        under some circunstances the acceleration exceeds the max value accepted by set_acceleration and
+        the game crashes with an overflow, so limiting the max acceleration in each axis prevents the crash
+        ]]--
+        local max_factor = 25
+        local acc_adjusted = 10
+        if accel.x > max_factor then accel.x = acc_adjusted end
+        if accel.x < -max_factor then accel.x = -acc_adjusted end
+        if accel.z > max_factor then accel.z = acc_adjusted end
+        if accel.z < -max_factor then accel.z = -acc_adjusted end
+        -- end correction
+
+        -- calculate energy consumption --
+        ----------------------------------
+        if self._energy > 0 then
+            local zero_reference = vector.new()
+            local acceleration = automobiles_lib.get_hipotenuse_value(accel, zero_reference)
+            --minetest.chat_send_all(acceleration)
+            local consumed_power = acceleration/150000
+            self._energy = self._energy - consumed_power;
+        end
+        if self._energy <= 0 then
+            self._engine_running = false
+            if self.sound_handle then minetest.sound_stop(self.sound_handle) end
+            minetest.chat_send_player(self.driver_name, "Out of fuel")
+        else
+            self._last_engine_sound_update = self._last_engine_sound_update + dtime
+            if self._last_engine_sound_update > 0.300 then
+                self._last_engine_sound_update = 0
+                vespa.engine_set_sound_and_animation(self, longit_speed)
+            end
+        end
+
+        local energy_indicator_angle = automobiles_lib.get_gauge_angle(self._energy)
+        ----------------------------
+        -- end energy consumption --
+
+        accel.y = -automobiles_lib.gravity
+
+        if stop ~= true then
+            --self.object:set_velocity(velocity)
+            self.object:set_acceleration(accel)
+        else
+            if stop == true then
+                self.object:set_acceleration({x=0,y=0,z=0})
+                self.object:set_velocity({x=0,y=0,z=0})
+                if self._longit_speed > 0 then vespa.engineSoundPlay(self) end
+            end
+        end
+
+        self._last_ground_check = self._last_ground_check + dtime
+        if self._last_ground_check > 0.18 then
+            self._last_ground_check = 0
+            automobiles_lib.ground_get_distances(self, 0.6, 1.63)
+        end
+		local newpitch = self._pitch --velocity.y * math.rad(6)
+
+        local turn_effect_speed = longit_speed
+        if turn_effect_speed > 10 then turn_effect_speed = 10 end
+        local newroll = (-self._steering_angle/100)*(turn_effect_speed/10)
+
+        if is_attached == false then
+            self.object:set_bone_position("descanso", {x=0, y=-0.4, z=6.2}, {x=-90, y=0, z=0})
+        else
+            self.object:set_bone_position("descanso", {x=0, y=-0.4, z=6.2}, {x=0, y=0, z=0})
+        end
+
+		self.object:set_rotation({x=newpitch,y=newyaw,z=newroll})
+
+        --saves last velocity for collision detection (abrupt stop)
+        self.lastvelocity = self.object:get_velocity()
+        self._longit_speed = longit_speed
+
+	end,
+
+	on_punch = function(self, puncher, ttime, toolcaps, dir, damage)
+		if not puncher or not puncher:is_player() then
+			return
+		end
+
+		local name = puncher:get_player_name()
+        --[[if self.owner and self.owner ~= name and self.owner ~= "" then return end]]--
+        if self.owner == nil then
+            self.owner = name
+        end
+        	
+        if self.driver_name and self.driver_name ~= name then
+			-- do not allow other players to remove the object while there is a driver
+			return
+		end
+        
+        local is_attached = false
+        if puncher:get_attach() == self.driver_seat then is_attached = true end
+
+        local itmstck=puncher:get_wielded_item()
+        local item_name = ""
+        if itmstck then item_name = itmstck:get_name() end
+
+        --refuel procedure
+        --[[
+        refuel works it car is stopped and engine is off
+        ]]--
+        local velocity = self.object:get_velocity()
+        local speed = automobiles_lib.get_hipotenuse_value(vector.new(), velocity)
+        if math.abs(speed) <= 0.1 then
+            if automobiles_lib.loadFuel(self, puncher:get_player_name(), false, vespa.max_fuel) then return end
+        end
+        -- end refuel
+
+        if is_attached == false then
+
+            -- deal with painting or destroying
+		    if itmstck then
+                --race status restart
+                if item_name == "checkpoints:status_restarter" and self._engine_running == false then
+                    --restart race current status
+                    self._last_checkpoint = ""
+                    self._total_laps = -1
+                    self._race_id = ""
+                    return
+                end
+
+                if automobiles_lib.set_paint(self, puncher, itmstck) == false then
+                    local is_admin = false
+                    is_admin = minetest.check_player_privs(puncher, {server=true})
+                    --minetest.chat_send_all('owner '.. self.owner ..' - name '.. name)
+				    if not self.driver and (self.owner == name or is_admin == true) and toolcaps and
+                            toolcaps.damage_groups and toolcaps.damage_groups.fleshy then
+                        self.hp = self.hp - 10
+                        minetest.sound_play("collision", {
+	                        object = self.object,
+	                        max_hear_distance = 5,
+	                        gain = 1.0,
+                            fade = 0.0,
+                            pitch = 1.0,
+                        })
+				    end
+			    end
+            end
+
+            if self.hp <= 0 then
+                vespa.destroy(self)
+            end
+
+        end
+        
+	end,
+
+	on_rightclick = function(self, clicker)
+		if not clicker or not clicker:is_player() then
+			return
+		end
+
+		local name = clicker:get_player_name()
+        --[[if self.owner and self.owner ~= name and self.owner ~= "" then return end]]--
+        if self.owner == "" then
+            self.owner = name
+        end
+
+		if name == self.driver_name then
+            vespa.driver_formspec(name)
+		else
+            if name == self.owner then
+                if clicker:get_player_control().aux1 == true then
+                    automobiles_lib.show_vehicle_trunk_formspec(self, clicker, vespa.trunk_slots)
+                else
+                    --is the owner, okay, lets attach
+                    vespa.attach_driver_stand(self, clicker)
+                    -- sound
+                    self.sound_handle = minetest.sound_play({name = "vespa_engine"},
+                            {object = self.object, gain = 0.3, pitch = 0.7, max_hear_distance = 30, loop = true,})
+                end
+            else
+                --minetest.chat_send_all("clicou")
+                --a passenger
+                if self._passenger == nil then
+                    --there is no passenger, so lets attach
+                    if self.driver_name then
+                        vespa.attach_pax_stand(self, clicker)
+                    end
+                else
+                    --there is a passeger
+                    if self._passenger == name then
+                        --if you are the psenger, so deattach
+                        vespa.dettach_pax_stand(self, clicker)
+                    end
+                end
+            end
+		end
+	end,
+})
+
+

automobiles_vespa/vespa_forms.lua

@@ -0,0 +1,64 @@
+
+--------------
+-- Manual --
+--------------
+
+function vespa.getCarFromPlayer(player)
+    local seat = player:get_attach()
+    if seat then
+        local car = seat:get_attach()
+        return car
+    end
+    return nil
+end
+
+function vespa.driver_formspec(name)
+    local player = minetest.get_player_by_name(name)
+    local vehicle_obj = vespa.getCarFromPlayer(player)
+    if vehicle_obj == nil then
+        return
+    end
+    local ent = vehicle_obj:get_luaentity()
+
+    local basic_form = table.concat({
+        "formspec_version[3]",
+        "size[6,6]",
+	}, "")
+
+    local yaw = "false"
+    if ent._yaw_by_mouse then yaw = "true" end
+
+	basic_form = basic_form.."button[1,1.0;4,1;go_out;Go Offboard]"
+    basic_form = basic_form.."checkbox[1,3.0;yaw;Direction by mouse;"..yaw.."]"
+
+    minetest.show_formspec(name, "vespa:driver_main", basic_form)
+end
+
+minetest.register_on_player_receive_fields(function(player, formname, fields)
+	if formname == "vespa:driver_main" then
+        local name = player:get_player_name()
+        local car_obj = vespa.getCarFromPlayer(player)
+        if car_obj then
+            local ent = car_obj:get_luaentity()
+            if ent then
+		        if fields.go_out then
+
+                    if ent._passenger then --any pax?
+                        local pax_obj = minetest.get_player_by_name(ent._passenger)
+                        vespa.dettach_pax_stand(ent, pax_obj)
+                    end
+
+                    vespa.dettach_driver_stand(ent, player)
+		        end
+                if fields.yaw then
+                    if ent._yaw_by_mouse == true then
+                        ent._yaw_by_mouse = false
+                    else
+                        ent._yaw_by_mouse = true
+                    end
+                end
+            end
+        end
+        minetest.close_formspec(name, "vespa:driver_main")
+    end
+end)

automobiles_vespa/vespa_player.lua

@@ -0,0 +1,184 @@
+minetest.register_entity('automobiles_vespa:player_mesh',{
+initial_properties = {
+	    physical = false,
+	    collide_with_objects=false,
+	    pointable=false,
+	    visual = "mesh",
+	    mesh = "character.b3d",
+	    textures = {"character.png"},
+        is_visible = false,
+	},
+	
+    on_activate = function(self,std)
+	    self.sdata = minetest.deserialize(std) or {}
+	    if self.sdata.remove then self.object:remove() end
+    end,
+	    
+    get_staticdata=function(self)
+      self.sdata.remove=true
+      return minetest.serialize(self.sdata)
+    end,
+	
+})
+
+-- attach player
+function vespa.attach_driver_stand(self, player)
+    local name = player:get_player_name()
+    self.driver_name = name
+    self.driver_properties = player:get_properties()
+    self.driver_properties.selectionbox = nil
+    self.driver_properties.pointable = false
+    self.driver_properties.show_on_minimap = false
+    self.driver_properties.static_save = nil
+    self.driver_properties.makes_footstep_sound = nil
+    --minetest.chat_send_all(dump(self.driver_properties))
+   
+    -- attach the driver
+    player:set_attach(self.driver_seat, "", {x = 0, y = 0, z = 0}, {x = 0, y = 0, z = 0})
+    player:set_eye_offset({x = 0, y = 0, z = 1.5}, {x = 0, y = 3, z = -30})
+    player_api.player_attached[name] = true
+
+    -- makes it "invisible"
+    player:set_properties({mesh = "automobiles_pivot_mesh.b3d"})
+    
+
+    --create the dummy mesh
+    local pos = player:get_pos()
+    local driver_mesh=minetest.add_entity(pos,'automobiles_vespa:player_mesh')
+    driver_mesh:set_attach(player,'',{x=0.0,y=-0.0,z=0.0},{x=0,y=0,z=0})
+    self.driver_mesh = driver_mesh
+    self.driver_mesh:set_properties({is_visible=false})
+
+    --position the dummy arms and legs
+    self.driver_mesh:set_properties(self.driver_properties)
+    self.driver_mesh:set_bone_position("Leg_Left", {x=1.1, y=1, z=0}, {x=12, y=0, z=7})
+    self.driver_mesh:set_bone_position("Leg_Right", {x=-1.1, y=1, z=0}, {x=12, y=0, z=-7})
+	self.driver_mesh:set_properties({
+        is_visible=true,
+	})
+
+    --[[player:set_bone_position("Leg_Left", {x=1.1, y=0, z=0}, {x=180+12, y=0, z=10})
+    player:set_bone_position("Leg_Right", {x=-1.1, y=0, z=0}, {x=180+12, y=0, z=-10})
+    player:set_bone_position("Arm_Left", {x=3.0, y=5, z=-1}, {x=180+70, y=0, z=0})
+    player:set_bone_position("Arm_Right", {x=-3.0, y=5, z=-1}, {x=180+70, y=0, z=0})]]--
+end
+
+function vespa.dettach_driver_stand(self, player)
+    local name = self.driver_name
+
+    --self._engine_running = false
+
+    -- driver clicked the object => driver gets off the vehicle
+    self.driver_name = nil
+
+    if self._engine_running then
+	    self._engine_running = false
+    end
+    -- sound and animation
+    if self.sound_handle then
+        minetest.sound_stop(self.sound_handle)
+        self.sound_handle = nil
+    end
+
+    -- detach the player
+    if player then
+        --automobiles_lib.remove_hud(player)
+
+        player:set_detach()
+        if player_api.player_attached[name] then
+            player_api.player_attached[name] = nil
+        end
+        player:set_eye_offset({x=0,y=0,z=0},{x=0,y=0,z=0})
+        player_api.set_animation(player, "stand")
+
+        if self.driver_properties then
+            player:set_properties({mesh = self.driver_properties.mesh})
+            self.driver_properties = nil
+        end
+
+        --player:set_properties({visual_size = {x=1, y=1}})
+        if self.driver_mesh then
+            self.driver_mesh:set_properties({is_visible=false})
+            self.driver_mesh:remove()
+        end
+    end
+    self.driver = nil
+end
+
+-- attach passenger
+function vespa.attach_pax_stand(self, player)
+    local onside = onside or false
+    local name = player:get_player_name()
+
+    self.pax_properties = player:get_properties()
+    self.pax_properties.selectionbox = nil
+    self.pax_properties.pointable = false
+    self.pax_properties.show_on_minimap = false
+    self.pax_properties.static_save = nil
+    self.pax_properties.makes_footstep_sound = nil
+
+    if self._passenger == nil then
+        self._passenger = name
+
+        -- attach the driver
+        player:set_attach(self.passenger_seat, "", {x = 0, y = 0, z = 0}, {x = 0, y = 0, z = 0})
+        player:set_eye_offset({x = 0, y = 3, z = 0}, {x = 0, y = 3, z = -30})
+        player_api.player_attached[name] = true
+
+        -- makes it "invisible"
+        player:set_properties({mesh = "automobiles_pivot_mesh.b3d"})
+
+        --create the dummy mesh
+        local pos = player:get_pos()
+        local pax_mesh=minetest.add_entity(pos,'automobiles_vespa:player_mesh')
+        pax_mesh:set_attach(player,'',{x=0.0,y=-0.0,z=0.0},{x=0,y=0,z=0})
+        self.pax_mesh = pax_mesh
+        self.pax_mesh:set_properties({is_visible=false})
+
+        --position the dummy arms and legs
+        self.pax_mesh:set_properties(self.pax_properties)
+        self.pax_mesh:set_bone_position("Leg_Left", {x=1.1, y=0, z=0}, {x=12, y=0, z=15})
+        self.pax_mesh:set_bone_position("Leg_Right", {x=-1.1, y=0, z=0}, {x=12, y=0, z=-15})
+
+        self.pax_mesh:set_bone_position("Arm_Left", {x=3.0, y=5, z=0}, {x=45, y=0, z=0})
+        self.pax_mesh:set_bone_position("Arm_Right", {x=-3.0, y=5, z=0}, {x=45, y=0, z=0})
+
+	    self.pax_mesh:set_properties({
+            is_visible=true,
+	    })
+    end
+
+end
+
+function vespa.dettach_pax_stand(self, player)
+    if not player then return end
+    local name = player:get_player_name() --self._passenger
+
+    -- passenger clicked the object => driver gets off the vehicle
+    if self._passenger == name then
+        self._passenger = nil
+    end
+
+    -- detach the player
+    if player then
+        --player:set_properties({physical=true})
+        player:set_detach()
+        player_api.player_attached[name] = nil
+        player_api.set_animation(player, "stand")
+        player:set_eye_offset({x=0,y=0,z=0},{x=0,y=0,z=0})
+        --remove_physics_override(player, {speed=1,gravity=1,jump=1})
+
+        if self.pax_properties then
+            player:set_properties({mesh = self.pax_properties.mesh})
+            self.pax_properties = nil
+        end
+
+        --player:set_properties({visual_size = {x=1, y=1}})
+        if self.pax_mesh then
+            self.pax_mesh:set_properties({is_visible=false})
+            self.pax_mesh:remove()
+        end
+    end
+end
+
+

automobiles_vespa/vespa_utilities.lua

@@ -0,0 +1,66 @@
+--dofile(minetest.get_modpath("automobiles_vespa") .. DIR_DELIM .. "vespa_global_definitions.lua")
+--dofile(minetest.get_modpath("automobiles_vespa") .. DIR_DELIM .. "vespa_hud.lua")
+
+-- destroy the vespa
+function vespa.destroy(self, puncher)
+    automobiles_lib.remove_light(self)
+    if self.sound_handle then
+        minetest.sound_stop(self.sound_handle)
+        self.sound_handle = nil
+    end
+
+    if self.driver_name then
+        -- detach the driver first (puncher must be driver)
+        if puncher then
+            puncher:set_detach()
+            puncher:set_eye_offset({x = 0, y = 0, z = 0}, {x = 0, y = 0, z = 0})
+            if minetest.global_exists("player_api") then
+                player_api.player_attached[self.driver_name] = nil
+                -- player should stand again
+                player_api.set_animation(puncher, "stand")
+            end
+        end
+        self.driver_name = nil
+    end
+
+    local pos = self.object:get_pos()
+
+    if self.driver_seat then self.driver_seat:remove() end
+    if self.passenger_seat then self.passenger_seat:remove() end
+    if self.lights then self.lights:remove() end
+    if self.rlights then self.rlights:remove() end
+    if self.driver_mesh then self.driver_mesh:remove() end
+    if self.pax_mesh then self.pax_mesh:remove() end
+
+    automobiles_lib.destroy_inventory(self)
+    self.object:remove()
+
+    pos.y=pos.y+2
+
+    --minetest.add_item({x=pos.x+math.random()-0.5,y=pos.y,z=pos.z+math.random()-0.5},'automobiles_vespa:vespa')
+    minetest.add_item({x=pos.x+math.random()-0.5,y=pos.y,z=pos.z+math.random()-0.5},'automobiles_lib:engine')
+    minetest.add_item({x=pos.x+math.random()-0.5,y=pos.y,z=pos.z+math.random()-0.5},'automobiles_vespa:wheel')
+    minetest.add_item({x=pos.x+math.random()-0.5,y=pos.y,z=pos.z+math.random()-0.5},'automobiles_vespa:wheel')
+end
+
+function vespa.engine_set_sound_and_animation(self, _longit_speed)
+    --minetest.chat_send_all('test1 ' .. dump(self._engine_running) )
+    if self.sound_handle then
+        if (math.abs(self._longit_speed) > math.abs(_longit_speed) + 0.03) or (math.abs(self._longit_speed) + 0.03 < math.abs(_longit_speed)) then
+            --minetest.chat_send_all('test2')
+            vespa.engineSoundPlay(self)
+        end
+    end
+end
+
+function vespa.engineSoundPlay(self)
+    --sound
+    if self.sound_handle then minetest.sound_stop(self.sound_handle) end
+    if self.object then
+        self.sound_handle = minetest.sound_play({name = "vespa_engine"},
+            {object = self.object, gain = 0.3,
+                pitch = 0.7 + ((self._longit_speed/10)/2),
+                max_hear_distance = 30,
+                loop = true,})
+    end
+end