Fulgar

ComputerCraft - Escavator

Apr 22nd, 2015
208
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- imposto le variabili di base chiedendole all'utente
  2. print("Larghezza")
  3. local w = tonumber(read())
  4.  
  5. print("Altezza")
  6. local h = tonumber(read())
  7.  
  8. print("Lunghezza")
  9. local len = tonumber(read())
  10.  
  11. -- creo una variabile per la turtle, serve solo a non scrivere ogni volta 'turtle'
  12. local t = turtle
  13.  
  14. -- ricarico carburante
  15. t.refuel()
  16.  
  17. -- ripeto l'operazione per tutta la larghezza
  18. for iw=1,w do
  19.     -- ripeto l'operazione per tutta l'altezza
  20.     for ih=1,h do
  21.         -- scavo per tutta la lunghezza scelta
  22.         for il=1,len do
  23.             t.dig()
  24.             sleep(.5)
  25.             t.forward()
  26.         end
  27.  
  28.         -- inverto il senso
  29.         t.turnRight()
  30.         t.turnRight()
  31.  
  32.         -- ritorno indietro fino all'inizio
  33.         for il=1,len do
  34.             t.forward()
  35.         end
  36.        
  37.         -- inverto il senso (si rimette come all'inizio)
  38.         t.turnRight()
  39.         t.turnRight()
  40.  
  41.         -- se devo ancora salire, scavo 1 sopra e salgo...
  42.         if ih < h then
  43.             t.digUp()
  44.             sleep(.5)
  45.             t.up()
  46.         else
  47.             -- ...altrimenti torno alla "quota" base
  48.             for ih2=1,(h - 1) do
  49.                 t.down()
  50.             end
  51.         end
  52.     end
  53.  
  54.     -- mi posiziono davati la prossima linea
  55.     t.turnRight()
  56.     t.dig()
  57.     t.forward()
  58.     t.turnLeft()
  59. end
Add Comment
Please, Sign In to add comment