| commit | author | age | ||
| ee0765 | 1 | |
| 0809dd | 2 | local S = technic.getter |
| S | 3 | |
| 967886 | 4 | -- handles the machine upgrades every tick |
| ee0765 | 5 | function technic.handle_machine_upgrades(meta) |
| S | 6 | -- Get the names of the upgrades |
| 7 | local inv = meta:get_inventory() | |
| 967886 | 8 | |
| ee0765 | 9 | local srcstack = inv:get_stack("upgrade1", 1) |
| 967886 | 10 | local upg_item1 = srcstack and srcstack:get_name() |
| T | 11 | |
| ee0765 | 12 | srcstack = inv:get_stack("upgrade2", 1) |
| 967886 | 13 | local upg_item2 = srcstack and srcstack:get_name() |
| ee0765 | 14 | |
| S | 15 | -- Save some power by installing battery upgrades. |
| 16 | -- Tube loading speed can be upgraded using control logic units. | |
| 17 | local EU_upgrade = 0 | |
| 18 | local tube_upgrade = 0 | |
| 967886 | 19 | |
| T | 20 | if upg_item1 == "technic:control_logic_unit" then |
| 21 | tube_upgrade = tube_upgrade + 1 | |
| 22 | elseif upg_item1 == "technic:battery" then | |
| 23 | EU_upgrade = EU_upgrade + 1 | |
| ee0765 | 24 | end |
| 967886 | 25 | |
| T | 26 | if upg_item2 == "technic:control_logic_unit" then |
| 27 | tube_upgrade = tube_upgrade + 1 | |
| 28 | elseif upg_item2 == "technic:battery" then | |
| 29 | EU_upgrade = EU_upgrade + 1 | |
| ee0765 | 30 | end |
| 967886 | 31 | |
| ee0765 | 32 | return EU_upgrade, tube_upgrade |
| 967886 | 33 | end |
| T | 34 | |
| 35 | -- handles the machine upgrades when set or removed | |
| 36 | local function on_machine_upgrade(meta, stack) | |
| a13e7b | 37 | local stack_name = stack:get_name() |
| T | 38 | if stack_name == "default:chest" then |
| 39 | meta:set_int("public", 1) | |
| 40 | return 1 | |
| 41 | elseif stack_name ~= "technic:control_logic_unit" | |
| 42 | and stack_name ~= "technic:battery" then | |
| 967886 | 43 | return 0 |
| T | 44 | end |
| a13e7b | 45 | return 1 |
| T | 46 | end |
| 967886 | 47 | |
| a13e7b | 48 | -- something is about to be removed |
| T | 49 | local function on_machine_downgrade(meta, stack, list) |
| 50 | if stack:get_name() == "default:chest" then | |
| 51 | local inv = meta:get_inventory() | |
| 52 | local upg1, upg2 = inv:get_stack("upgrade1", 1), inv:get_stack("upgrade2", 1) | |
| 53 | ||
| 54 | -- only set 0 if theres not a nother chest in the other list too | |
| 55 | if (not upg1 or not upg2 or upg1:get_name() ~= upg2:get_name()) then | |
| 56 | meta:set_int("public", 0) | |
| 57 | end | |
| 58 | end | |
| 967886 | 59 | return 1 |
| ee0765 | 60 | end |
| S | 61 | |
| 62 | ||
| 6a0807 | 63 | function technic.send_items(pos, x_velocity, z_velocity, output_name) |
| ee0765 | 64 | -- Send items on their way in the pipe system. |
| 6a0807 | 65 | if output_name == nil then |
| N | 66 | output_name = "dst" |
| 67 | end | |
| a8daa4 | 68 | |
| 4f78a6 | 69 | local meta = minetest.get_meta(pos) |
| ee0765 | 70 | local inv = meta:get_inventory() |
| S | 71 | local i = 0 |
| 6a0807 | 72 | for _, stack in ipairs(inv:get_list(output_name)) do |
| ee0765 | 73 | i = i + 1 |
| S | 74 | if stack then |
| 75 | local item0 = stack:to_table() | |
| 4f78a6 | 76 | if item0 then |
| befe3e | 77 | item0["count"] = 1 |
| 049129 | 78 | technic.tube_inject_item(pos, pos, vector.new(x_velocity, 0, z_velocity), item0) |
| ee0765 | 79 | stack:take_item(1) |
| 6a0807 | 80 | inv:set_stack(output_name, i, stack) |
| ee0765 | 81 | return |
| S | 82 | end |
| 83 | end | |
| 84 | end | |
| 85 | end | |
| 86 | ||
| 87 | function technic.smelt_item(meta, result, speed) | |
| 88 | local inv = meta:get_inventory() | |
| 89 | meta:set_int("cook_time", meta:get_int("cook_time") + 1) | |
| 90 | if meta:get_int("cook_time") < result.time / speed then | |
| 91 | return | |
| 92 | end | |
| 6ec12b | 93 | local result |
| G | 94 | local afterfuel |
| 95 | result, afterfuel = minetest.get_craft_result({method = "cooking", width = 1, items = inv:get_list("src")}) | |
| ee0765 | 96 | |
| S | 97 | if result and result.item then |
| 98 | meta:set_int("cook_time", 0) | |
| 99 | -- check if there's room for output in "dst" list | |
| bd3cc7 | 100 | if inv:room_for_item("dst", result.item) then |
| 6ec12b | 101 | inv:set_stack("src", 1, afterfuel.items[1]) |
| ee0765 | 102 | inv:add_item("dst", result.item) |
| S | 103 | end |
| 104 | end | |
| 105 | end | |
| 106 | ||
| 6a0807 | 107 | function technic.handle_machine_pipeworks(pos, tube_upgrade, send_function) |
| N | 108 | if send_function == nil then |
| 109 | send_function = technic.send_items | |
| 110 | end | |
| a8daa4 | 111 | |
| ee0765 | 112 | local node = minetest.get_node(pos) |
| S | 113 | local meta = minetest.get_meta(pos) |
| 114 | local pos1 = vector.new(pos) | |
| 115 | local x_velocity = 0 | |
| 116 | local z_velocity = 0 | |
| 117 | ||
| 118 | -- Output is on the left side of the furnace | |
| 119 | if node.param2 == 3 then pos1.z = pos1.z - 1 z_velocity = -1 end | |
| 120 | if node.param2 == 2 then pos1.x = pos1.x - 1 x_velocity = -1 end | |
| 121 | if node.param2 == 1 then pos1.z = pos1.z + 1 z_velocity = 1 end | |
| 122 | if node.param2 == 0 then pos1.x = pos1.x + 1 x_velocity = 1 end | |
| 123 | ||
| 124 | local output_tube_connected = false | |
| 4f78a6 | 125 | local node1 = minetest.get_node(pos1) |
| 35b10a | 126 | if minetest.get_item_group(node1.name, "tubedevice") > 0 then |
| ee0765 | 127 | output_tube_connected = true |
| S | 128 | end |
| 5382a8 | 129 | local tube_time = meta:get_int("tube_time") + tube_upgrade |
| c5d287 | 130 | if tube_time >= 2 then |
| ee0765 | 131 | tube_time = 0 |
| S | 132 | if output_tube_connected then |
| 6a0807 | 133 | send_function(pos, x_velocity, z_velocity) |
| ee0765 | 134 | end |
| S | 135 | end |
| 136 | meta:set_int("tube_time", tube_time) | |
| 137 | end | |
| 138 | ||
| 0809dd | 139 | function technic.machine_can_dig(pos, player) |
| S | 140 | local meta = minetest.get_meta(pos) |
| 141 | local inv = meta:get_inventory() | |
| 48e02b | 142 | if not inv:is_empty("src") or not inv:is_empty("dst") then |
| f205e5 | 143 | if player then |
| Z | 144 | minetest.chat_send_player(player:get_player_name(), |
| 145 | S("Machine cannot be removed because it is not empty")) | |
| 146 | end | |
| 0809dd | 147 | return false |
| c8cbd2 | 148 | end |
| JA | 149 | |
| 150 | return true | |
| 151 | end | |
| 152 | ||
| 153 | function technic.machine_after_dig_node(pos, oldnode, oldmetadata, player) | |
| 154 | if oldmetadata.inventory then | |
| 155 | if oldmetadata.inventory.upgrade1 and oldmetadata.inventory.upgrade1[1] then | |
| 156 | local stack = ItemStack(oldmetadata.inventory.upgrade1[1]) | |
| 157 | if not stack:is_empty() then | |
| 322615 | 158 | minetest.add_item(pos, stack) |
| c8cbd2 | 159 | end |
| 48e02b | 160 | end |
| c8cbd2 | 161 | if oldmetadata.inventory.upgrade2 and oldmetadata.inventory.upgrade2[1] then |
| JA | 162 | local stack = ItemStack(oldmetadata.inventory.upgrade2[1]) |
| 163 | if not stack:is_empty() then | |
| 322615 | 164 | minetest.add_item(pos, stack) |
| c8cbd2 | 165 | end |
| 48e02b | 166 | end |
| c8cbd2 | 167 | end |
| JA | 168 | |
| 169 | if minetest.registered_nodes[oldnode.name].tube then | |
| 170 | pipeworks.after_dig(pos, oldnode, oldmetadata, player) | |
| 0809dd | 171 | end |
| S | 172 | end |
| 173 | ||
| 967886 | 174 | local function inv_change(pos, player, count, from_list, to_list, stack) |
| T | 175 | local playername = player:get_player_name() |
| a13e7b | 176 | local meta = minetest.get_meta(pos); |
| T | 177 | local public = (meta:get_int("public") == 1) |
| 178 | local to_upgrade = to_list == "upgrade1" or to_list == "upgrade2" | |
| 179 | local from_upgrade = from_list == "upgrade1" or from_list == "upgrade2" | |
| 180 | ||
| 181 | if (not public or to_upgrade or from_upgrade) and minetest.is_protected(pos, playername) then | |
| 967886 | 182 | minetest.chat_send_player(playername, S("Inventory move disallowed due to protection")) |
| 0809dd | 183 | return 0 |
| S | 184 | end |
| a13e7b | 185 | if to_upgrade then |
| 6ef343 | 186 | -- only place a single item into it, if it's empty |
| 967886 | 187 | local empty = meta:get_inventory():is_empty(to_list) |
| T | 188 | if empty then |
| 189 | return on_machine_upgrade(meta, stack) | |
| 190 | end | |
| 191 | return 0 | |
| a13e7b | 192 | elseif from_upgrade then |
| T | 193 | -- only called on take (not move) |
| 194 | on_machine_downgrade(meta, stack, from_list) | |
| 6ef343 | 195 | end |
| 0809dd | 196 | return count |
| S | 197 | end |
| 198 | ||
| 199 | function technic.machine_inventory_put(pos, listname, index, stack, player) | |
| 967886 | 200 | return inv_change(pos, player, stack:get_count(), nil, listname, stack) |
| 0809dd | 201 | end |
| S | 202 | |
| 203 | function technic.machine_inventory_take(pos, listname, index, stack, player) | |
| 967886 | 204 | return inv_change(pos, player, stack:get_count(), listname, nil, stack) |
| 0809dd | 205 | end |
| S | 206 | |
| 207 | function technic.machine_inventory_move(pos, from_list, from_index, | |
| 208 | to_list, to_index, count, player) | |
| 967886 | 209 | local stack = minetest.get_meta(pos):get_inventory():get_stack(from_list, from_index) |
| T | 210 | return inv_change(pos, player, count, from_list, to_list, stack) |
| 0809dd | 211 | end |
| S | 212 | |
