forked from mtcontrib/pipeworks
37eef73695
* add fs helper inv function * add fs helper prepends function * add trash can, vacuum tube, teleport tube. wielders, autocrafter, mesetube, injectors * fixed missed texture to make game agnostic * fix luacheck
340 lines
9.0 KiB
Lua
340 lines
9.0 KiB
Lua
----------------------
|
|
-- Vector functions --
|
|
----------------------
|
|
|
|
function pipeworks.vector_cross(a, b)
|
|
return {
|
|
x = a.y * b.z - a.z * b.y,
|
|
y = a.z * b.x - a.x * b.z,
|
|
z = a.x * b.y - a.y * b.x
|
|
}
|
|
end
|
|
|
|
function pipeworks.vector_dot(a, b)
|
|
return a.x * b.x + a.y * b.y + a.z * b.z
|
|
end
|
|
|
|
-----------------------
|
|
-- Facedir functions --
|
|
-----------------------
|
|
|
|
function pipeworks.facedir_to_top_dir(facedir)
|
|
return ({[0] = {x = 0, y = 1, z = 0},
|
|
{x = 0, y = 0, z = 1},
|
|
{x = 0, y = 0, z = -1},
|
|
{x = 1, y = 0, z = 0},
|
|
{x = -1, y = 0, z = 0},
|
|
{x = 0, y = -1, z = 0}})
|
|
[math.floor(facedir / 4)]
|
|
end
|
|
|
|
function pipeworks.facedir_to_right_dir(facedir)
|
|
return pipeworks.vector_cross(
|
|
pipeworks.facedir_to_top_dir(facedir),
|
|
minetest.facedir_to_dir(facedir)
|
|
)
|
|
end
|
|
|
|
local directions = {}
|
|
pipeworks.directions = directions
|
|
function directions.side_to_dir(side)
|
|
return ({[0] = vector.new(),
|
|
vector.new( 0, 1, 0),
|
|
vector.new( 0, -1, 0),
|
|
vector.new( 1, 0, 0),
|
|
vector.new(-1, 0, 0),
|
|
vector.new( 0, 0, 1),
|
|
vector.new( 0, 0, -1)
|
|
})[side]
|
|
end
|
|
|
|
function directions.dir_to_side(dir)
|
|
local c = pipeworks.vector_dot(dir, vector.new(1, 2, 3)) + 4
|
|
return ({6, 2, 4, 0, 3, 1, 5})[c]
|
|
end
|
|
|
|
----------------------
|
|
-- String functions --
|
|
----------------------
|
|
|
|
--[[function pipeworks.string_split(str, sep)
|
|
local fields = {}
|
|
local index = 1
|
|
local expr = "([^"..sep.."])+"
|
|
string.gsub(str, expr, function(substring)
|
|
fields[index] = substring
|
|
index = index + 1
|
|
end)
|
|
return fields
|
|
end]]
|
|
|
|
function pipeworks.string_startswith(str, substr)
|
|
return str:sub(1, substr:len()) == substr
|
|
end
|
|
|
|
---------------------
|
|
-- Table functions --
|
|
---------------------
|
|
|
|
function pipeworks.table_contains(tbl, element)
|
|
for _, elt in pairs(tbl) do
|
|
if elt == element then
|
|
return true
|
|
end
|
|
end
|
|
return false
|
|
end
|
|
|
|
function pipeworks.table_extend(tbl, tbl2)
|
|
local oldlength = #tbl
|
|
for i = 1,#tbl2 do
|
|
tbl[oldlength + i] = tbl2[i]
|
|
end
|
|
end
|
|
|
|
function pipeworks.table_recursive_replace(tbl, pattern, replace_with)
|
|
if type(tbl) == "table" then
|
|
local tbl2 = {}
|
|
for key, value in pairs(tbl) do
|
|
tbl2[key] = pipeworks.table_recursive_replace(value, pattern, replace_with)
|
|
end
|
|
return tbl2
|
|
elseif type(tbl) == "string" then
|
|
return tbl:gsub(pattern, replace_with)
|
|
else
|
|
return tbl
|
|
end
|
|
end
|
|
|
|
------------------------
|
|
-- Formspec functions --
|
|
------------------------
|
|
|
|
local fs_helpers = {}
|
|
pipeworks.fs_helpers = fs_helpers
|
|
function fs_helpers.on_receive_fields(pos, fields)
|
|
local meta = minetest.get_meta(pos)
|
|
for field in pairs(fields) do
|
|
if pipeworks.string_startswith(field, "fs_helpers_cycling:") then
|
|
local l = field:split(":")
|
|
local new_value = tonumber(l[2])
|
|
local meta_name = l[3]
|
|
meta:set_int(meta_name, new_value)
|
|
end
|
|
end
|
|
end
|
|
|
|
function fs_helpers.cycling_button(meta, base, meta_name, values)
|
|
local current_value = meta:get_int(meta_name)
|
|
local new_value = (current_value + 1) % (#values)
|
|
local val = values[current_value + 1]
|
|
local text
|
|
local texture_name = nil
|
|
local addopts = nil
|
|
--when we get a table, we know the caller wants an image_button
|
|
if type(val) == "table" then
|
|
text = val["text"]
|
|
texture_name = val["texture"]
|
|
addopts = val["addopts"]
|
|
else
|
|
text = val
|
|
end
|
|
local field = "fs_helpers_cycling:"..new_value..":"..meta_name
|
|
return base..";"..(texture_name and texture_name..";" or "")..field..";"..minetest.formspec_escape(text)..(addopts and ";"..addopts or "").."]"
|
|
end
|
|
|
|
function fs_helpers.get_inv(y)
|
|
local fs = {}
|
|
if minetest.get_modpath("i3") then
|
|
local inv_x = i3.settings.legacy_inventory and 0.75 or 0.22
|
|
local inv_y = (y + 0.4) or 6.9
|
|
local size, spacing = 1, 0.1
|
|
local hotbar_len = i3.settings.hotbar_len
|
|
|
|
table.insert(fs, "style_type[box;colors=#77777710,#77777710,#777,#777]")
|
|
|
|
for i = 0, hotbar_len - 1 do
|
|
table.insert(fs, "box["..(i * size + inv_x + (i * spacing))..","..inv_y..";"..size..","..size..";]")
|
|
end
|
|
|
|
table.insert(fs, "style_type[list;size="..size..";spacing="..spacing.."]")
|
|
table.insert(fs, "list[current_player;main;"..inv_x..","..inv_y..";"..hotbar_len..",1;]")
|
|
|
|
table.insert(fs, "style_type[box;colors=#666]")
|
|
for i=0, 2 do
|
|
for j=0, (i3.settings.legacy_inventory and 7 or 8) do
|
|
table.insert(fs, "box["..0.2+(j*0.1)+(j*size)..","..(inv_y+size+spacing+0.05)+(i*0.1)+(i*size)..";"..size..","..size..";]")
|
|
end
|
|
end
|
|
|
|
table.insert(fs, "style_type[list;size="..size..";spacing="..spacing.."]")
|
|
table.insert(fs, "list[current_player;main;"..inv_x..","..(inv_y + 1.15)..";"..hotbar_len..","..(i3.settings.inv_size / hotbar_len)..";"..hotbar_len.."]")
|
|
else
|
|
table.insert(fs, "list[current_player;main;0.22,"..y..";8,4;]")
|
|
end
|
|
|
|
return table.concat(fs, "")
|
|
end
|
|
|
|
function fs_helpers.get_prepends(size)
|
|
local prepend = {}
|
|
|
|
if minetest.get_modpath("i3") then
|
|
prepend = {
|
|
"no_prepend[]",
|
|
"bgcolor[black;neither]",
|
|
"background9[0,0;"..size..";i3_bg_full.png;false;10]",
|
|
"style_type[button;border=false;bgimg=[combine:16x16^[noalpha^[colorize:#6b6b6b]",
|
|
"listcolors[#0000;#ffffff20]"
|
|
}
|
|
end
|
|
|
|
return table.concat(prepend, "")
|
|
end
|
|
|
|
---------
|
|
-- Env --
|
|
---------
|
|
|
|
function pipeworks.load_position(pos)
|
|
if pos.x < -30912 or pos.y < -30912 or pos.z < -30912 or
|
|
pos.x > 30927 or pos.y > 30927 or pos.z > 30927 then return end
|
|
if minetest.get_node_or_nil(pos) then
|
|
return
|
|
end
|
|
local vm = minetest.get_voxel_manip()
|
|
vm:read_from_map(pos, pos)
|
|
end
|
|
|
|
local function delay(...)
|
|
local args = {...}
|
|
return (function() return unpack(args) end)
|
|
end
|
|
|
|
local function get_set_wrap(name, is_dynamic)
|
|
return (function(self)
|
|
return self["_" .. name]
|
|
end), (function(self, value)
|
|
if is_dynamic then
|
|
self["_" .. name] = type(value) == "table"
|
|
and table.copy(value) or value
|
|
end
|
|
end)
|
|
end
|
|
|
|
function pipeworks.create_fake_player(def, is_dynamic)
|
|
local wielded_item = ItemStack("")
|
|
if def.inventory and def.wield_list then
|
|
wielded_item = def.inventory:get_stack(def.wield_list, def.wield_index or 1)
|
|
end
|
|
local p = {
|
|
get_player_name = delay(def.name),
|
|
is_player = delay(true),
|
|
is_fake_player = true,
|
|
|
|
_formspec = def.formspec or "",
|
|
_hp = def.hp or 20,
|
|
_breath = 11,
|
|
_pos = def.position and table.copy(def.position) or vector.new(),
|
|
_properties = def.properties or { eye_height = def.eye_height or 1.47 },
|
|
_inventory = def.inventory,
|
|
_wield_index = def.wield_index or 1,
|
|
_wielded_item = wielded_item,
|
|
|
|
-- Model and view
|
|
_eye_offset1 = vector.new(),
|
|
_eye_offset3 = vector.new(),
|
|
set_eye_offset = function(self, first, third)
|
|
self._eye_offset1 = table.copy(first)
|
|
self._eye_offset3 = table.copy(third)
|
|
end,
|
|
get_eye_offset = function(self)
|
|
return self._eye_offset1, self._eye_offset3
|
|
end,
|
|
get_look_dir = delay(def.look_dir or {x=0, y=0, z=1}),
|
|
get_look_pitch = delay(def.look_pitch or 0),
|
|
get_look_yaw = delay(def.look_yaw or 0),
|
|
get_look_horizontal = delay(def.look_yaw or 0),
|
|
get_look_vertical = delay(-(def.look_pitch or 0)),
|
|
set_animation = delay(),
|
|
|
|
-- Controls
|
|
get_player_control = delay({
|
|
jump=false, right=false, left=false, LMB=false, RMB=false,
|
|
sneak=def.sneak, aux1=false, down=false, up=false
|
|
}),
|
|
get_player_control_bits = delay(def.sneak and 64 or 0),
|
|
|
|
-- Inventory and ItemStacks
|
|
get_inventory = delay(def.inventory),
|
|
set_wielded_item = function(self, item)
|
|
if self._inventory and def.wield_list then
|
|
return self._inventory:set_stack(def.wield_list,
|
|
self._wield_index, item)
|
|
end
|
|
self._wielded_item = ItemStack(item)
|
|
end,
|
|
get_wielded_item = function(self, item)
|
|
if self._inventory and def.wield_list then
|
|
return self._inventory:get_stack(def.wield_list,
|
|
self._wield_index)
|
|
end
|
|
return ItemStack(self._wielded_item)
|
|
end,
|
|
get_wield_list = delay(def.wield_list),
|
|
|
|
punch = delay(),
|
|
remove = delay(),
|
|
right_click = delay(),
|
|
set_attach = delay(),
|
|
set_detach = delay(),
|
|
set_bone_position = delay(),
|
|
hud_change = delay(),
|
|
}
|
|
-- Getter & setter functions
|
|
p.get_inventory_formspec, p.set_inventory_formspec
|
|
= get_set_wrap("formspec", is_dynamic)
|
|
p.get_breath, p.set_breath = get_set_wrap("breath", is_dynamic)
|
|
p.get_hp, p.set_hp = get_set_wrap("hp", is_dynamic)
|
|
p.get_pos, p.set_pos = get_set_wrap("pos", is_dynamic)
|
|
p.get_wield_index, p.set_wield_index = get_set_wrap("wield_index", true)
|
|
p.get_properties, p.set_properties = get_set_wrap("properties", false)
|
|
|
|
-- For players, move_to and get_pos do the same
|
|
p.move_to = p.get_pos
|
|
|
|
-- Backwards compatibilty
|
|
p.getpos = p.get_pos
|
|
p.setpos = p.set_pos
|
|
p.moveto = p.move_to
|
|
|
|
-- TODO "implement" all these
|
|
-- set_armor_groups
|
|
-- get_armor_groups
|
|
-- get_animation
|
|
-- get_bone_position
|
|
-- get_player_velocity
|
|
-- set_look_pitch
|
|
-- set_look_yaw
|
|
-- set_physics_override
|
|
-- get_physics_override
|
|
-- hud_add
|
|
-- hud_remove
|
|
-- hud_get
|
|
-- hud_set_flags
|
|
-- hud_get_flags
|
|
-- hud_set_hotbar_itemcount
|
|
-- hud_get_hotbar_itemcount
|
|
-- hud_set_hotbar_image
|
|
-- hud_get_hotbar_image
|
|
-- hud_set_hotbar_selected_image
|
|
-- hud_get_hotbar_selected_image
|
|
-- hud_replace_builtin
|
|
-- set_sky
|
|
-- get_sky
|
|
-- override_day_night_ratio
|
|
-- get_day_night_ratio
|
|
-- set_local_animation
|
|
return p
|
|
end
|