SHOW:
|
|
- or go back to the newest paste.
| 1 | - | --Zi55cb9y |
| 1 | + | --jxwQsiHD |
| 2 | --(multi) ME Level Emitter using turtle | |
| 3 | --supports custom functions on high or low level, compress cobble is implemented | |
| 4 | --optional different id not a very userful option since it doesnt know how much to drop how often, craft would work better | |
| 5 | ||
| 6 | ||
| 7 | local config = {}
| |
| 8 | local turtlefacing = "south" | |
| 9 | local meside = "south" | |
| 10 | local polltimer = 5 | |
| 11 | - | local compressadjustment = 0.6 |
| 11 | + | |
| 12 | - | local droptosideadjustment = 0.4 |
| 12 | + | |
| 13 | -- edit this function to change your configuration | |
| 14 | -- {"ItemIDToMeasure", "> or <", ThresholdAmount, FunctionToCall, "DropSide/Arg1", "OptionalDifferentItemIDToExport"}
| |
| 15 | -- valid sides are north, south, east, west, up, and down | |
| 16 | ||
| 17 | ||
| 18 | config[1] = {"3:0", ">", 64, dropItemToSide, "up" }
| |
| 19 | config[2] = {"14276:9", "<", 64, dropItemToSide, "north", "8565:0" }
| |
| 20 | config[3] = {"297:0", "<", 64, craftItem, nil, "297:0" }
| |
| 21 | config[4] = {"4:0", ">", 96, compress } --compress cobble
| |
| 22 | config[5] = {"2506:0", ">", 8, compress }
| |
| 23 | config[6] = {"2506:1", ">", 8, compress }
| |
| 24 | - | config[4] = {"2506:0", ">", 8, compress }
|
| 24 | + | config[7] = {"2506:2", ">", 8, compress }
|
| 25 | - | config[4] = {"2506:1", ">", 8, compress }
|
| 25 | + | config[8] = {"2506:3", ">", 8, compress }
|
| 26 | - | config[4] = {"2506:2", ">", 8, compress }
|
| 26 | + | config[9] = {"2506:4", ">", 8, compress }
|
| 27 | - | config[4] = {"2506:3", ">", 8, compress }
|
| 27 | + | config[10] = {"2506:5", ">", 8, compress }
|
| 28 | - | config[4] = {"2506:4", ">", 8, compress }
|
| 28 | + | config[11] = {"2506:6", ">", 8, compress } --up to octuple
|
| 29 | - | config[4] = {"2506:5", ">", 8, compress }
|
| 29 | + | |
| 30 | - | config[4] = {"2506:6", ">", 8, compress } --up to octuple
|
| 30 | + | |
| 31 | -- crafting turtle required to use compress() for compressed cobblestone | |
| 32 | end | |
| 33 | ||
| 34 | ||
| 35 | local me | |
| 36 | local mepull | |
| 37 | local count = 0 | |
| 38 | local stack = {}
| |
| 39 | - | local timeradjustment = 0 |
| 39 | + | |
| 40 | ||
| 41 | function dropItemToSide(info, count) | |
| 42 | local maxreps = 10 | |
| 43 | local chest = peripheral.wrap(info.side) | |
| 44 | - | function dropItemToSide(info, count) |
| 44 | + | |
| 45 | local size = chest.getInventorySize() | |
| 46 | local stacks = chest.getAllStacks() | |
| 47 | local stacksize | |
| 48 | ||
| 49 | stack.id = info.id2 | |
| 50 | stack.dmg = info.dmg2 | |
| 51 | stack.qty = me.countOfItemType(stack.id, stack.dmg) | |
| 52 | if count < stack.qty then stack.qty = count end | |
| 53 | ||
| 54 | while (stack.qty > 0) and (maxreps > 0) do | |
| 55 | maxreps = maxreps - 1 | |
| 56 | stacksize = me.extractItem(stack, mepull) | |
| 57 | - | while (stack.qty > 0) and (polltimer - timeradjustment > 1) do |
| 57 | + | |
| 58 | break | |
| 59 | end | |
| 60 | stack.qty = stack.qty - stacksize | |
| 61 | for slot = 1, size do | |
| 62 | if stacks[slot] == nil or (stacks[slot].id == stack.id and stacks[slot].dmg == stack.dmg) then | |
| 63 | stacksize = stacksize - chest.pullItem(info.pull, 1, stacksize, slot) | |
| 64 | if stacksize <= 0 then | |
| 65 | break | |
| 66 | end | |
| 67 | end | |
| 68 | end | |
| 69 | if stacksize ~= 0 then | |
| 70 | break | |
| 71 | end | |
| 72 | end | |
| 73 | returnInventory() | |
| 74 | - | timeradjustment = timeradjustment + droptosideadjustment |
| 74 | + | |
| 75 | ||
| 76 | function craftItem(info, count) | |
| 77 | stack.id = info.id2 | |
| 78 | stack.dmg = info.dmg2 | |
| 79 | stack.qty = count | |
| 80 | ||
| 81 | local jobs = me.getJobList() | |
| 82 | for k, v in pairs(jobs) do | |
| 83 | if v.id == stack.id and v.dmg == stack.dmg then | |
| 84 | stack.qty = stack.qty - v.qty | |
| 85 | end | |
| 86 | end | |
| 87 | ||
| 88 | me.requestCrafting(stack) | |
| 89 | end | |
| 90 | ||
| 91 | function returnInventory() | |
| 92 | print("Returning Inventory To ME")
| |
| 93 | for slot = 1, 16 do | |
| 94 | if turtle.getItemCount(slot) > 0 then | |
| 95 | me.insertItem(slot, 64, mepull) | |
| 96 | end | |
| 97 | end | |
| 98 | end | |
| 99 | ||
| 100 | local craftingSlot = {1,2,3,5,6,7,9,10,11}
| |
| 101 | function compressSmall(info, count) | |
| 102 | if count < 9 then return end | |
| 103 | if count > 63 then count = 63 end | |
| 104 | count = math.floor(count / 9) | |
| 105 | stack.id = info.id2 | |
| 106 | stack.dmg = info.dmg2 | |
| 107 | stack.qty = count * 9 | |
| 108 | ||
| 109 | me.extractItem(stack, mepull) | |
| 110 | for slot = 2, 9 do | |
| 111 | turtle.transferTo(craftingSlot[slot], count) | |
| 112 | end | |
| 113 | turtle.craft() | |
| 114 | returnInventory() | |
| 115 | end | |
| 116 | ||
| 117 | function compress(info, count) | |
| 118 | if count < 704 then | |
| 119 | compressSmall(info, count) | |
| 120 | end | |
| 121 | stack.id = info.id2 | |
| 122 | stack.dmg = info.dmg2 | |
| 123 | stack.qty = 64 | |
| 124 | ||
| 125 | local maxreps = 10 | |
| 126 | ||
| 127 | while (count >= 704) and (maxreps > 0) do | |
| 128 | - | while (count >= 704) and (polltimer - timeradjustment > 1) do |
| 128 | + | maxreps = maxreps - 1 |
| 129 | for slot = 1, 11 do | |
| 130 | me.extractItem(stack, mepull) | |
| 131 | end | |
| 132 | me.insertItem(4, 64, mepull) | |
| 133 | me.insertItem(8, 64, mepull) | |
| 134 | turtle.craft() | |
| 135 | me.insertItem(1, 64, mepull) | |
| 136 | count = count - 576 | |
| 137 | end | |
| 138 | - | timeradjustment = timeradjustment + compressadjustment |
| 138 | + | |
| 139 | ||
| 140 | local direction = {[0]="east", [1]="south", [2]="west", [3]="north"}
| |
| 141 | local side = {[0]="front", [1]="right", [2]="back", [3]="left"}
| |
| 142 | ||
| 143 | local function sideToDirection(side) | |
| 144 | if side == "front" then | |
| 145 | return direction[turtlefacing%4] | |
| 146 | end | |
| 147 | if side == "right" then | |
| 148 | return direction[(turtlefacing+1)%4] | |
| 149 | end | |
| 150 | if side == "back" then | |
| 151 | return direction[(turtlefacing+2)%4] | |
| 152 | end | |
| 153 | if side == "left" then | |
| 154 | return direction[(turtlefacing+3)%4] | |
| 155 | end | |
| 156 | if side == "top" then | |
| 157 | return "up" | |
| 158 | end | |
| 159 | if side == "bottom" then | |
| 160 | return "down" | |
| 161 | end | |
| 162 | return side | |
| 163 | end | |
| 164 | ||
| 165 | local function directionToSide(dir) | |
| 166 | if dir == "east" then | |
| 167 | return side[(-turtlefacing+4)%4] | |
| 168 | end | |
| 169 | if dir == "south" then | |
| 170 | return side[(-turtlefacing+5)%4] | |
| 171 | end | |
| 172 | if dir == "west" then | |
| 173 | return side[(-turtlefacing+6)%4] | |
| 174 | end | |
| 175 | if dir == "north" then | |
| 176 | return side[(-turtlefacing+7)%4] | |
| 177 | end | |
| 178 | if dir == "up" then | |
| 179 | return "top" | |
| 180 | end | |
| 181 | if dir == "down" then | |
| 182 | return "bottom" | |
| 183 | end | |
| 184 | return dir | |
| 185 | end | |
| 186 | ||
| 187 | local function negateDirection(dir) | |
| 188 | ||
| 189 | if dir == "east" then return "west" end | |
| 190 | if dir == "west" then return "east" end | |
| 191 | if dir == "north" then return "south" end | |
| 192 | if dir == "south" then return "north" end | |
| 193 | if dir == "up" then return "down" end | |
| 194 | if dir == "down" then return "up" end | |
| 195 | return dir | |
| 196 | ||
| 197 | end | |
| 198 | ||
| 199 | local function processConfig() | |
| 200 | local id, dmg | |
| 201 | local pretty = {}
| |
| 202 | ||
| 203 | if turtlefacing == "east" then turtlefacing = 0 end | |
| 204 | if turtlefacing == "south" then turtlefacing = 1 end | |
| 205 | if turtlefacing == "west" then turtlefacing = 2 end | |
| 206 | if turtlefacing == "north" then turtlefacing = 3 end | |
| 207 | ||
| 208 | mepull = negateDirection(meside) | |
| 209 | meside = directionToSide(meside) | |
| 210 | ||
| 211 | for k, v in pairs(config) do | |
| 212 | print("Processing config item " .. k)
| |
| 213 | pretty[k] = {}
| |
| 214 | ||
| 215 | pretty[k].id1, pretty[k].dmg1 = string.match(v[1], "([0-9-]+):([0-9-]+)") | |
| 216 | ||
| 217 | pretty[k].compare = v[2] | |
| 218 | pretty[k].threshold = v[3] | |
| 219 | pretty[k].func = v[4] | |
| 220 | ||
| 221 | pretty[k].pull = negateDirection(v[5]) | |
| 222 | pretty[k].side = directionToSide(v[5]) | |
| 223 | ||
| 224 | if v[6] then | |
| 225 | pretty[k].id2, pretty[k].dmg2 = string.match(v[6], "([0-9-]+):([0-9-]+)") | |
| 226 | else | |
| 227 | pretty[k].id2 = pretty[k].id1 | |
| 228 | pretty[k].dmg2 = pretty[k].dmg1 | |
| 229 | end | |
| 230 | ||
| 231 | pretty[k].id1 = tonumber(pretty[k].id1) | |
| 232 | pretty[k].dmg1 = tonumber(pretty[k].dmg1) | |
| 233 | pretty[k].id2 = tonumber(pretty[k].id2) | |
| 234 | pretty[k].dmg2 = tonumber(pretty[k].dmg2) | |
| 235 | ||
| 236 | if (not pretty[k].id1) or (not pretty[k].dmg1) then | |
| 237 | print("Failed getting ItemID:Metadata on item " .. k)
| |
| 238 | pretty[k] = nil | |
| 239 | else | |
| 240 | ||
| 241 | end | |
| 242 | end | |
| 243 | ||
| 244 | config = pretty | |
| 245 | end | |
| 246 | ||
| 247 | print("Running Setup")
| |
| 248 | setup() | |
| 249 | print("Processing Config")
| |
| 250 | processConfig() | |
| 251 | ||
| 252 | me = peripheral.wrap(meside) | |
| 253 | if me == nil then | |
| 254 | print("ME Controller Not Found")
| |
| 255 | return | |
| 256 | end | |
| 257 | ||
| 258 | turtle.select(1) | |
| 259 | returnInventory() | |
| 260 | ||
| 261 | local hitthreshold = "false" | |
| 262 | while true do | |
| 263 | timeradjustment = 0 | |
| 264 | for k, v in pairs(config) do | |
| 265 | print("Processing Item: " .. k)
| |
| 266 | hitthreshold = "false" | |
| 267 | count = me.countOfItemType(v.id1, v.dmg1) | |
| 268 | ||
| 269 | if v.compare == ">" then | |
| 270 | if count > v.threshold then | |
| 271 | hitthreshold = "true" | |
| 272 | v.func(v, count - v.threshold) | |
| 273 | end | |
| 274 | else | |
| 275 | if count < v.threshold then | |
| 276 | hitthreshold = "true" | |
| 277 | v.func(v, v.threshold - count) | |
| 278 | end | |
| 279 | end | |
| 280 | print(v.id1 .. ":" .. v.dmg1 .. " " .. v.compare .. " " .. v.threshold .. " = " .. hitthreshold) | |
| 281 | ||
| 282 | end | |
| 283 | sleep(polltimer) | |
| 284 | end |