Advertisement
bob558

Karyer 10x10

Jul 10th, 2015
224
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --Я написал небольшой и простой код для робота.
  2. --Его задача копать 10х10 карьер до бедрока.
  3. --Выбрасивает мусор когда пройдёт 10 столбов.
  4. --В 1,2,3 слот нужно положить то что робот будет выкидывать. Иначе если попадёт туда руда он будет и её выбрасывать.
  5. --(песок, булыжник, гравий, землю) любо что но главное что бы первые 3 слота были заполнены.
  6. -- http://computercraft.ru/topic/832-robot-shakhtyor/
  7.  
  8. --======http://computercraft.ru,  2015. zed(c) =====
  9. robot = require("robot")
  10. d = 1
  11. print("На какой высоте стоит робот")
  12. a = io.read()
  13.  
  14.  
  15. function stolb()
  16.     for i = 1, a - 6 do
  17.         robot.swingDown()
  18.         robot.down()
  19.     end
  20.     for i = 1, a - 6 do
  21.         robot.up()
  22.     end
  23. end
  24.  
  25. function povorot()
  26.     if d == 1
  27.         then    robot.turnLeft()    robot.swing()   robot.forward() robot.turnLeft() robot.swing() robot.forward() d = d + 1
  28.         else    robot.turnRight()   robot.swing()   robot.forward() robot.turnRight() robot.swing() robot.forward() d = d - 1
  29.     end
  30. end
  31.  
  32. function mysor()
  33.     for i = 1, 3 do
  34.         robot.drop(robot.count()-1)
  35.         for j = 4, 16 do
  36.             robot.select(j)
  37.             if robot.compareTo(i) == true then robot.drop()
  38.             end    
  39.         end
  40.     end
  41. end
  42.  
  43. function put()
  44.     for f = 1, 10 do
  45.         for i = 1, 10 do
  46.             stolb()
  47.             robot.swing()
  48.             robot.forward()
  49.         end
  50.         mysor()
  51.         povorot()
  52.     end
  53. end
  54.  
  55. put()
Advertisement
Advertisement
Advertisement
RAW Paste Data Copied
Advertisement