SyrupThinker/minetest-mod-sparktech
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

wow, code that doesnt work properly yet on git owo

Browse Source
This commit is contained in:
Pascal Abresch 2019-10-01 03:29:30 +02:00
parent 3dc2e52cde
commit 1f1fcc43b1
1 changed files with 41 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
sparkmachine/lua/quarry.lua
View File

@ -4,10 +4,32 @@ local ENERGYCOST = {
dynamic_struct = 24,
hardness_mod = 1
}
local FORMSPEC = sparktech.add_inventory(32,8,
"list[current_name;quarry;0,0;32,4;]")
local function on_construct(pos, player)
player:get_meta():set_string(NAME .. ":quarry_pos" , minetest.pos_to_string(pos))
local meta = minetest.get_meta(pos)
meta:set_string("formspec", FORMSPEC)
local inventory = meta:get_inventory()
inventory:set_size('quarry', 128)
end
local function dig_node(pos, quarrypos)
--[[ local node = minetest.get_node(pos)
local quarryinv = minetest.get_meta(pos):get_inventory()
minetest.debug(ItemStack(node.name):get_name())
local itemstack = ItemStack(nil)
itemstack:add_item(node.name)
minetest.debug(itemstack:to_string())
if quarryinv:room_for_item("quarry", itemstack) then
quarryinv:add_item("quarry", itemstack) ]]--
--
-- Pretend this puts items in the quarry inventory, okay?
minetest.set_node(pos, {name = "air"})
--end
end
local function on_marker_placed(pos, quarry_pos, player)
@ -55,7 +77,7 @@ local function clear_area(pos, pos2)
if not ((x == pos.x and y == pos.y and z == pos.z) or
(x == pos2.x and y == pos2.y and z == pos2.z))
then
minetest.dig_node({ x=x, y=y, z=z })
dig_node({x=x, y=y, z=z}, pos)
end
end
end
@ -72,27 +94,21 @@ end
local function strut_line_x(x, y, z, x2)
local minx, maxx = order(x, x2)
minetest.debug(" x:" .. minx .. ":" .. maxx)
for x3=minx, maxx do
minetest.debug("x")
place_strut(x3, y, z)
end
end
local function strut_line_y(x, y, z, y2)
local miny, maxy = order(y, y2)
minetest.debug(" y:" .. miny .. ":" .. maxy)
for y3=miny, maxy do
minetest.debug("y")
place_strut(x, y3, z)
end
end
local function strut_line_z(x, y, z, z2)
local minz, maxz = order(z, z2)
minetest.debug(" z:" .. minz .. ":" .. maxz)
for z3=minz, maxz do
minetest.debug("z")
place_strut(x, y, z3)
end
end
@ -105,6 +121,16 @@ local function timer_trigger(pos, elapsed)
framenum = 13
end
if framenum < 0 then
local start_pos = minetest.string_to_pos(meta:get_string("dig_area_start"))
local end_pos = minetest.string_to_pos(meta:get_string("dig_area_end"))
if not start_pos or not end_pos then return end
local height = start_pos.y + framenum
minetest.debug(start_pos.y .. ": " .. height)
for x=start_pos.x, end_pos.x do
for z=start_pos.z, end_pos.z do
dig_node({x, height, z}, pos)
end
end
-- Operation Phase
--
else
@ -137,17 +163,18 @@ local function timer_trigger(pos, elapsed)
strut_line_y(pos.x, pos.y, pos.z, marker_pos.y)
elseif framenum == 0 then
--shrink the operational area here to a 2d space with one piece of border taken away to drill there
posx, pos2x = order(pos.x, marker_pos.x)
posy, pos2y = order(pos.y, marker_pos.y)
posz, pos2z = order(pos.z, marker_pos.z)
local posx, pos2x = order(pos.x, marker_pos.x)
local posy, pos2y = order(pos.y, marker_pos.y)
local posz, pos2z = order(pos.z, marker_pos.z)
posx = posx +1
pos2x = pos2x -1
posy = posy + 1
pos2y = pos2y -1
meta:set_string("dig_area_start", { x= posx, y= posy, z= posz})
meta:set_string("dig_area_end", { x= pos2x, y= pos2y, z= posz}) -- can use this last z as counter, or ignore it
meta:set_string("dig_area_start", minetest.pos_to_string({ x= posx, y= posy, z= posz}))
meta:set_string("dig_area_end", minetest.pos_to_string({ x= pos2x, y= posy, z= pos2z})) -- can use this last z as counter, or ignore it
minetest.debug("setup complete")
end
minetest.debug(framenum)
end
meta:set_int("current_frame", framenum -1)
@ -219,6 +246,6 @@ minetest.register_node( NAME .. ":lv_quarry", {
after_place_node = on_construct,
--on_destruct = function(pos, player) player:get_meta():set_string(NAME .. ":quarry_pos" , "") end,
allow_metadata_inventory_put = function() return false end,
allow_metadata_inventory_put = function(_,_,_, stack) return stacK:get_count() end,
allow_metadata_inventory_take = function(_, _, _, stack) return stack:get_count() end
})