595 lines
17 KiB
Lua
595 lines
17 KiB
Lua
mcl_minecarts = {}
|
|
mcl_minecarts.modpath = minetest.get_modpath("mcl_minecarts")
|
|
mcl_minecarts.speed_max = 10
|
|
|
|
dofile(mcl_minecarts.modpath.."/functions.lua")
|
|
dofile(mcl_minecarts.modpath.."/rails.lua")
|
|
|
|
-- Table for item-to-entity mapping. Keys: itemstring, Values: Corresponding entity ID
|
|
local entity_mapping = {}
|
|
|
|
local function register_entity(entity_id, mesh, textures, drop, on_rightclick)
|
|
local cart = {
|
|
physical = false,
|
|
collisionbox = {-10/16., -0.5, -10/16, 10/16, 0.25, 10/16},
|
|
visual = "mesh",
|
|
mesh = mesh,
|
|
visual_size = {x=1, y=1},
|
|
textures = textures,
|
|
|
|
on_rightclick = on_rightclick,
|
|
|
|
_driver = nil, -- player who sits in and controls the minecart (only for minecart!)
|
|
_punched = false, -- used to re-send _velocity and position
|
|
_velocity = {x=0, y=0, z=0}, -- only used on punch
|
|
_start_pos = nil, -- Used to calculate distance for “On A Rail” achievement
|
|
_old_dir = {x=0, y=0, z=0},
|
|
_old_pos = nil,
|
|
_old_vel = {x=0, y=0, z=0},
|
|
_old_switch = 0,
|
|
_railtype = nil,
|
|
}
|
|
|
|
function cart:on_activate(staticdata, dtime_s)
|
|
self.object:set_armor_groups({immortal=1})
|
|
end
|
|
|
|
function cart:on_punch(puncher, time_from_last_punch, tool_capabilities, direction)
|
|
local pos = self.object:getpos()
|
|
if not self._railtype then
|
|
local node = minetest.get_node(vector.floor(pos)).name
|
|
self._railtype = minetest.get_item_group(node, "connect_to_raillike")
|
|
end
|
|
|
|
if not puncher or not puncher:is_player() then
|
|
local cart_dir = mcl_minecarts:get_rail_direction(pos, {x=1, y=0, z=0}, nil, nil, self._railtype)
|
|
if vector.equals(cart_dir, {x=0, y=0, z=0}) then
|
|
return
|
|
end
|
|
self._velocity = vector.multiply(cart_dir, 3)
|
|
self._old_pos = nil
|
|
self._punched = true
|
|
return
|
|
end
|
|
|
|
if puncher:get_player_control().sneak then
|
|
if self._driver then
|
|
if self._old_pos then
|
|
self.object:setpos(self._old_pos)
|
|
end
|
|
mcl_player.player_attached[self._driver] = nil
|
|
local player = minetest.get_player_by_name(self._driver)
|
|
if player then
|
|
player:set_detach()
|
|
end
|
|
end
|
|
|
|
-- Disable detector rail
|
|
local rou_pos = vector.round(pos)
|
|
local node = minetest.get_node(rou_pos)
|
|
if node.name == "mcl_minecarts:detector_rail_on" then
|
|
local newnode = {name="mcl_minecarts:detector_rail", param2 = node.param2}
|
|
minetest.swap_node(rou_pos, newnode)
|
|
mesecon.receptor_off(rou_pos)
|
|
end
|
|
|
|
-- Drop items and remove cart entity
|
|
if not minetest.settings:get_bool("creative_mode") then
|
|
for d=1, #drop do
|
|
minetest.add_item(self.object:getpos(), drop[d])
|
|
end
|
|
end
|
|
|
|
self.object:remove()
|
|
return
|
|
end
|
|
|
|
local vel = self.object:getvelocity()
|
|
if puncher:get_player_name() == self._driver then
|
|
if math.abs(vel.x + vel.z) > 7 then
|
|
return
|
|
end
|
|
end
|
|
|
|
local punch_dir = mcl_minecarts:velocity_to_dir(puncher:get_look_dir())
|
|
punch_dir.y = 0
|
|
local cart_dir = mcl_minecarts:get_rail_direction(pos, punch_dir, nil, nil, self._railtype)
|
|
if vector.equals(cart_dir, {x=0, y=0, z=0}) then
|
|
return
|
|
end
|
|
|
|
time_from_last_punch = math.min(time_from_last_punch, tool_capabilities.full_punch_interval)
|
|
local f = 3 * (time_from_last_punch / tool_capabilities.full_punch_interval)
|
|
|
|
self._velocity = vector.multiply(cart_dir, f)
|
|
self._old_pos = nil
|
|
self._punched = true
|
|
end
|
|
|
|
function cart:on_step(dtime)
|
|
local vel = self.object:getvelocity()
|
|
local update = {}
|
|
if self._punched then
|
|
vel = vector.add(vel, self._velocity)
|
|
self.object:setvelocity(vel)
|
|
self._old_dir.y = 0
|
|
elseif vector.equals(vel, {x=0, y=0, z=0}) then
|
|
return
|
|
end
|
|
|
|
local dir, last_switch = nil, nil
|
|
local pos = self.object:getpos()
|
|
if self._old_pos and not self._punched then
|
|
local flo_pos = vector.floor(pos)
|
|
local flo_old = vector.floor(self._old_pos)
|
|
if vector.equals(flo_pos, flo_old) then
|
|
return
|
|
-- Prevent querying the same node over and over again
|
|
end
|
|
|
|
-- Update detector rails
|
|
local rou_pos = vector.round(pos)
|
|
local rou_old = vector.round(self._old_pos)
|
|
local node = minetest.get_node(rou_pos)
|
|
local node_old = minetest.get_node(rou_old)
|
|
|
|
if node.name == "mcl_minecarts:detector_rail" then
|
|
local newnode = {name="mcl_minecarts:detector_rail_on", param2 = node.param2}
|
|
minetest.swap_node(rou_pos, newnode)
|
|
mesecon.receptor_on(rou_pos)
|
|
end
|
|
if node_old.name == "mcl_minecarts:detector_rail_on" then
|
|
local newnode = {name="mcl_minecarts:detector_rail", param2 = node_old.param2}
|
|
minetest.swap_node(rou_old, newnode)
|
|
mesecon.receptor_off(rou_old)
|
|
end
|
|
end
|
|
|
|
local ctrl, player = nil, nil
|
|
if self._driver then
|
|
player = minetest.get_player_by_name(self._driver)
|
|
if player then
|
|
ctrl = player:get_player_control()
|
|
end
|
|
end
|
|
|
|
-- Stop cart if velocity vector flips
|
|
if self._old_vel and self._old_vel.y == 0 and
|
|
(self._old_vel.x * vel.x < 0 or self._old_vel.z * vel.z < 0) then
|
|
self._old_vel = {x = 0, y = 0, z = 0}
|
|
self._old_pos = pos
|
|
self.object:setvelocity(vector.new())
|
|
self.object:setacceleration(vector.new())
|
|
return
|
|
end
|
|
self._old_vel = vector.new(vel)
|
|
|
|
if self._old_pos then
|
|
local diff = vector.subtract(self._old_pos, pos)
|
|
for _,v in ipairs({"x","y","z"}) do
|
|
if math.abs(diff[v]) > 1.1 then
|
|
local expected_pos = vector.add(self._old_pos, self._old_dir)
|
|
dir, last_switch = mcl_minecarts:get_rail_direction(pos, self._old_dir, ctrl, self._old_switch, self._railtype)
|
|
if vector.equals(dir, {x=0, y=0, z=0}) then
|
|
dir = false
|
|
pos = vector.new(expected_pos)
|
|
update.pos = true
|
|
end
|
|
break
|
|
end
|
|
end
|
|
end
|
|
|
|
if vel.y == 0 then
|
|
for _,v in ipairs({"x", "z"}) do
|
|
if vel[v] ~= 0 and math.abs(vel[v]) < 0.9 then
|
|
vel[v] = 0
|
|
update.vel = true
|
|
end
|
|
end
|
|
end
|
|
|
|
local cart_dir = mcl_minecarts:velocity_to_dir(vel)
|
|
local max_vel = mcl_minecarts.speed_max
|
|
if not dir then
|
|
dir, last_switch = mcl_minecarts:get_rail_direction(pos, cart_dir, ctrl, self._old_switch, self._railtype)
|
|
end
|
|
|
|
local new_acc = {x=0, y=0, z=0}
|
|
if vector.equals(dir, {x=0, y=0, z=0}) then
|
|
vel = {x=0, y=0, z=0}
|
|
update.vel = true
|
|
else
|
|
-- If the direction changed
|
|
if dir.x ~= 0 and self._old_dir.z ~= 0 then
|
|
vel.x = dir.x * math.abs(vel.z)
|
|
vel.z = 0
|
|
pos.z = math.floor(pos.z + 0.5)
|
|
update.pos = true
|
|
end
|
|
if dir.z ~= 0 and self._old_dir.x ~= 0 then
|
|
vel.z = dir.z * math.abs(vel.x)
|
|
vel.x = 0
|
|
pos.x = math.floor(pos.x + 0.5)
|
|
update.pos = true
|
|
end
|
|
-- Up, down?
|
|
if dir.y ~= self._old_dir.y then
|
|
vel.y = dir.y * math.abs(vel.x + vel.z)
|
|
pos = vector.round(pos)
|
|
update.pos = true
|
|
end
|
|
|
|
-- Slow down or speed up
|
|
local acc = dir.y * -1.8
|
|
|
|
local speed_mod = minetest.registered_nodes[minetest.get_node(pos).name]._rail_acceleration
|
|
if speed_mod and speed_mod ~= 0 then
|
|
acc = acc + speed_mod
|
|
else
|
|
acc = acc - 0.4
|
|
end
|
|
|
|
new_acc = vector.multiply(dir, acc)
|
|
end
|
|
|
|
self.object:setacceleration(new_acc)
|
|
self._old_pos = vector.new(pos)
|
|
self._old_dir = vector.new(dir)
|
|
self._old_switch = last_switch
|
|
|
|
-- Limits
|
|
for _,v in ipairs({"x","y","z"}) do
|
|
if math.abs(vel[v]) > max_vel then
|
|
vel[v] = mcl_minecarts:get_sign(vel[v]) * max_vel
|
|
new_acc[v] = 0
|
|
update.vel = true
|
|
end
|
|
end
|
|
|
|
-- Give achievement when player reached a distance of 1000 nodes from the start position
|
|
if self._driver and (vector.distance(self._start_pos, pos) >= 1000) then
|
|
awards.unlock(self._driver, "mcl:onARail")
|
|
end
|
|
|
|
|
|
if update.pos or self._punched then
|
|
local yaw = 0
|
|
if dir.x < 0 then
|
|
yaw = 0.5
|
|
elseif dir.x > 0 then
|
|
yaw = 1.5
|
|
elseif dir.z < 0 then
|
|
yaw = 1
|
|
end
|
|
self.object:setyaw(yaw * math.pi)
|
|
end
|
|
|
|
if self._punched then
|
|
self._punched = false
|
|
end
|
|
|
|
if not (update.vel or update.pos) then
|
|
return
|
|
end
|
|
|
|
|
|
local anim = {x=0, y=0}
|
|
if dir.y == -1 then
|
|
anim = {x=1, y=1}
|
|
elseif dir.y == 1 then
|
|
anim = {x=2, y=2}
|
|
end
|
|
self.object:set_animation(anim, 1, 0)
|
|
|
|
self.object:setvelocity(vel)
|
|
if update.pos then
|
|
self.object:setpos(pos)
|
|
end
|
|
update = nil
|
|
end
|
|
|
|
function cart:get_staticdata()
|
|
return ""
|
|
end
|
|
|
|
minetest.register_entity(entity_id, cart)
|
|
end
|
|
|
|
-- Place a minecart at pointed_thing
|
|
mcl_minecarts.place_minecart = function(itemstack, pointed_thing)
|
|
if not pointed_thing.type == "node" then
|
|
return
|
|
end
|
|
|
|
local railpos, node
|
|
if mcl_minecarts:is_rail(pointed_thing.under) then
|
|
railpos = pointed_thing.under
|
|
node = minetest.get_node(pointed_thing.under)
|
|
elseif mcl_minecarts:is_rail(pointed_thing.above) then
|
|
railpos = pointed_thing.above
|
|
node = minetest.get_node(pointed_thing.above)
|
|
else
|
|
return
|
|
end
|
|
|
|
-- Activate detector rail
|
|
if node.name == "mcl_minecarts:detector_rail" then
|
|
local newnode = {name="mcl_minecarts:detector_rail_on", param2 = node.param2}
|
|
minetest.swap_node(railpos, newnode)
|
|
mesecon.receptor_on(railpos)
|
|
end
|
|
|
|
local entity_id = entity_mapping[itemstack:get_name()]
|
|
local cart = minetest.add_entity(railpos, entity_id)
|
|
local railtype = minetest.get_item_group(node.name, "connect_to_raillike")
|
|
local cart_dir = mcl_minecarts:get_rail_direction(railpos, {x=1, y=0, z=0}, nil, nil, railtype)
|
|
cart:setyaw(minetest.dir_to_yaw(cart_dir))
|
|
|
|
if not minetest.settings:get_bool("creative_mode") then
|
|
itemstack:take_item()
|
|
end
|
|
return itemstack
|
|
end
|
|
|
|
|
|
local register_craftitem = function(itemstring, entity_id, description, longdesc, usagehelp, icon, creative)
|
|
entity_mapping[itemstring] = entity_id
|
|
|
|
local groups = { minecart = 1, transport = 1 }
|
|
if creative == false then
|
|
groups.not_in_creative_inventory = 1
|
|
end
|
|
local def = {
|
|
stack_max = 1,
|
|
on_place = function(itemstack, placer, pointed_thing)
|
|
if not pointed_thing.type == "node" then
|
|
return
|
|
end
|
|
|
|
-- Call on_rightclick if the pointed node defines it
|
|
local node = minetest.get_node(pointed_thing.under)
|
|
if placer and not placer:get_player_control().sneak then
|
|
if minetest.registered_nodes[node.name] and minetest.registered_nodes[node.name].on_rightclick then
|
|
return minetest.registered_nodes[node.name].on_rightclick(pointed_thing.under, node, placer, itemstack) or itemstack
|
|
end
|
|
end
|
|
|
|
return mcl_minecarts.place_minecart(itemstack, pointed_thing)
|
|
end,
|
|
_on_dispense = function(stack, pos, droppos, dropnode, dropdir)
|
|
-- Place minecart as entity on rail. If there's no rail, just drop it.
|
|
local placed
|
|
if minetest.get_item_group(dropnode.name, "rail") ~= 0 then
|
|
-- FIXME: This places minecarts even if the spot is already occupied
|
|
local pointed_thing = { under = droppos, above = { x=droppos.x, y=droppos.y+1, z=droppos.z } }
|
|
placed = mcl_minecarts.place_minecart(stack, pointed_thing)
|
|
end
|
|
if placed == nil then
|
|
-- Drop item
|
|
minetest.add_item(droppos, stack)
|
|
end
|
|
end,
|
|
groups = groups,
|
|
}
|
|
def.description = description
|
|
def._doc_items_longdesc = longdesc
|
|
def._doc_items_usagehelp = usagehelp
|
|
def.inventory_image = icon
|
|
def.wield_image = icon
|
|
minetest.register_craftitem(itemstring, def)
|
|
end
|
|
|
|
--[[
|
|
Register a minecart
|
|
* itemstring: Itemstring of minecart item
|
|
* entity_id: ID of minecart entity
|
|
* description: Item name / description
|
|
* longdesc: Long help text
|
|
* usagehelp: Usage help text
|
|
* mesh: Minecart mesh
|
|
* textures: Minecart textures table
|
|
* icon: Item icon
|
|
* drop: Dropped items after destroying minecart
|
|
* on_rightclick: Called after rightclick
|
|
* on_activate_by_rail: Called when above activator rail
|
|
* creative: If false, don't show in Creative Inventory
|
|
]]
|
|
local function register_minecart(itemstring, entity_id, description, longdesc, usagehelp, mesh, textures, icon, drop, on_rightclick, on_activate_by_rail, creative)
|
|
register_entity(entity_id, mesh, textures, drop, on_rightclick)
|
|
register_craftitem(itemstring, entity_id, description, longdesc, usagehelp, icon, creative)
|
|
if minetest.get_modpath("doc_identifier") ~= nil then
|
|
doc.sub.identifier.register_object(entity_id, "craftitems", itemstring)
|
|
end
|
|
end
|
|
|
|
-- Minecart
|
|
register_minecart(
|
|
"mcl_minecarts:minecart",
|
|
"mcl_minecarts:minecart",
|
|
"Minecart",
|
|
"Minecarts can be used for a quick transportion on rails." .. "\n" ..
|
|
"Minecarts only ride on rails and always follow the tracks. At a T-junction with no straight way ahead, they turn left. The speed is affected by the rail type.",
|
|
"You can place the minecart on rails. Right-click it to enter it. Punch it to get it moving." .. "\n" ..
|
|
"To obtain the minecart, punch it while holding down the sneak key.",
|
|
"mcl_minecarts_minecart.b3d",
|
|
{"mcl_minecarts_minecart.png"},
|
|
"mcl_minecarts_minecart_normal.png",
|
|
{"mcl_minecarts:minecart"},
|
|
function(self, clicker)
|
|
if not clicker or not clicker:is_player() then
|
|
return
|
|
end
|
|
local player_name = clicker:get_player_name()
|
|
if self._driver and player_name == self._driver then
|
|
self._driver = nil
|
|
self._start_pos = nil
|
|
clicker:set_detach()
|
|
elseif not self._driver then
|
|
self._driver = player_name
|
|
self._start_pos = self.object:getpos()
|
|
mcl_player.player_attached[player_name] = true
|
|
clicker:set_attach(self.object, "", {x=0, y=3, z=0}, {x=0, y=0, z=0})
|
|
end
|
|
end
|
|
)
|
|
|
|
-- Minecart with Chest
|
|
register_minecart(
|
|
"mcl_minecarts:chest_minecart",
|
|
"mcl_minecarts:chest_minecart",
|
|
"Minecart with Chest",
|
|
nil, nil,
|
|
"mcl_minecarts_minecart_chest.b3d",
|
|
{ "mcl_chests_normal.png", "mcl_minecarts_minecart.png" },
|
|
"mcl_minecarts_minecart_chest.png",
|
|
{"mcl_minecarts:minecart", "mcl_chests:chest"},
|
|
nil, nil, false)
|
|
|
|
-- Minecart with Furnace
|
|
register_minecart(
|
|
"mcl_minecarts:furnace_minecart",
|
|
"mcl_minecarts:furnace_minecart",
|
|
"Minecart with Furnace",
|
|
nil, nil,
|
|
"mcl_minecarts_minecart_block.b3d",
|
|
{
|
|
"default_furnace_top.png",
|
|
"default_furnace_top.png",
|
|
"default_furnace_front.png",
|
|
"default_furnace_side.png",
|
|
"default_furnace_side.png",
|
|
"default_furnace_side.png",
|
|
"mcl_minecarts_minecart.png",
|
|
},
|
|
"mcl_minecarts_minecart_furnace.png",
|
|
{"mcl_minecarts:minecart", "mcl_furnaces:furnace"},
|
|
-- Feed furnace with coal
|
|
function(self, clicker)
|
|
if not clicker or not clicker:is_player() then
|
|
return
|
|
end
|
|
if not self._fueltime then
|
|
self._fueltime = 0
|
|
end
|
|
local held = clicker:get_wielded_item()
|
|
if minetest.get_item_group(held:get_name(), "coal") == 1 then
|
|
self._fueltime = self._fueltime + 180
|
|
|
|
if not minetest.settings:get_bool("creative_mode") then
|
|
held:take_item()
|
|
local index = clicker:get_wielded_index()
|
|
local inv = clicker:get_inventory()
|
|
inv:set_stack("main", index, held)
|
|
end
|
|
|
|
-- DEBUG
|
|
minetest.chat_send_player(clicker:get_player_name(), "Fuel: " .. tostring(self._fueltime))
|
|
end
|
|
end, nil, false
|
|
)
|
|
|
|
-- Minecart with Command Block
|
|
register_minecart(
|
|
"mcl_minecarts:command_block_minecart",
|
|
"mcl_minecarts:command_block_minecart",
|
|
"Minecart with Command Block",
|
|
nil, nil,
|
|
"mcl_minecarts_minecart_block.b3d",
|
|
{
|
|
"jeija_commandblock_off.png^[verticalframe:2:0",
|
|
"jeija_commandblock_off.png^[verticalframe:2:0",
|
|
"jeija_commandblock_off.png^[verticalframe:2:0",
|
|
"jeija_commandblock_off.png^[verticalframe:2:0",
|
|
"jeija_commandblock_off.png^[verticalframe:2:0",
|
|
"jeija_commandblock_off.png^[verticalframe:2:0",
|
|
"mcl_minecarts_minecart.png",
|
|
},
|
|
"mcl_minecarts_minecart_command_block.png",
|
|
{"mcl_minecarts:minecart"},
|
|
nil, nil, false
|
|
)
|
|
|
|
-- Minecart with Hopper
|
|
register_minecart(
|
|
"mcl_minecarts:hopper_minecart",
|
|
"mcl_minecarts:hopper_minecart",
|
|
"Minecart with Hopper",
|
|
nil, nil,
|
|
"mcl_minecarts_minecart_hopper.b3d",
|
|
{
|
|
"mcl_hoppers_hopper_inside.png",
|
|
"mcl_minecarts_minecart.png",
|
|
"mcl_hoppers_hopper_outside.png",
|
|
"mcl_hoppers_hopper_top.png",
|
|
},
|
|
"mcl_minecarts_minecart_hopper.png",
|
|
{"mcl_minecarts:minecart", "mcl_hoppers:hopper"},
|
|
nil, nil, false
|
|
)
|
|
|
|
-- Minecart with TNT
|
|
register_minecart(
|
|
"mcl_minecarts:tnt_minecart",
|
|
"mcl_minecarts:tnt_minecart",
|
|
"Minecart with TNT",
|
|
nil, nil,
|
|
"mcl_minecarts_minecart_block.b3d",
|
|
{
|
|
"default_tnt_top.png",
|
|
"default_tnt_bottom.png",
|
|
"default_tnt_side.png",
|
|
"default_tnt_side.png",
|
|
"default_tnt_side.png",
|
|
"default_tnt_side.png",
|
|
"mcl_minecarts_minecart.png",
|
|
},
|
|
"mcl_minecarts_minecart_tnt.png",
|
|
{"mcl_minecarts:minecart", "mcl_tnt:tnt"},
|
|
nil, nil, false
|
|
)
|
|
|
|
|
|
minetest.register_craft({
|
|
output = "mcl_minecarts:minecart",
|
|
recipe = {
|
|
{"mcl_core:iron_ingot", "", "mcl_core:iron_ingot"},
|
|
{"mcl_core:iron_ingot", "mcl_core:iron_ingot", "mcl_core:iron_ingot"},
|
|
},
|
|
})
|
|
|
|
-- TODO: Re-enable crafting of special minecarts when they have been implemented
|
|
if false then
|
|
minetest.register_craft({
|
|
output = "mcl_minecarts:hopper_minecart",
|
|
recipe = {
|
|
{"mcl_hoppers:hopper"},
|
|
{"mcl_minecarts:minecart"},
|
|
},
|
|
})
|
|
|
|
minetest.register_craft({
|
|
output = "mcl_minecarts:chest_minecart",
|
|
recipe = {
|
|
{"mcl_chests:chest"},
|
|
{"mcl_minecarts:minecart"},
|
|
},
|
|
})
|
|
|
|
minetest.register_craft({
|
|
output = "mcl_minecarts:tnt_minecart",
|
|
recipe = {
|
|
{"mcl_tnt:tnt"},
|
|
{"mcl_minecarts:minecart"},
|
|
},
|
|
})
|
|
|
|
minetest.register_craft({
|
|
output = "mcl_minecarts:furnace_minecart",
|
|
recipe = {
|
|
{"mcl_furnaces:furnace"},
|
|
{"mcl_minecarts:minecart"},
|
|
},
|
|
})
|
|
end
|