RealBadAngel
2013-01-27 704a410fa1391318766927c8baa8a93b0731e7d0
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
minetest.register_craft({
    output = 'technic:deployer_off 1',
    recipe = {
        {'default:wood', 'default:chest','default:wood'},
        {'default:stone', 'mesecons:piston','default:stone'},
        {'default:stone', 'mesecons:mesecon','default:stone'},
 
    }
})
 
minetest.register_node("technic:deployer_off", {
    description = "Deployer",
    tile_images = {"technic_deployer_top.png","technic_deployer_bottom.png","technic_deployer_side2.png","technic_deployer_side1.png",
            "technic_deployer_back.png","technic_deployer_front_off.png"},
    is_ground_content = true,
    paramtype2 = "facedir",
    groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, mesecon_receptor_off = 1, mesecon_effector_off = 1, mesecon = 2,tubedevice=1},
    sounds = default.node_sound_stone_defaults(),
    on_construct = function(pos)
    local meta = minetest.env:get_meta(pos)
    meta:set_string("formspec",
                "invsize[8,9;]"..
                "label[0,0;Deployer]"..
                "list[current_name;main;4,1;3,3;]"..
                "list[current_player;main;0,5;8,4;]")
        meta:set_string("infotext", "Deployer")
        local inv = meta:get_inventory()
        inv:set_size("main", 3*3)
    end,
 
    can_dig = function(pos,player)
        local meta = minetest.env:get_meta(pos);
        local inv = meta:get_inventory()
        if not inv:is_empty("main") then
            return false
        end
        return true
        end,
    
})
 
minetest.register_node("technic:deployer_on", {
    description = "Deployer",
    tile_images = {"technic_deployer_top.png","technic_deployer_bottom.png","technic_deployer_side2.png","technic_deployer_side1.png",
            "technic_deployer_back.png","technic_deployer_front_on.png"},
    is_ground_content = true,
    paramtype2 = "facedir",
    tubelike=1,
    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},
    sounds = default.node_sound_stone_defaults(),
})
 
mesecon:register_on_signal_on(function(pos, node)
    local pos1={}
    pos1.x=pos.x
    pos1.y=pos.y
    pos1.z=pos.z
    if node.param2==3 then pos1.x=pos1.x+1 end
    if node.param2==2 then pos1.z=pos1.z+1 end
    if node.param2==1 then pos1.x=pos1.x-1 end
    if node.param2==0 then pos1.z=pos1.z-1 end
 
    if node.name == "technic:deployer_off" then
        hacky_swap_node(pos,"technic:deployer_on")
        nodeupdate(pos)
            local meta = minetest.env:get_meta(pos);
        
        local inv = meta:get_inventory()
        print (dump(inv))
        for _,stack in ipairs(inv:get_list("main")) do
        print (dump(stack:get_name()))
 
        if stack:get_name() ~=nil then 
            node1={name=stack:get_name(), param1=0, param2=node.param2}
            minetest.env:place_node(pos1,node1)
            return
            end
    end
    end
end)
 
mesecon:register_on_signal_off(function(pos, node)
    if node.name == "technic:deployer_on" then
        hacky_swap_node(pos,"technic:deployer_off")
        nodeupdate(pos)
    end
end)
 
mesecon:register_effector("technic:deployer_on", "technic:deployer_off")