Laringe

Server CC Quarry

Oct 7th, 2013
82
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.36 KB | None | 0 0
  1. rednet.open("right")
  2. local down = {}
  3. local up = {}
  4. local forward = {}
  5. local tArgs = {...}
  6.  
  7. function findTurtle()
  8.   local gotMsg = true
  9.   local id, msg, dist
  10.   rednet.broadcast("checkIn")
  11.   while gotMsg do
  12.     id,msg,dist = rednet.receive(1)
  13.     if msg == "down" then
  14.       print(id..":"..msg)
  15.       down[#down+1] = id
  16.     elseif msg == "up" then
  17.       print(id..":"..msg)
  18.       up[#up+1] = id
  19.     elseif msg == "forward" then
  20.       print(id..":"..msg)
  21.       forward[#forward+1] = id
  22.     elseif msg == "Done" then
  23.     else
  24.       print("Done")
  25.       gotMsg = false
  26.     end
  27.   end
  28. end
  29.  
  30. function minerGo()
  31. local yCoord = 128
  32. local xCoord = 0
  33.   for x,y in pairs(down) do
  34.     while yCoord > 2 do
  35.       rednet.send(y, "down")
  36.       sleep(1)
  37.       yCoord = yCoord - 1
  38.     end
  39.     moveLoader()
  40.   end
  41. end
  42.  
  43. function moveLoader()
  44. local yCoord = 2
  45.   for x,y in pairs(up) do
  46.     while yCoord < 128 do
  47.       rednet.send(y, "up")
  48.       sleep(1)
  49.       yCoord = yCoord + 1
  50.     forward()
  51.     end
  52.   end
  53. end
  54.  
  55. function forward()
  56. local xcoord = 3
  57.   for x,y in pairs(forward) do
  58.     while x > -0 do
  59.       rednet.send(y, "forward")
  60.       sleep(1)
  61.       xcoord = xcoord - 1
  62.     end
  63.   end
  64. end
  65.  
  66. findTurtle()
  67. if tArgs[1] == nil then tArgs[1] = 1 end
  68. for i = 1,tArgs[1] do
  69.   print("interation: "..tostring(i).." of "..tostring(tArgs[1]))
  70.   minerGo()
  71. end
Advertisement
Add Comment
Please, Sign In to add comment