Pampour

[ComputerCraft] Quarry: Central Computer

Apr 28th, 2013
237
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.23 KB | None | 0 0
  1. print(os.computerID())
  2.  
  3. xStart = 297
  4. zStart = -1580
  5.  
  6. xEnd = 232
  7. zEnd = -1539
  8.  
  9. qDist = 11
  10. jobAvailable = true
  11.  
  12. xNextJob = xStart
  13. zNextJob = zStart
  14. yNextJob = 65
  15.  
  16. rednet.close("left")
  17. rednet.open("left")
  18.  
  19. function setNextJob()
  20.   xNextJob = xNextJob-qDist
  21.   if xNextJob < xEnd then
  22.     xNextJob = xStart
  23.     zNextJob = zNextJob+qDist
  24.     if zNextJob > zEnd then
  25.       jobAvailable = false
  26.     end
  27.   end
  28. end
  29.  
  30. -- Use this if you're facing north:
  31. --  zNextJob = zNextJob-qDist
  32. --  if zNextJob > zEnd then
  33. --    zNextJob = zStart
  34. --    xNextJob = xNextJob - qDist
  35. --    if xNextJob < xEnd then
  36. --      jobAvailable = false
  37. --    end
  38. --  end
  39. --end
  40.  
  41. while jobAvailable do
  42.   print("Waiting for quarry turtle")
  43.   id, message, dist = rednet.receive()
  44.  
  45.   print("Turtle "..id.." needs a job")
  46.  
  47.   if message == "getJob" then
  48.     print("Job available at "..xNextJob.." "..zNextJob)
  49.     rednet.send(id, "yes")
  50.    
  51.     rednet.send(id, tostring(xNextJob))
  52.     rednet.send(id, tostring(zNextJob))
  53.     rednet.send(id, tostring(yNextJob))
  54.    
  55.     setNextJob()
  56.   end
  57. end
  58. print("No jobs available")
  59. while true do
  60.   id, message, dist = rednet.receive()
  61.   if message == "getJob" then
  62.     rednet.send(id, "no")
  63.   end
  64. end
Advertisement
Add Comment
Please, Sign In to add comment