local engine = require("/packages/movementEngineMk2/movementEngine") local structPrint = require("/packages/turtleFunctions/print") local blueprints = require("/packages/blueprints/blueprints") local client = require("packages/rotnetz/Client")() local new_host = require("/packages/rotnetz/Host") --util funcs local function find(item) for i = 1,16 do local detail = turtle.getItemDetail(i) if detail then if detail.name == item then return i end end end end local function equip(item) if turtle.getEquippedLeft().name == item then return true end turtle.select(find(item)) turtle.equipLeft() return true end local function dumpUneeded() for i = 1,16 do local item= turtle.getItemDetail(i) if item then local name = item.name if not (name == "computercraft:wireless_modem_advanced" or name == "minecraft:diamond_pickaxe" or name == "minecraft:daylight_detector") then turtle.select(i) turtle.dropDown() end end end end local function openRednet() equip("computercraft:wireless_modem_advanced") rednet.open("left") end local function equipPickaxe() equip("minecraft:diamond_pickaxe") end local function equipSolar() equip("minecraft:daylight_detector") end local function solar() equipSolar() while not (turtle.getFuelLevel() == turtle.getFuelLimit()) do sleep(60) end openRednet() end --engine config local function down() while turtle.detectDown() do sleep(1) end while not turtle.down() do sleep(1) end end engine.down= down local function up() while turtle.detectUp() do sleep(1) end while not turtle.up() do sleep(1) end end engine.up= up local function forward() while turtle.detect() do sleep(1) end while not turtle.forward() do sleep(1) end end engine.forward= forward local function makeEngineSafe() engine.down= down engine.up= up engine.forward= forward end local function unsafeDown() while turtle.detectDown() do turtle.digDown() end turtle.down() end local function unsafeUp() while turtle.detectUp() do turtle.digUp() end turtle.up() end local function unsafeForward() while turtle.detect() do turtle.dig() end turtle.forward() end local function makeEngineUnsafe() charge_while_move = false engine.down = unsafeDown engine.up = unsafeUp engine.forward = unsafeForward end --initial setup openRednet() local homex,homey,homez = gps.locate() while homex == nil do sleep(20) homex,homey,homez=gps.locate() end engine.setCenter(-homex,-homey,-homez) --setup end local function get_travel_height(x,z) local cx = x-engine.x local cz = z-engine.z if cx<0 and cz<0 then return 0 elseif cx>0 and cz<0 then return 2 elseif cx>0 and cz>0 then return 4 else return 6 end end local function get_item_provider(item) local responses =client.broadcast("hasItems",item,"provider",5) for n,i in pairs(responses) do if i.message.status then return true,i.message end end return false,("no providers for "..item) end local function long_distance_travel(x,y,z) makeEngineSafe() local travel_height = 200 + get_travel_height(x,z) print(travel_height) engine.absMove(nil,travel_height,nil) engine.absMove(x,nil,z) engine.absMove(nil,y,nil) end --item recovery local function get_item(item,number) print("getting item"..item) local succ,prov = get_item_provider(item) if succ then long_distance_travel(prov.x,prov.y,prov.z) for i = 1,number do turtle.suckDown(1) end engine.move(1,0,0) else error("no providers for item" ..item) end end local function dump(item) slot = find(item) while slot do turtle.select(slot) turtle.dropDown() slot = find(item) end end local function provide(item,number,x,y,z) get_item(item,number) long_distance_travel(x,y,z) dump(item) end -- --item recovery end --printing buildings local function get_items(blueprint,virt) for n,i in pairs(blueprint.countBlocks()) do get_item(n,i*virt) end end local function printBuilding(params) local blueprint = blueprints.createBlueprint(params.savetable) get_items(blueprint,params.virt) long_distance_travel(params.x,params.y+10,params.z) equipPickaxe() makeEngineUnsafe() engine.absMove(params.x,params.y,params.z) engine.setCenter(nil,nil,nil,params.angle) local function outOfBlockError(name) print("out of block "..name) error("out of block "..name) end structPrint(engine,blueprint,params.virt or 1,outOfBlockError) engine.popCenter() end --util turtleFunction local function select_correct(item) local slot = turtle.getItemDetail(turtle.getSelectedSlot()) if not slot then turtle.select(find(item)) elseif not (slot.name == item) then turtle.select(find(item)) end end local function get_place_func(item) local function place() turtle.digDown() select_correct(item) turtle.placeDown() end return place end local function doNothing() end local function lineMove(engine,x,func) func() if x < 0 then for xp = 1,math.abs(x) do engine.move(-1,0,0) func() end else for xp = 1,x do engine.move(1,0,0) func() end end end local function flatGridMove(engine,x,z,func) engine.faceAngle(0) local zp = 0 while zp < z do lineMove(engine,x,func) zp = zp+1 if zp 1 do engine.popCenter() end if not (ox == engine.x and oy == engine.y and oz == engine.z) then long_distance_travel(homex,homey,homez) engine.faceAngle(0) dumpUneeded() end if engine.angle ~= 0 then engine.faceAngle(0) end openRednet() end end start_host_loop()