5 -- For testing random stuff
7 function on_step(dtime)
8 -- print("experimental on_step")
10 objs = minetest.env:get_objects_inside_radius({x=0,y=0,z=0}, 10)
11 for k, obj in pairs(objs) do
12 name = obj:get_player_name()
14 print(name.." at "..dump(obj:getpos()))
15 print(name.." dir: "..dump(obj:get_look_dir()))
16 print(name.." pitch: "..dump(obj:get_look_pitch()))
17 print(name.." yaw: "..dump(obj:get_look_yaw()))
19 print("Some object at "..dump(obj:getpos()))
24 minetest.register_globalstep(on_step)
26 -- An example furnace-thing implemented in Lua
29 minetest.register_node("experimental:luafurnace", {
30 tile_images = {"default_lava.png", "default_furnace_side.png",
31 "default_furnace_side.png", "default_furnace_side.png",
32 "default_furnace_side.png", "default_furnace_front.png"},
33 --inventory_image = "furnace_front.png",
34 inventory_image = minetest.inventorycube("default_furnace_front.png"),
35 paramtype = "facedir_simple",
36 metadata_name = "generic",
37 material = minetest.digprop_stonelike(3.0),
40 minetest.register_on_placenode(function(pos, newnode, placer)
41 if newnode.name == "experimental:luafurnace" then
42 local meta = minetest.env:get_meta(pos)
43 meta:inventory_set_list("fuel", {""})
44 meta:inventory_set_list("src", {""})
45 meta:inventory_set_list("dst", {"","","",""})
46 meta:set_inventory_draw_spec(
48 .."list[current_name;fuel;2,3;1,1;]"
49 .."list[current_name;src;2,1;1,1;]"
50 .."list[current_name;dst;5,1;2,2;]"
51 .."list[current_player;main;0,5;8,4;]"
54 local total_cooked = 0;
55 meta:set_string("total_cooked", total_cooked)
56 meta:set_infotext("Lua Furnace: total cooked: "..total_cooked)
60 minetest.register_abm({
61 nodenames = {"experimental:luafurnace"},
64 action = function(pos, node, active_object_count, active_object_count_wider)
65 local meta = minetest.env:get_meta(pos)
66 for i, name in ipairs({
72 if not meta:get_string(name) then
73 meta:set_string(name, 0)
77 local inv = meta:get_inventory()
79 local fuelitem = inv:get_stack("fuel", 1):peek_item()
80 local srcitem = inv:get_stack("src", 1):peek_item()
81 --print("fuelitem="..dump(fuelitem))
82 --print("srcitem="..dump(srcitem))
84 local was_active = false
86 local src_cooktime = -1
87 local result_stackstring = nil
90 local prop = get_item_definition(srcitem)
91 if prop and prop.cookresult_itemstring ~= "" then
92 result_stackstring = prop.cookresult_itemstring
93 src_cooktime = prop.furnace_cooktime or 3
97 print("src_cooktime="..dump(src_cooktime))
98 print("result_stackstring="..dump(result_stackstring))
100 if tonumber(meta:get_string("fuel_time")) < tonumber(meta:get_string("fuel_totaltime")) then
102 meta:set_string("fuel_time", tonumber(meta:get_string("fuel_time")) + 1)
103 meta:set_string("src_time", tonumber(meta:get_string("src_time")) + 1)
104 --print("result_stackstring="..dump(result_stackstring))
105 --print('tonumber(meta:get_string("src_time"))='..dump(tonumber(meta:get_string("src_time"))))
106 --print("src_cooktime="..dump(src_cooktime))
107 if result_stackstring and tonumber(meta:get_string("src_time")) >= src_cooktime and src_cooktime >= 0 then
108 -- Put result in "dst" list
109 success = inv:autoinsert_stackstring("dst", result_stackstring)
111 print("Could not autoinsert '"..result_stackstring.."'")
113 -- If succeeded, take stuff from "src" list
115 srcstack = inv:get_stack("src", 1)
117 inv:set_stack("src", 1, srcstack)
119 meta:set_string("src_time", 0)
123 if tonumber(meta:get_string("fuel_time")) < tonumber(meta:get_string("fuel_totaltime")) then
124 meta:set_infotext("Furnace active: "..(tonumber(meta:get_string("fuel_time"))/tonumber(meta:get_string("fuel_totaltime"))*100).."%")
128 local srcitem = inv:get_stack("src", 1):peek_item()
130 local src_cooktime = 0
131 local result_stackstring = nil
134 local prop = get_item_definition(srcitem)
135 if prop and prop.cookresult_itemstring ~= "" then
136 result_stackstring = prop.cookresult_itemstring
137 src_cooktime = prop.furnace_cooktime or 3
141 local fuelitem = inv:get_stack("fuel", 1):peek_item()
143 if not result_stackstring or not fuelitem then
145 meta:set_infotext("Furnace is empty")
152 local prop = get_item_definition(fuelitem)
154 burntime = prop.furnace_burntime or -1
158 if burntime <= 0 then
159 meta:set_infotext("Furnace out of fuel")
163 meta:set_string("fuel_totaltime", burntime)
164 meta:set_string("fuel_time", 0)
166 local stack = inv:get_stack("fuel", 1)
168 inv:set_stack("fuel", 1, stack)
171 minetest.register_abm({
172 nodenames = {"experimental:luafurnace"},
175 action = function(pos, node, active_object_count, active_object_count_wider)
176 local meta = minetest.env:get_meta(pos)
177 local fuellist = meta:inventory_get_list("fuel")
178 local srclist = meta:inventory_get_list("src")
179 local dstlist = meta:inventory_get_list("dst")
180 if fuellist == nil or srclist == nil or dstlist == nil then
183 _, srcitem = stackstring_take_item(srclist[1])
184 _, fuelitem = stackstring_take_item(fuellist[1])
185 if not srcitem or not fuelitem then return end
186 if fuelitem.type == "node" then
187 local prop = minetest.registered_nodes[fuelitem.name]
188 if prop == nil then return end
189 if prop.furnace_burntime < 0 then return end
193 local resultstack = nil
194 if srcitem.type == "node" then
195 local prop = minetest.registered_nodes[srcitem.name]
196 if prop == nil then return end
197 if prop.cookresult_item == "" then return end
198 resultstack = prop.cookresult_item
203 if resultstack == nil then
207 dstlist[1], success = stackstring_put_stackstring(dstlist[1], resultstack)
212 fuellist[1], _ = stackstring_take_item(fuellist[1])
213 srclist[1], _ = stackstring_take_item(srclist[1])
215 meta:inventory_set_list("fuel", fuellist)
216 meta:inventory_set_list("src", srclist)
217 meta:inventory_set_list("dst", dstlist)
219 local total_cooked = meta:get_string("total_cooked")
220 total_cooked = tonumber(total_cooked) + 1
221 meta:set_string("total_cooked", total_cooked)
222 meta:set_infotext("Lua Furnace: total cooked: "..total_cooked)
225 minetest.register_craft({
226 output = 'node "experimental:luafurnace" 1',
228 {'node "default:cobble"', 'node "default:cobble"', 'node "default:cobble"'},
229 {'node "default:cobble"', 'node "default:steel_ingot"', 'node "default:cobble"'},
230 {'node "default:cobble"', 'node "default:cobble"', 'node "default:cobble"'},
240 minetest.register_tool("experimental:horribletool", {
241 image = "default_lava.png",
256 -- TNT (not functional)
259 minetest.register_craft({
260 output = 'experimental:tnt',
263 {'default:coal_lump'},
268 minetest.register_node("experimental:tnt", {
269 tile_images = {"default_tnt_top.png", "default_tnt_bottom.png",
270 "default_tnt_side.png", "default_tnt_side.png",
271 "default_tnt_side.png", "default_tnt_side.png"},
272 inventory_image = minetest.inventorycube("default_tnt_top.png",
273 "default_tnt_side.png", "default_tnt_side.png"),
274 drop = '', -- Get nothing
280 minetest.register_on_punchnode(function(p, node)
281 if node.name == "experimental:tnt" then
282 minetest.env:remove_node(p)
283 minetest.env:add_entity(p, "experimental:tnt")
290 physical = true, -- Collides with things
292 collisionbox = {-0.5,-0.5,-0.5, 0.5,0.5,0.5},
294 textures = {"default_tnt_top.png", "default_tnt_bottom.png",
295 "default_tnt_side.png", "default_tnt_side.png",
296 "default_tnt_side.png", "default_tnt_side.png"},
297 -- Initial value for our timer
299 -- Number of punches required to defuse
305 -- Called when a TNT object is created
306 function TNT:on_activate(staticdata)
307 print("TNT:on_activate()")
308 self.object:setvelocity({x=0, y=4, z=0})
309 self.object:setacceleration({x=0, y=-10, z=0})
310 self.object:settexturemod("^[brighten")
313 -- Called periodically
314 function TNT:on_step(dtime)
315 --print("TNT:on_step()")
316 self.timer = self.timer + dtime
317 self.blinktimer = self.blinktimer + dtime
318 if self.blinktimer > 0.5 then
319 self.blinktimer = self.blinktimer - 0.5
320 if self.blinkstatus then
321 self.object:settexturemod("")
323 self.object:settexturemod("^[brighten")
325 self.blinkstatus = not self.blinkstatus
329 -- Called when object is punched
330 function TNT:on_punch(hitter)
331 print("TNT:on_punch()")
332 self.health = self.health - 1
333 if self.health <= 0 then
335 hitter:get_inventory():add_item("main", "experimental:tnt")
336 hitter:set_hp(hitter:get_hp() - 1)
340 -- Called when object is right-clicked
341 function TNT:on_rightclick(clicker)
342 --pos = self.object:getpos()
343 --pos = {x=pos.x, y=pos.y+0.1, z=pos.z}
344 --self.object:moveto(pos, false)
347 --print("TNT dump: "..dump(TNT))
348 --print("Registering TNT");
349 minetest.register_entity("experimental:tnt", TNT)
351 -- Add TNT's old name also
352 minetest.register_alias("TNT", "experimental:tnt")
355 -- A test entity for testing animated and yaw-modulated sprites
358 minetest.register_entity("experimental:testentity", {
360 physical = true, -- Collides with things
362 collisionbox = {-0.7,-1.35,-0.7, 0.7,1.0,0.7},
363 --collisionbox = {-0.5,-0.5,-0.5, 0.5,0.5,0.5},
365 visual_size = {x=2, y=3},
366 textures = {"dungeon_master.png^[makealpha:128,0,0^[makealpha:128,128,0"},
367 spritediv = {x=6, y=5},
368 initial_sprite_basepos = {x=0, y=0},
370 on_activate = function(self, staticdata)
371 print("testentity.on_activate")
372 self.object:setsprite({x=0,y=0}, 1, 0, true)
373 --self.object:setsprite({x=0,y=0}, 4, 0.3, true)
376 self.object:setacceleration({x=0, y=-10, z=0})
377 -- Jump a bit upwards
378 self.object:setvelocity({x=0, y=10, z=0})
381 on_punch = function(self, hitter)
383 hitter:add_to_inventory('craft testobject1 1')
391 minetest.register_on_respawnplayer(function(player)
392 print("on_respawnplayer")
393 -- player:setpos({x=0, y=30, z=0})
397 minetest.register_on_generated(function(minp, maxp)
398 --print("on_generated: minp="..dump(minp).." maxp="..dump(maxp))
399 --cp = {x=(minp.x+maxp.x)/2, y=(minp.y+maxp.y)/2, z=(minp.z+maxp.z)/2}
400 --minetest.env:add_node(cp, {name="sand"})
403 -- Example setting get
404 --print("setting max_users = " .. dump(minetest.setting_get("max_users")))
405 --print("setting asdf = " .. dump(minetest.setting_get("asdf")))
407 minetest.register_on_chat_message(function(name, message)
408 --[[print("on_chat_message: name="..dump(name).." message="..dump(message))
409 local cmd = "/testcommand"
410 if message:sub(0, #cmd) == cmd then
411 print(cmd.." invoked")
415 if message:sub(0, #cmd) == cmd then
416 print("script-overridden help command")
417 minetest.chat_send_all("script-overridden help command")
422 -- Grow papyrus on TNT every 10 seconds
423 --[[minetest.register_abm({
427 action = function(pos, node, active_object_count, active_object_count_wider)
428 print("TNT ABM action")
430 minetest.env:add_node(pos, {name="papyrus"})
434 -- Replace texts of alls signs with "foo" every 10 seconds
435 --[[minetest.register_abm({
436 nodenames = {"sign_wall"},
439 action = function(pos, node, active_object_count, active_object_count_wider)
440 print("ABM: Sign text changed")
441 local meta = minetest.env:get_meta(pos)
446 --[[local ncpos = nil
449 {2, 1, 0, 3}, {3, 0, 1, 2}, {4, -1, 0, 1}, {5, -1, 0, 1}, {6, 0, -1, 0},
450 {7, 0, -1, 0}, {8, 1, 0, 3}, {9, 1, 0, 3}, {10, 1, 0, 3}, {11, 0, 1, 2},
451 {12, 0, 1, 2}, {13, 0, 1, 2}, {14, -1, 0, 1}, {15, -1, 0, 1}, {16, -1, 0, 1},
452 {17, -1, 0, 1}, {18, 0, -1, 0}, {19, 0, -1, 0}, {20, 0, -1, 0}, {21, 0, -1, 0},
453 {22, 1, 0, 3}, {23, 1, 0, 3}, {24, 1, 0, 3}, {25, 1, 0, 3}, {10, 0, 1, 2}
458 minetest.register_abm({
459 nodenames = {"dirt_with_grass"},
462 action = function(pos, node, active_object_count, active_object_count_wider)
467 if pos.x % 16 ~= 8 or pos.z % 16 ~= 8 then
472 n = minetest.env:get_node(pos)
474 if n.name ~= "air" then
481 minetest.env:add_node(ncpos, {name="nyancat"})
485 minetest.register_abm({
486 nodenames = {"nyancat"},
489 action = function(pos, node, active_object_count, active_object_count_wider)
493 if pos.x == ncpos.x and pos.y == ncpos.y and pos.z == ncpos.z then
495 if clock - nctime < 0.1 then
504 p1 = {x = p0.x + s0[2], y = p0.y, z = p0.z + s0[3]}
505 p2 = {x = p1.x + s1[2], y = p1.y, z = p1.z + s1[3]}
506 table.insert(ncold, 1, p0)
507 while #ncold >= 10 do
508 minetest.env:add_node(ncold[#ncold], {name="air"})
509 table.remove(ncold, #ncold)
511 minetest.env:add_node(p0, {name="nyancat_rainbow"})
512 minetest.env:add_node(p1, {name="nyancat", param1=s0[4]})
513 minetest.env:add_node(p2, {name="air"})
519 print("experimental modname="..dump(minetest.get_current_modname()))
520 print("experimental modpath="..dump(minetest.get_modpath("experimental")))