1
0
mirror of https://github.com/tacigar/maidroid.git synced 2024-11-06 02:00:32 +01:00
maidroid/maidroid_tool/core_writer.lua
2016-09-16 17:29:27 +09:00

374 lines
12 KiB
Lua

------------------------------------------------------------
-- Copyright (c) 2016 tacigar. All rights reserved.
-- https://github.com/tacigar/maidroid
------------------------------------------------------------
local dye_core_map = {
["dye:red"] = "maidroid_core:basic",
}
-- register a definition of a core writer.
;(function()
local node_box = {
type = "fixed",
fixed = {
{-0.4375, -0.25, -0.4375, 0.4375, 0.1875, 0.4375},
{ 0.1875, 0.3125, 0.0625, 0.4375, 0.375, 0.125},
{ -0.375, 0.1875, -0.375, 0.375, 0.25, 0.375},
{-0.0625, -0.5, -0.0625, 0.0625, 0.375, 0.0625},
{ 0.375, 0.1875, 0.0625, 0.4375, 0.375, 0.125},
{ -0.375, -0.5, -0.375, 0.375, -0.25, 0.375},
},
}
local selection_box = {
type = "fixed",
fixed = {
{-0.4375, -0.5, -0.4375, 0.4375, 0.25, 0.4375},
},
}
local formspec_inactive = "size[8,9]"
.. default.gui_bg
.. default.gui_bg_img
.. default.gui_slots
.. "label[3.75,0;Core]"
.. "list[current_name;core;3.5,0.5;1,1;]"
.. "label[2.75,2;Coal]"
.. "list[current_name;fuel;2.5,2.5;1,1;]"
.. "label[4.75,2;Dye]"
.. "list[current_name;dye;4.5,2.5;1,1;]"
.. "image[3.5,1.5;1,2;maidroid_tool_gui_arrow.png]"
.. "image[3.1,3.5;2,1;maidroid_tool_gui_meter.png^[transformR270]"
.. "list[current_player;main;0,5;8,1;]"
.. "list[current_player;main;0,6.2;8,3;8]"
local function generate_formspec_active(writing_time)
local arrow_percent = (100 / 40) * writing_time
local merter_percent = 0
if writing_time % 16 >= 8 then
meter_percent = (8 - (writing_time % 8)) * (100 / 8)
else
meter_percent = (writing_time % 8) * (100 / 8)
end
return "size[8,9]"
.. default.gui_bg
.. default.gui_bg_img
.. default.gui_slots
.. "label[3.75,0;Core]"
.. "list[current_name;core;3.5,0.5;1,1;]"
.. "label[2.75,2;Coal]"
.. "list[current_name;fuel;2.5,2.5;1,1;]"
.. "label[4.75,2;Dye]"
.. "list[current_name;dye;4.5,2.5;1,1;]"
.. "image[3.5,1.5;1,2;maidroid_tool_gui_arrow.png^[lowpart:"
.. arrow_percent
.. ":maidroid_tool_gui_arrow_filled.png]"
.. "image[3.1,3.5;2,1;maidroid_tool_gui_meter.png^[lowpart:"
.. meter_percent
.. ":maidroid_tool_gui_meter_filled.png^[transformR270]"
.. "list[current_player;main;0,5;8,1;]"
.. "list[current_player;main;0,6.2;8,3;8]"
end
-- get_nearest_core_entity returns the nearest core entity.
local function get_nearest_core_entity(pos)
local all_objects = minetest.get_objects_inside_radius(pos, 1.0)
for _, object in ipairs(all_objects) do
if object:get_luaentity().name == "maidroid_tool:core_entity" then
return object:get_luaentity()
end
end
return nil
end
-- can_dig is a common callback for the core writer.
local function can_dig(pos, player)
local meta = minetest.get_meta(pos)
local inventory = meta:get_inventory()
return (
inventory:is_empty("core") and
inventory:is_empty("fuel") and
inventory:is_empty("dye")
)
end
-- swap_node is a helper function that swap two nodes.
local function swap_node(pos, name)
local node = minetest.get_node(pos)
node.name = name
minetest.swap_node(pos, node)
end
-- on_timer is a common callback for the core writer.
local function on_timer(pos, elapsed)
local meta = minetest.get_meta(pos)
local inventory = meta:get_inventory()
local core_list = inventory:get_list("core")
local fuel_list = inventory:get_list("fuel")
local dye_list = inventory:get_list("dye")
local writing_time = meta:get_float("writing_time")
local writing_total_time = 40
local output_core = meta:get_string("output_core")
-- if writing time is positive, the core writer is active.
if writing_time >= 0 then
if writing_time <= writing_total_time then
meta:set_float("writing_time", writing_time + 1)
meta:set_string("formspec", generate_formspec_active(writing_time))
else -- else place output core to core list.
meta:set_float("writing_time", -1)
meta:set_string("output_core", "")
meta:set_string("formspec", formspec_inactive)
inventory:set_stack("core", 1, ItemStack(output_core))
swap_node(pos, "maidroid_tool:core_writer")
local core_entity = get_nearest_core_entity(pos)
core_entity:stop_rotate()
end
else -- else the core writer is inactive.
local core_name = core_list[1]:get_name()
if core_name == "maidroid_core:empty" and (not fuel_list[1]:is_empty()) and (not dye_list[1]:is_empty()) then
meta:set_float("writing_time", 0)
meta:set_string("output_core", dye_core_map[dye_list[1]:get_name()])
local fuel_stack = fuel_list[1]
fuel_stack:take_item()
inventory:set_stack("fuel", 1, fuel_stack)
local dye_stack = dye_list[1]
dye_stack:take_item()
inventory:set_stack("dye", 1, dye_stack)
swap_node(pos, "maidroid_tool:core_writer_active")
local core_entity = get_nearest_core_entity(pos)
core_entity:start_rotate()
end
end
return true
end
-- allow_metadata_inventory_put is a common callback for the core writer.
local function allow_metadata_inventory_put(pos, listname, index, stack, player)
local meta = minetest.get_meta(pos)
local inventory = meta:get_inventory()
local itemname = stack:get_name()
if (listname == "fuel" and itemname == "default:coal_lump") then
return stack:get_count()
elseif listname == "dye" and dye_core_map[itemname] ~= nil then
return stack:get_count()
elseif listname == "core" and maidroid.is_core(itemname) then
return stack:get_count()
end
return 0
end
-- allow_metadata_inventory_move is a common callback for the core writer.
local function allow_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
local meta = minetest.get_meta(pos)
local inventory = meta:get_inventory()
local stack = inventory:get_stack(from_list, from_index)
return allow_metadata_inventory_put(pos, listname, to_index, stack, player)
end
--------------------------------------------------------------------
;(function() -- register a definition of an inactive core writer.
local tiles = {
"maidroid_tool_core_writer_top.png",
"maidroid_tool_core_writer_bottom.png",
"maidroid_tool_core_writer_right.png",
"maidroid_tool_core_writer_right.png^[transformFX",
"maidroid_tool_core_writer_front.png^[transformFX",
"maidroid_tool_core_writer_front.png",
}
local function on_construct(pos)
local meta = minetest.get_meta(pos)
meta:set_string("formspec", formspec_inactive)
meta:set_string("output_core", "")
meta:set_float("writing_time", -1)
local inventory = meta:get_inventory()
inventory:set_size("core", 1)
inventory:set_size("fuel", 1)
inventory:set_size("dye", 1)
end
local function on_metadata_inventory_put(pos, listname, index, stack, player)
local timer = minetest.get_node_timer(pos)
timer:start(0.25)
local meta = minetest.get_meta(pos)
if listname == "core" then
local entity_position = {
x = pos.x, y = pos.y + 0.65, z = pos.z
}
minetest.add_entity(entity_position, "maidroid_tool:core_entity")
end
end
local function on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
local meta = minetest.get_meta(pos)
local inventory = meta:get_inventory()
local stack = inventory:get_stack(from_list, from_index)
on_metadata_inventory_put(pos, listname, to_index, stack, player)
end
local function on_metadata_inventory_take(pos, listname, index, stack, player)
if listname == "core" then
local core_entity = get_nearest_core_entity(pos)
core_entity.object:remove()
end
end
local function allow_metadata_inventory_take(pos, listname, index, stack, player)
return stack:get_count() -- maybe add more.
end
minetest.register_node("maidroid_tool:core_writer", {
description = "maidroid tool : core writer",
drawtype = "nodebox",
paramtype = "light",
paramtype2 = "facedir",
groups = {cracky = 2},
is_ground_content = false,
sounds = default.node_sound_stone_defaults(),
node_box = node_box,
selection_box = selection_box,
tiles = tiles,
can_dig = can_dig,
on_timer = on_timer,
on_construct = on_construct,
on_metadata_inventory_put = on_metadata_inventory_put,
on_metadata_inventory_move = on_metadata_inventory_move,
on_metadata_inventory_take = on_metadata_inventory_take,
allow_metadata_inventory_put = allow_metadata_inventory_put,
allow_metadata_inventory_move = allow_metadata_inventory_move,
allow_metadata_inventory_take = allow_metadata_inventory_take,
})
end) ()
--------------------------------------------------------------------
;(function () -- register a definition of an active core writer.
local tiles = {
"maidroid_tool_core_writer_top.png",
"maidroid_tool_core_writer_bottom.png",
"maidroid_tool_core_writer_right.png",
"maidroid_tool_core_writer_right.png^[transformFX",
{
backface_culling = false,
image = "maidroid_tool_core_writer_front_active.png^[transformFX",
animation = {
type = "vertical_frames",
aspect_w = 16,
aspect_h = 16,
length = 1.5,
},
},
{
backface_culling = false,
image = "maidroid_tool_core_writer_front_active.png",
animation = {
type = "vertical_frames",
aspect_w = 16,
aspect_h = 16,
length = 1.5,
},
},
}
local function allow_metadata_inventory_take(pos, listname, index, stack, player)
if listname == "core" then
return 0
end
return stack:get_count()
end
minetest.register_node("maidroid_tool:core_writer_active", {
drawtype = "nodebox",
paramtype = "light",
paramtype2 = "facedir",
groups = {cracky = 2},
is_ground_content = false,
sounds = default.node_sound_stone_defaults(),
node_box = node_box,
selection_box = selection_box,
tiles = tiles,
can_dig = can_dig,
on_timer = on_timer,
allow_metadata_inventory_put = allow_metadata_inventory_put,
allow_metadata_inventory_move = allow_metadata_inventory_move,
allow_metadata_inventory_take = allow_metadata_inventory_take,
})
end) ()
end) ()
-- register a definition of a core entity.
;(function()
local node_box = {
type = "fixed",
fixed = {
{ -0.5, -0.5, -0.125, 0.5, -0.4375, 0.125},
{ -0.125, -0.5, -0.5, 0.125, -0.4375, 0.5},
{ -0.25, -0.5, -0.4375, 0.25, -0.4375, 0.4375},
{ -0.375, -0.5, -0.375, 0.375, -0.4375, 0.375},
{-0.4375, -0.5, -0.25, 0.4375, -0.4375, 0.25},
},
}
local tiles = {
"maidroid_tool_core_top.png",
"maidroid_tool_core_top.png",
"maidroid_tool_core_right.png",
"maidroid_tool_core_right.png",
"maidroid_tool_core_right.png",
"maidroid_tool_core_right.png",
}
minetest.register_node("maidroid_tool:core_node", {
drawtype = "nodebox",
tiles = tiles,
node_box = node_box,
paramtype = "light",
paramtype2 = "facedir",
})
local function on_activate(self, staticdata)
self.object:set_properties{textures = {"maidroid_tool:core_node"}}
end
local function start_rotate(self)
self.object:set_properties{automatic_rotate = 1}
end
local function stop_rotate(self)
self.object:set_properties{automatic_rotate = 0}
end
minetest.register_entity("maidroid_tool:core_entity", {
physical = false,
visual = "wielditem",
visual_size = {x = 0.5, y = 0.5},
collisionbox = {0, 0, 0, 0, 0, 0},
on_activate = on_activate,
start_rotate = start_rotate,
stop_rotate = stop_rotate,
})
end) ()