Advertisement
Guest User

chopOne

a guest
Apr 20th, 2019
113
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.40 KB | None | 0 0
  1. function unload()
  2.     turtle.back()
  3.     for i = 3, 16 do
  4.         turtle.select(i)
  5.         turtle.dropDown()
  6.     end
  7.     turtle.select(1)
  8.     turtle.forward()
  9. end
  10.  
  11. function checkFull()
  12.     if turtle.getItemCount(16) > 0 then
  13.         unload()
  14.     end
  15. end    
  16.  
  17. function move()
  18.     turtle.dig()
  19.     turtle.forward()
  20. end
  21.  
  22. function chopUp()
  23.     while turtle.detectUp() do
  24.         turtle.digUp()
  25.         turtle.up()
  26.     end
  27. end
  28.  
  29. function backDown()
  30.     while not turtle.detectDown() do
  31.         turtle.down()
  32.     end
  33.     turtle.back()
  34. end
  35.  
  36. function placeSapling()
  37.     turtle.select(2)
  38.     turtle.place()
  39.     turtle.select(1)
  40. end
  41.    
  42. function reUp()
  43.     if turtle.getItemCount(1) == 0 then
  44.         turtle.select(1)
  45.         turtle.suckDown()
  46.     elseif turtle.getItemDetail(1).name ~= "minecraft:dye" then
  47.         turtle.select(1)
  48.         turtle.drop()
  49.         turtle.suckDown()
  50.     end
  51. end
  52.  
  53. function treeGrew()
  54.     local success, data = turtle.inspect()
  55.     if success then
  56.         if data.name == "ic2:rubber_wood" or data.name == "minecraft:log"then
  57.             return true;
  58.         else
  59.             return false;
  60.         end
  61.     end
  62. end
  63.  
  64. function growTree()
  65.     repeat
  66.         reUp()
  67.         turtle.place()
  68.     until treeGrew()        
  69. end
  70.        
  71.  
  72. while true do
  73.     growTree()
  74.     move()
  75.     chopUp()      
  76.     backDown()
  77.     checkFull()
  78.     placeSapling()
  79. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement