135 lines
4.3 KiB
Lua
135 lines
4.3 KiB
Lua
-- ███ ███ █████ ██████ ██████ ██████
|
|
-- ████ ████ ██ ██ ██ ██ ██ ██ ██
|
|
-- ██ ████ ██ ███████ ██ ██████ ██ ██
|
|
-- ██ ██ ██ ██ ██ ██ ██ ██ ██ ██
|
|
-- ██ ██ ██ ██ ██████ ██ ██ ██████
|
|
local wea = worldeditadditions
|
|
local v3 = worldeditadditions.Vector3
|
|
local function step(params)
|
|
-- Initialize additional params on first call
|
|
if not params.first then
|
|
params.i = 1 -- Iteration number
|
|
params.time = 0 -- Total execution time
|
|
params.first = true
|
|
end
|
|
|
|
-- Load current command string to use
|
|
local command, args = params.commands[params.i]:match("/([^%s]+)%s*(.*)$")
|
|
if not args then args = ""
|
|
else args = args:match("^%s*(.*)%s*$") end
|
|
-- Get command and test privs
|
|
local cmd = minetest.chatcommands[command]
|
|
if not cmd then
|
|
return false, "Error: "..command.." isn't a valid command."
|
|
end
|
|
if not minetest.check_player_privs(params.player_name, cmd.privs) then
|
|
return false, "Your privileges are insufficient to run /\""..command.."\"."
|
|
end
|
|
|
|
-- Start a timer
|
|
local start_time = wea.get_ms_time()
|
|
-- Execute command
|
|
cmd.func(params.player_name, args)
|
|
-- Finish timer and add to total
|
|
params.time = params.time + wea.get_ms_time() - start_time
|
|
-- Increment iteration state
|
|
params.i = params.i + 1
|
|
|
|
if params.i <= #params.commands then
|
|
-- If we haven't run out of values call function again
|
|
minetest.after(params.delay, step, params) -- Time is in seconds
|
|
else
|
|
worldedit.player_notify(params.player_name, "The macro \""..
|
|
params.file.."\" was completed in " ..
|
|
wea.format.human_time(params.time))
|
|
end
|
|
end
|
|
|
|
worldeditadditions_core.register_command("macro", {
|
|
params = "<file> [<delay=0>]",
|
|
description = "Load commands from \"(world folder)/macros/<file>[.weamac | .wmac]\" with position 1 of the current WorldEdit region as the origin.",
|
|
privs = {worldedit=true},
|
|
require_pos = 0,
|
|
parse = function(params_text)
|
|
local parts = wea.split(params_text,"%s")
|
|
local file_name, delay -- = params_text:match("^(.-)%s*(%d*%.?%d*)$")
|
|
-- Check for params and delay
|
|
if not parts[1] then
|
|
return false, "Error: Insufficient arguments. Expected: \"<file> [<delay=0>]\""
|
|
elseif not parts[#parts]:match("[^%d%.]") then
|
|
delay = table.remove(parts,#parts)
|
|
file_name = table.concat(parts," ")
|
|
else
|
|
delay = 0
|
|
file_name = table.concat(parts," ")
|
|
end
|
|
-- Check file name
|
|
if file_name:match("[!\"#%%&'%(%)%*%+,/:;<=>%?%[\\]%^`{|}]") then
|
|
return false, "Disallowed file name: " .. params_text
|
|
end
|
|
|
|
return true, file_name, delay
|
|
end,
|
|
func = function(name, file_name, delay)
|
|
if not worldedit.pos1[name] then
|
|
worldedit.pos1[name] = v3.add(wea.player_vector(name), v3.new(0.5,-0.5,0.5)):floor()
|
|
worldedit.mark_pos1(name)
|
|
end
|
|
worldedit.pos2[name] = worldedit.pos1[name]
|
|
|
|
-- Find the file in the world path
|
|
local testpaths = {
|
|
minetest.get_worldpath() .. "/macros/" .. file_name,
|
|
minetest.get_worldpath() .. "/macros/" .. file_name .. ".weamac",
|
|
minetest.get_worldpath() .. "/macros/" .. file_name .. ".wmac",
|
|
}
|
|
local file, err
|
|
for index, path in ipairs(testpaths) do
|
|
file, err = io.open(path, "rb")
|
|
if not err then break end
|
|
end
|
|
-- Check if file exists
|
|
if err then
|
|
return false, "Error: File \"" .. file_name .. "\" does not exist or is corrupt."
|
|
end
|
|
local value = file:read("*a")
|
|
file:close()
|
|
|
|
step({
|
|
player_name = name,
|
|
file = file_name:match("^[^%.]+"),
|
|
delay = delay,
|
|
commands = wea.split(value,"[\n\r]+")
|
|
})
|
|
|
|
end,
|
|
})
|
|
|
|
-- Make default macro
|
|
local function default_macro()
|
|
local path = minetest.get_worldpath() .. "/macros"
|
|
-- Create directory if it does not already exist
|
|
minetest.mkdir(path)
|
|
local writer, err = io.open(path.."/fixlight.weamac", "ab")
|
|
if not writer then return false end
|
|
writer:write("//multi //1 //2 //outset 50 //fixlight //y")
|
|
writer:flush()
|
|
writer:close()
|
|
return true
|
|
end
|
|
|
|
-- Check for default macro
|
|
local function chk_default_macro()
|
|
local path = minetest.get_worldpath() .. "/macros/fixlight.weamac"
|
|
local file, err = io.open(path, "rb")
|
|
if err then return false
|
|
else
|
|
file:close()
|
|
return true
|
|
end
|
|
end
|
|
|
|
if not chk_default_macro() then
|
|
default_macro()
|
|
end
|