RealBadAngel
2013-01-27 704a410fa1391318766927c8baa8a93b0731e7d0
commit | author | age
4503c4 1 minetest.register_craft({
MK 2     output = 'technic:deployer_off 1',
3     recipe = {
ad30b3 4         {'default:wood', 'default:chest','default:wood'},
4503c4 5         {'default:stone', 'mesecons:piston','default:stone'},
MK 6         {'default:stone', 'mesecons:mesecon','default:stone'},
7
8     }
9 })
10
11 minetest.register_node("technic:deployer_off", {
12     description = "Deployer",
13     tile_images = {"technic_deployer_top.png","technic_deployer_bottom.png","technic_deployer_side2.png","technic_deployer_side1.png",
14             "technic_deployer_back.png","technic_deployer_front_off.png"},
15     is_ground_content = true,
16     paramtype2 = "facedir",
17     groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, mesecon_receptor_off = 1, mesecon_effector_off = 1, mesecon = 2,tubedevice=1},
18     sounds = default.node_sound_stone_defaults(),
19     on_construct = function(pos)
20     local meta = minetest.env:get_meta(pos)
ce73c9 21     meta:set_string("formspec",
MK 22                 "invsize[8,9;]"..
23                 "label[0,0;Deployer]"..
24                 "list[current_name;main;4,1;3,3;]"..
25                 "list[current_player;main;0,5;8,4;]")
26         meta:set_string("infotext", "Deployer")
27         local inv = meta:get_inventory()
28         inv:set_size("main", 3*3)
4503c4 29     end,
ce73c9 30
MK 31     can_dig = function(pos,player)
32         local meta = minetest.env:get_meta(pos);
33         local inv = meta:get_inventory()
34         if not inv:is_empty("main") then
35             return false
36         end
37         return true
38         end,
4503c4 39     
MK 40 })
41
42 minetest.register_node("technic:deployer_on", {
43     description = "Deployer",
44     tile_images = {"technic_deployer_top.png","technic_deployer_bottom.png","technic_deployer_side2.png","technic_deployer_side1.png",
45             "technic_deployer_back.png","technic_deployer_front_on.png"},
46     is_ground_content = true,
47     paramtype2 = "facedir",
48     tubelike=1,
49     groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, mesecon_receptor_off = 1, mesecon_effector_off = 1, mesecon = 2,tubedevice=1,not_in_creative_inventory=1},
50     sounds = default.node_sound_stone_defaults(),
51 })
52
53 mesecon:register_on_signal_on(function(pos, node)
ce73c9 54     local pos1={}
MK 55     pos1.x=pos.x
56     pos1.y=pos.y
57     pos1.z=pos.z
58     if node.param2==3 then pos1.x=pos1.x+1 end
59     if node.param2==2 then pos1.z=pos1.z+1 end
60     if node.param2==1 then pos1.x=pos1.x-1 end
61     if node.param2==0 then pos1.z=pos1.z-1 end
62
4503c4 63     if node.name == "technic:deployer_off" then
ce73c9 64         hacky_swap_node(pos,"technic:deployer_on")
4503c4 65         nodeupdate(pos)
ce73c9 66             local meta = minetest.env:get_meta(pos);
MK 67         
68         local inv = meta:get_inventory()
69         print (dump(inv))
70         for _,stack in ipairs(inv:get_list("main")) do
71         print (dump(stack:get_name()))
72
73         if stack:get_name() ~=nil then 
74             node1={name=stack:get_name(), param1=0, param2=node.param2}
75             minetest.env:place_node(pos1,node1)
76             return
77             end
78     end
4503c4 79     end
MK 80 end)
81
82 mesecon:register_on_signal_off(function(pos, node)
83     if node.name == "technic:deployer_on" then
ce73c9 84         hacky_swap_node(pos,"technic:deployer_off")
4503c4 85         nodeupdate(pos)
MK 86     end
87 end)
88
89 mesecon:register_effector("technic:deployer_on", "technic:deployer_off")
90
91