turtlebot/spawner.lua at master · jamesgorman2/turtlebot · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
local isActive = turtlebot.isActive
local activate = turtlebot.activate
local deactivate = turtlebot.deactivate

local function getSpawnerpos(meta)
	return stringToPos(meta:get_string("libpos"))
end


update_form = function (pos, mode)
	if not pos then return end
	local meta = minetest.get_meta(pos);
	if not meta then return end
	local code = minetest.formspec_escape(meta:get_string("code"));
	local form;

	if mode ~= 1 then -- when placed
		local startStop = function()
			if isActive(pos) then
				return "button[-0.2, 1.75;1.25,1;turtlebot_despawn;STOP]"
			else
				return "button_exit[-0.2, 1.75;1.25,1;turtlebot_spawn;START]"
			end
		end

		form  =
			"size[9.5,8]" ..  -- width, height
			"textarea[1.25,-0.2;8.75,9.8;turtlebot_code;;".. code.."]"..
			"button_exit[-0.2,-0.25;1.25,1;turtlebot_save;SAVE]"..
			startStop() ..
			"button_exit[-0.2,3.75;1.25,1;turtlebot_cancel;CANCEL]";
	else -- when robot clicked
		form  =
			"size[9.5,8]" ..  -- width, height
			"textarea[1.25,-0.25;8.75,9.8;turtlebot_code;;".. code.."]"..
			"button_exit[-0.2,-0.25;1.25,1;turtlebot_save;SAVE]"..
			"button_exit[-0.2, 1.75;1.25,1;turtlebot_despawn;STOP]" ..
			"button_exit[-0.2.25,3.75;1.25,1;turtlebot_cancel;CANCEL]";
	end

	meta:set_string("formspec",form)
	return form
end

on_receive_robot_form = function(pos, formname, fields, sender)

	local name = sender:get_player_name();
	if minetest.is_protected(pos, name) then return end

	local save = function ()
		local meta = minetest.get_meta(pos);

		if fields.turtlebot_code then
			local code = fields.turtlebot_code or "";
			if string.len(code) > 64000 then
				minetest.chat_send_all("#ROBOT: " .. name .. " is spamming with long text.") return
			end
			meta:set_string("code", code)
		end
	end

	if fields.turtlebot_save then
		save()
	elseif fields.turtlebot_spawn then
		save()
		activate(pos);
	elseif fields.turtlebot_despawn then
		save()
		deactivate(pos)
	end

	update_form(pos);
end

minetest.register_node("turtlebot:spawner", {
	description = "Spawns turtlebot",
	tiles = {"cpu.png"},
	groups = {cracky=3, mesecon_effector_on = 1},
	drawtype = "allfaces",
	paramtype = "light",
	param1 = 1,
	walkable = true,
	alpha = 150,

	after_place_node = function(pos, placer)
		local meta = minetest.env:get_meta(pos)

    local owner = placer:get_player_name();
		meta:set_string("owner", owner);
		meta:set_string("code","");
		meta:set_string("infotext", "robot spawner (owned by ".. placer:get_player_name() .. ")")
		meta:set_string("libpos", posToString(pos))

		update_form(pos);
	end,

	mesecons = {
    effector = {
      action_on = activate,
      action_off = deactivate
		}
	},

	on_receive_fields = on_receive_robot_form,

  can_dig = function(pos, player)
		return not isActive(pos)
	end

})

minetest.register_craft({
	output = "turtlebot:spawner",
	recipe = {
		{"default:mese_crystal", "default:mese_crystal","default:mese_crystal"},
		{"default:mese_crystal", "default:mese_crystal","default:mese_crystal"},
		{"default:stone", "default:steel_ingot", "default:stone"}
	}
})