| commit | author | age | ||
| 82cba9 | 1 | minetest.register_craftitem("technic:injector", { |
| R | 2 | description = "Injector", |
| 3 | stack_max = 99, | |
| 4 | }) | |
| 5 | ||
| 6 | minetest.register_node("technic:injector", { | |
| 7 | description = "Injector", | |
| 612349 | 8 | tiles = {"technic_injector_top.png", "technic_injector_bottom.png", "technic_injector_side.png", |
| R | 9 | "technic_injector_side.png", "technic_injector_side.png", "technic_injector_side.png"}, |
| 82cba9 | 10 | paramtype2 = "facedir", |
| R | 11 | groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2}, |
| 12 | legacy_facedir_simple = true, | |
| 13 | sounds = default.node_sound_wood_defaults(), | |
| 14 | on_construct = function(pos) | |
| 15 | local meta = minetest.env:get_meta(pos) | |
| 16 | meta:set_string("formspec", | |
| 17 | "invsize[9,9;]".. | |
| 18 | "list[current_name;main;0,2;8,2;]".. | |
| 19 | "list[current_player;main;0,5;8,4;]") | |
| 20 | meta:set_string("infotext", "Injector") | |
| 21 | local inv = meta:get_inventory() | |
| 22 | inv:set_size("main", 8*4) | |
| 23 | end, | |
| 24 | can_dig = function(pos,player) | |
| 25 | local meta = minetest.env:get_meta(pos); | |
| 26 | local inv = meta:get_inventory() | |
| 27 | return inv:is_empty("main") | |
| 28 | end, | |
| 29 | on_punch = function (pos, node, puncher) | |
| 30 | local meta = minetest.env:get_meta(pos); | |
| 31 | local inv = meta:get_inventory() | |
| 32 | for _,stack in ipairs(inv:get_list("main")) do | |
| 33 | if stack:get_name() ~="" then | |
| 34 | inv:remove_item("main",stack) | |
| 612349 | 35 | pos1=pos |
| R | 36 | pos1.y=pos1.y |
| 37 | local x=pos1.x+1.5 | |
| 38 | local z=pos1.z | |
| 39 | item1=tube_item({x=pos1.x,y=pos1.y,z=pos1.z},stack) | |
| 40 | item1:get_luaentity().start_pos = {x=pos1.x,y=pos1.y,z=pos1.z} | |
| 41 | item1:setvelocity({x=1, y=0, z=0}) | |
| 42 | item1:setacceleration({x=0, y=0, z=0}) | |
| 82cba9 | 43 | return |
| R | 44 | end |
| 45 | end | |
| 46 | end, | |
| 47 | }) | |
| 48 | ||
| 49 | ||
| 50 | function tube_item(pos, item) | |
| 612349 | 51 | local TUBE_nodes = {} |
| R | 52 | local CHEST_nodes = {} |
| 53 | ||
| 54 | TUBE_nodes[1]={} | |
| 55 | TUBE_nodes[1].x=pos.x | |
| 56 | TUBE_nodes[1].y=pos.y | |
| 57 | TUBE_nodes[1].z=pos.z | |
| 58 | ||
| 59 | ||
| 60 | table_index=1 | |
| 61 | repeat | |
| 62 | check_TUBE_node (TUBE_nodes,CHEST_nodes,table_index) | |
| 63 | table_index=table_index+1 | |
| 64 | if TUBE_nodes[table_index]==nil then break end | |
| 65 | until false | |
| 66 | found=table_index-1 | |
| 67 | ||
| 68 | ||
| 69 | print("Found "..found.." tubes connected") | |
| 70 | print(dump(CHEST_nodes)) | |
| 82cba9 | 71 | -- Take item in any format |
| R | 72 | local stack = ItemStack(item) |
| 73 | local obj = minetest.env:add_entity(pos, "technic:tubed_item") | |
| 74 | obj:get_luaentity():set_item(stack:to_string()) | |
| 75 | return obj | |
| 76 | end | |
| 77 | ||
| 78 | minetest.register_entity("technic:tubed_item", { | |
| 79 | initial_properties = { | |
| 80 | hp_max = 1, | |
| 81 | physical = false, | |
| 82 | collisionbox = {0,0,0,0,0,0}, | |
| 83 | visual = "sprite", | |
| 84 | visual_size = {x=0.5, y=0.5}, | |
| 85 | textures = {""}, | |
| 86 | spritediv = {x=1, y=1}, | |
| 87 | initial_sprite_basepos = {x=0, y=0}, | |
| 88 | is_visible = false, | |
| 612349 | 89 | start_pos={}, |
| R | 90 | route={} |
| 82cba9 | 91 | }, |
| R | 92 | |
| 93 | itemstring = '', | |
| 94 | physical_state = false, | |
| 95 | ||
| 96 | set_item = function(self, itemstring) | |
| 97 | self.itemstring = itemstring | |
| 98 | local stack = ItemStack(itemstring) | |
| 99 | local itemtable = stack:to_table() | |
| 100 | local itemname = nil | |
| 101 | if itemtable then | |
| 102 | itemname = stack:to_table().name | |
| 103 | end | |
| 104 | local item_texture = nil | |
| 105 | local item_type = "" | |
| 106 | if minetest.registered_items[itemname] then | |
| 107 | item_texture = minetest.registered_items[itemname].inventory_image | |
| 108 | item_type = minetest.registered_items[itemname].type | |
| 109 | end | |
| 110 | prop = { | |
| 111 | is_visible = true, | |
| 112 | visual = "sprite", | |
| 113 | textures = {"unknown_item.png"} | |
| 114 | } | |
| 115 | if item_texture and item_texture ~= "" then | |
| 116 | prop.visual = "sprite" | |
| 117 | prop.textures = {item_texture} | |
| 118 | prop.visual_size = {x=0.3, y=0.3} | |
| 119 | else | |
| 120 | prop.visual = "wielditem" | |
| 121 | prop.textures = {itemname} | |
| 122 | prop.visual_size = {x=0.15, y=0.15} | |
| 123 | end | |
| 124 | self.object:set_properties(prop) | |
| 125 | end, | |
| 126 | ||
| 127 | get_staticdata = function(self) | |
| 128 | ||
| 129 | return minetest.serialize({ | |
| 130 | itemstring=self.itemstring, | |
| 131 | velocity=self.object:getvelocity(), | |
| 132 | start_pos=self.start_pos | |
| 133 | }) | |
| 134 | end, | |
| 135 | ||
| 136 | on_activate = function(self, staticdata) | |
| 612349 | 137 | -- print (dump(staticdata)) |
| 82cba9 | 138 | if staticdata=="" or staticdata==nil then return end |
| R | 139 | local item = minetest.deserialize(staticdata) |
| 140 | local stack = ItemStack(item.itemstring) | |
| 141 | local itemtable = stack:to_table() | |
| 142 | local itemname = nil | |
| 143 | if itemtable then | |
| 144 | itemname = stack:to_table().name | |
| 145 | end | |
| 146 | ||
| 147 | if itemname then | |
| 148 | self.start_pos=item.start_pos | |
| 149 | self.object:setvelocity(item.velocity) | |
| 150 | self.object:setacceleration({x=0, y=0, z=0}) | |
| 151 | self.object:setpos(item.start_pos) | |
| 152 | end | |
| 153 | self:set_item(item.itemstring) | |
| 154 | end, | |
| 155 | ||
| 156 | on_step = function(self, dtime) | |
| 157 | if self.start_pos then | |
| 158 | local pos = self.object:getpos() | |
| 159 | local node = minetest.env:get_node(pos) | |
| 160 | local meta = minetest.env:get_meta(pos) | |
| 161 | tubelike=meta:get_int("tubelike") | |
| 612349 | 162 | local stack = ItemStack(self.itemstring) |
| R | 163 | local drop_pos=nil |
| 164 | ||
| 82cba9 | 165 | local velocity=self.object:getvelocity() |
| R | 166 | |
| 612349 | 167 | if velocity==nil then print ("wypadl") return end |
| 82cba9 | 168 | |
| R | 169 | if math.abs(velocity.x)==1 then |
| 170 | local next_node=math.abs(pos.x-self.start_pos.x) | |
| 171 | if next_node >= 1 then | |
| 172 | self.start_pos.x=self.start_pos.x+velocity.x | |
| 173 | if check_pos_vector (self.start_pos, velocity)==0 then | |
| 612349 | 174 | if check_next_step (self.start_pos, velocity)==0 then |
| R | 175 | drop_pos=minetest.env:find_node_near({x=self.start_pos.x,y=self.start_pos.y,z=self.start_pos.z+velocity.x}, 1, "air") |
| 176 | if drop_pos then minetest.item_drop(stack, "", drop_pos) end | |
| 177 | self.object:remove() | |
| 178 | end | |
| 82cba9 | 179 | self.object:setpos(self.start_pos) |
| R | 180 | self.object:setvelocity(velocity) |
| 181 | return | |
| 182 | end | |
| 183 | end | |
| 184 | end | |
| 185 | ||
| 186 | if math.abs(velocity.y)==1 then | |
| 187 | local next_node=math.abs(pos.y-self.start_pos.y) | |
| 188 | if next_node >= 1 then | |
| 189 | self.start_pos.y=self.start_pos.y+velocity.y | |
| 190 | if check_pos_vector (self.start_pos, velocity)==0 then | |
| 612349 | 191 | if check_next_step (self.start_pos, velocity)==0 then |
| R | 192 | drop_pos=minetest.env:find_node_near({x=self.start_pos.x+velocity.x,y=self.start_pos.y+velocity.y,z=self.start_pos.z+velocity.z}, 1, "air") |
| 193 | if drop_pos then minetest.item_drop(stack, "", drop_pos) end | |
| 194 | self.object:remove() | |
| 195 | end | |
| 82cba9 | 196 | self.object:setpos(self.start_pos) |
| R | 197 | self.object:setvelocity(velocity) |
| 612349 | 198 | return |
| 82cba9 | 199 | end |
| R | 200 | end |
| 201 | end | |
| 202 | ||
| 203 | if math.abs(velocity.z)==1 then | |
| 204 | local next_node=math.abs(pos.z-self.start_pos.z) | |
| 205 | if next_node >= 1 then | |
| 206 | self.start_pos.z=self.start_pos.z+velocity.z | |
| 207 | if check_pos_vector (self.start_pos, velocity)==0 then | |
| 612349 | 208 | if check_next_step (self.start_pos, velocity)==0 then |
| R | 209 | drop_pos=minetest.env:find_node_near({x=self.start_pos.x+velocity.x,y=self.start_pos.y+velocity.y,z=self.start_pos.z+velocity.z}, 1, "air") |
| 210 | if drop_pos then minetest.item_drop(stack, "", drop_pos) end | |
| 211 | self.object:remove() | |
| 212 | end | |
| 82cba9 | 213 | self.object:setpos(self.start_pos) |
| R | 214 | self.object:setvelocity(velocity) |
| 215 | return | |
| 216 | end | |
| 217 | end | |
| 218 | end | |
| 219 | end | |
| 612349 | 220 | |
| 82cba9 | 221 | end |
| R | 222 | }) |
| 223 | ||
| 224 | ||
| 225 | function check_next_step (pos,velocity) | |
| 226 | local meta | |
| 227 | local tubelike | |
| 228 | ||
| 229 | if velocity.x==0 then | |
| 230 | meta = minetest.env:get_meta({x=pos.x-1,y=pos.y,z=pos.z}) | |
| 231 | tubelike=meta:get_int("tubelike") | |
| 612349 | 232 | if tubelike==1 then velocity.x=-1 velocity.y=0 velocity.z=0 return 1 end |
| 82cba9 | 233 | meta = minetest.env:get_meta({x=pos.x+1,y=pos.y,z=pos.z}) |
| R | 234 | tubelike=meta:get_int("tubelike") |
| 612349 | 235 | if tubelike==1 then velocity.x=1 velocity.y=0 velocity.z=0 return 1 end |
| 82cba9 | 236 | end |
| R | 237 | |
| 238 | if velocity.z==0 then | |
| 239 | meta = minetest.env:get_meta({x=pos.x,y=pos.y,z=pos.z+1}) | |
| 240 | tubelike=meta:get_int("tubelike") | |
| 612349 | 241 | if tubelike==1 then velocity.x=0 velocity.y=0 velocity.z=1 return 1 end |
| 82cba9 | 242 | meta = minetest.env:get_meta({x=pos.x,y=pos.y,z=pos.z-1}) |
| R | 243 | tubelike=meta:get_int("tubelike") |
| 612349 | 244 | if tubelike==1 then velocity.x=0 velocity.y=0 velocity.z=-1 return 1 end |
| 82cba9 | 245 | end |
| R | 246 | |
| 247 | if velocity.y==0 then | |
| 248 | meta = minetest.env:get_meta({x=pos.x,y=pos.y+1,z=pos.z}) | |
| 249 | tubelike=meta:get_int("tubelike") | |
| 612349 | 250 | if tubelike==1 then velocity.x=0 velocity.y=1 velocity.z=0 return 1 end |
| 82cba9 | 251 | meta = minetest.env:get_meta({x=pos.x,y=pos.y-1,z=pos.z}) |
| R | 252 | tubelike=meta:get_int("tubelike") |
| 612349 | 253 | if tubelike==1 then velocity.x=0 velocity.y=-1 velocity.z=0 return 1 end |
| 82cba9 | 254 | end |
| R | 255 | |
| 612349 | 256 | print ("spadl") |
| R | 257 | return 0 |
| 82cba9 | 258 | end |
| R | 259 | |
| 260 | function check_pos_vector (pos,velocity) | |
| 261 | added={} | |
| 262 | added.x=pos.x+velocity.x | |
| 263 | added.y=pos.y+velocity.y | |
| 264 | added.z=pos.z+velocity.z | |
| 265 | local meta=minetest.env:get_meta(added) | |
| 266 | --print(dump(added).." : "..tubelike) | |
| 267 | if meta:get_int("tubelike")==1 then return 1 end | |
| 268 | return 0 | |
| 269 | end | |
| 612349 | 270 | |
| R | 271 | function add_new_TUBE_node (TUBE_nodes,pos1,parent) |
| 272 | local i=1 | |
| 273 | repeat | |
| 274 | if TUBE_nodes[i]==nil then break end | |
| 275 | if pos1.x==TUBE_nodes[i].x and pos1.y==TUBE_nodes[i].y and pos1.z==TUBE_nodes[i].z then return false end | |
| 276 | i=i+1 | |
| 277 | until false | |
| 278 | TUBE_nodes[i]={} | |
| 279 | TUBE_nodes[i].x=pos1.x | |
| 280 | TUBE_nodes[i].y=pos1.y | |
| 281 | TUBE_nodes[i].z=pos1.z | |
| 282 | TUBE_nodes[i].parent_x=parent.x | |
| 283 | TUBE_nodes[i].parent_y=parent.y | |
| 284 | TUBE_nodes[i].parent_z=parent.z | |
| 285 | ||
| 286 | return true | |
| 287 | end | |
| 288 | ||
| 289 | function check_TUBE_node (TUBE_nodes,CHEST_nodes,i) | |
| 290 | local pos1={} | |
| 291 | local parent={} | |
| 292 | pos1.x=TUBE_nodes[i].x | |
| 293 | pos1.y=TUBE_nodes[i].y | |
| 294 | pos1.z=TUBE_nodes[i].z | |
| 295 | parent.x=pos1.x | |
| 296 | parent.y=pos1.y | |
| 297 | parent.z=pos1.z | |
| 298 | new_node_added=false | |
| 299 | ||
| 300 | pos1.x=pos1.x+1 | |
| 301 | check_TUBE_node_subp (TUBE_nodes,CHEST_nodes,pos1,parent) | |
| 302 | pos1.x=pos1.x-2 | |
| 303 | check_TUBE_node_subp (TUBE_nodes,CHEST_nodes,pos1,parent) | |
| 304 | pos1.x=pos1.x+1 | |
| 305 | ||
| 306 | pos1.y=pos1.y+1 | |
| 307 | check_TUBE_node_subp (TUBE_nodes,CHEST_nodes,pos1,parent) | |
| 308 | pos1.y=pos1.y-2 | |
| 309 | check_TUBE_node_subp (TUBE_nodes,CHEST_nodes,pos1,parent) | |
| 310 | pos1.y=pos1.y+1 | |
| 311 | ||
| 312 | pos1.z=pos1.z+1 | |
| 313 | check_TUBE_node_subp (TUBE_nodes,CHEST_nodes,pos1,parent) | |
| 314 | pos1.z=pos1.z-2 | |
| 315 | check_TUBE_node_subp (TUBE_nodes,CHEST_nodes,pos1,parent) | |
| 316 | pos1.z=pos1.z+1 | |
| 317 | return new_node_added | |
| 318 | end | |
| 319 | ||
| 320 | function check_TUBE_node_subp (TUBE_nodes,CHEST_nodes,pos1,parent) | |
| 321 | meta = minetest.env:get_meta(pos1) | |
| 322 | if meta:get_float("tubelike")==1 then add_new_TUBE_node(TUBE_nodes,pos1,parent) return end | |
| 323 | nctr = minetest.env:get_node(pos1) | |
| 324 | if minetest.get_item_group(nctr.name, "tubedevice_receiver") == 1 then add_new_TUBE_node(CHEST_nodes,pos1,parent) return end | |
| 325 | end | |
| 326 | ||
