View difference between Paste ID: QSkT1bKD and hMzKGbj1

-function findStartingPosition()
+--[[
-  print("Running findStartingPosition...")
+--
-  repeat
+-- There are config variables below.
-    if turtle.detectDown() == false then
+--
-      turtle.down()
+-- Modified to use a file to
 -- 'remember' what action it was doing
-  until turtle.detectDown() == true
+-- when the world stopped existing.
-  repeat
+--
-    if turtle.detectDown() == true then
+-- Fair warning, I have not tested
-      turtle.forward()
+-- this code.
 --
-    isBlockFront, whatBlockFront = turtle.inspect()
+-- Also, you should really make things
-  until whatBlockFront.name == "minecraft:chest"
+-- local, it keeps the computer global
 -- memory cleaner.
 --
-function goToLava()
+-- 39 characters are not enough width.
-  print("Running Go To Lava...")
+-- http://computercraft.info/wiki/Resolution#Turtle_resolution
-  repeat
+--
-    turtle.down()
+-- I've practically rewritten this
-    isBlockDown, whatBlockDown = turtle.inspectDown()
+-- entirely, feel free to not use it
-  until whatBlockDown.name == "minecraft:log"
+-- because of this.
-  repeat
+--
-    turtle.forward()
+-- If you need me to explain the code
-    isBlockFront, whatBlockFront = turtle.inspect()
+-- then feel free to ask me to do so.
-  until whatBlockFront.name == "minecraft:chest"
+--
 -- Lupus590
 --
 -- P.S. I'm part way through this
-function goToSurface()
+-- rewrite and I'm realising that I
-  print("Running goToSurface...")
+-- may be doing a lot of tricks which
-    repeat
+-- you may not know about, I've tried
-    turtle.back()
+-- my best to comment regularly.
-    isBlockDown, whatBlockDown = turtle.inspectDown()
+--
-  until whatBlockDown.name == "minecraft:log"
+-- P.P.S. You have some odd logic.
-  repeat
+--
 -- ]]
-    isBlockFront, whatBlockFront = turtle.inspect()
+--[[ multi line comment
-  until whatBlockFront.name == "minecraft:chest"
+I've done it oddly above as I believe
 ComputerCraft reacts funny.
 It might only be the syntax highlighter
-function pickupLavaBuckets()
+that goes funny, which this would
-  print("Running pickupLavaBuckets...")
+demonstrate if on an advanced system. ]]
-  repeat
+
-    os.sleep(2)
+
-    full = 1
+
-    for i = 1,16 do
+------------
-      turtle.select(i)
+-- Config --
-      turtle.suck()
+------------
-      if turtle.getItemCount() < 1 then
+
-        full = 0
+local targetFuelLevel = 1000
   -- turtle will try to keep at this fuel level by using lava
   -- increase if turtle runs out of fuel and has no lava
-  until full == 1
+  -- decrease if it keeps drinking it all
 
 local stateFileName = "lavaElelvatorState"
-function dropLavaBuckets()
+
-  print("Running dropLavaBuckets...")
+----------
-  repeat
+-- Code --
-    isBlockFront, whatBlockFront = turtle.inspect()
+----------
-    print("No Chest Found")
+
-    os.sleep(1)
+local currentState
-  until whatBlockFront.name == "minecraft:chest"
+local state = {}
-  repeat
+state.descend = "descend"
-    empty = 1
+state.goToLava = "goToLava"
-    print("Empty = 1")
+state.getLava = "getLava"
-    for i = 1,16 do
+state.goToShaftBottom = "goToShaftBottom"
-      turtle.select(i)
+state.ascend = "ascend"
-      if turtle.getItemCount() > 0 then
+state.giveLava = "giveLava"
-        slotInfo = turtle.getItemDetail()
+local action = {} -- corresponds to the states above
-        if (slotInfo.name == "minecraft:lava_bucket") or (slotInfo.name == "minecraft:bucket") then
+action.descend
-          turtle.drop()
+action.goToLava
-          empty = 0
+action.getLava
-          print("empty = 0")
+action.goToShaftBottom
-        end
+action.ascend
 action.giveLava
 
-  until empty == 1
+
 local function findResumeActions() -- figures out what the turtle was doing before chunk unload so that the turtle can continue efficiently
   -- print("Running findResumeActions...")
 
-while 0==0 do
+  -- resume sequence { action.descend, action.goToLava, action.getLava, action.goToShaftBottom, action.ascend,  action.giveLava}
-  findStartingPosition()
+
-  pickupLavaBuckets()
+  if fs.exists(stateFileName) then
-  goToSurface()
+    local stateFile = fs.open(stateFileName, "r")
-  dropLavaBuckets()
+    currentState = stateFile.readLine()
-  goToLava()
+    stateFile.close()
     if currentState == state.descend then
       return "continue" -- default actions are fine
 
     elseif currentState == state.goToLava then
       return {action.goToLava, action.getLava, action.goToShaftBottom, action.ascend, action.giveLava}
 
     elseif currentState == state.getLava then
       return {action.getLava, action.goToShaftBottom, action.ascend, action.giveLava}
 
     elseif currentState == state.goToShaftBottom then
       return {action.goToShaftBottom, action.ascend, action.giveLava}
 
     elseif currentState == state.ascend then
       return {action.ascend, action.giveLava}
 
     elseif currentState == state.givLava then
       return {action.giveLava}
 
     else
       error("Unexpected value in file: "..stateFileName)
     end
   end
 
 
   print("Could not find file: "..stateFileName)
   print("Assistance required to start")
   print("Please place turtle to the shaft bottom and then restart this program")
   print("If the turtle is already there then type in 'Y', any other input will quit this program")
 
   if string.lower(read()) == "y" then
     return "continue"
   else
     return "quit"
   end
 end
 
 local function saveState(state)
   local stateFile = fs.open(stateFileName, "w")
   stateFile.writeLine(state) -- could error here if for some reason the file can't be opened
   stateFile.close()
   --print("state saved")
 end
 
 local function selectEmptySlot()
   for i = 1, 16 do
     turtle.select(i)
     if turtle.getItemCount() == 0 then
       return true
      end
   end
   return false -- could not find an empty slot
 end
 
 local function checkFuel() -- true = lava used
   local currentSlot = 1
   local drank = false
   while turtle.getFuelLevel < targetFuelLevel do
     turtle.select(currentSlot)
     if not turtle.refuel(1) then -- if we can't refuel from it
       if currentSlot ~= 16 then
         currentSlot = currentSlot + 1 -- select the next slot
       else
         break -- exit the while loop as we have ran out of slots to try to refuel from
       end
     else
       drank = true -- we refuelled from something
     end
   end
   return drank
 end
 
 function action.descend()
   --print("Running action.descend...")
   saveState(state.descending)
   while turtle.down() do -- if we can go down then we do, otherwise we must be at the bottom
     -- would check fuel but no lava on board so we are stuck anyway
   end
 end
 
 
 function action.goToLava()
   --print("Running action.goToLava...")
   saveState(state.goToLava)
   while turtle.forward() do
     -- would check fuel but no lava on board so we are stuck anyway
   end
 end
 
 
 function action.getLava()
   --print("Running action.getLava...")
   saveState(state.getLava)
   -- drop off empty buckets
   for i = 1,16 do
     turtle.select(i)
     local _, item = turtle.getItemDetail()
     if item.name = "minecraft:bucket" then
       turtle.drop()
     end
   end
 
   -- pick up full buckets
   while selectEmptySlot() do
     turtle.suck()
 
     -- check that the item we got is not an empty bucket
     local _, item = turtle.getItemDetail()
     if item.name = "minecraft:bucket" then
       turtle.drop() -- if it is an empty bucket, put it back
       sleep(10) -- sleep a bit so the other turtle has time to fill the bucket
     end
 
     -- let's check our fuel while we have lava near us
     if checkFuel() then
       -- we just refuelled, may as well replace the empty bucket/s while we are here
       return action.getLava() -- trick: by returning we don't use another 'slot' on the function stack
     end
   end
 end
 
 
 function action.goToShaftBottom()
   --print("Running action.goToShaftBottom...")
   saveState(state.goToShaftBottom)
   checkFuel()
   while turtle.back() do
     checkFuel() -- have lava, don't want to get stuck
   end
 end
 
 
 function action.ascend()
   --print("Running action.ascend...")
   saveState(state.ascend)
 
   local _, blockInFront = turtle.inspect()
   local foundChest = blockInFront == "minecraft:chest" -- this should work
   while not foundChest do
     checkFuel()
     turtle.up()
     _, blockInFront = turtle.inspect() -- reusing the old variables
     foundChest = blockInFront == "minecraft:chest"
   end
 end
 
 function action.giveLava()
  --print("Running action.giveLava...")
   saveState(state.giveLava)
 
   checkFuel() -- just before we do, lets be a selfish turtle
 
   -- drop off full buckets
   for i = 1,16 do
     turtle.select(i)
     local _, item = turtle.getItemDetail()
     if item.name = "minecraft:lava_bucket" then
       turtle.drop()
     end
   end
 
   -- pick up empty buckets
   while selectEmptySlot() do
     turtle.suck()
     -- check that the item we got is not a full bucket
     local _, item = turtle.getItemDetail()
     if item.name = "minecraft:lava_bucket" then
       turtle.drop() -- if it is a full bucket, put it back
       sleep(10) -- sleep a bit so the quarry has time to drink
     end
   end
 end
 
 
 ------------------
 -- Main Program --
 ------------------
 
 
 local resumeActions = findResumeActions() -- returns a table (usually)
 if type(resumeActions) == "table" and #resumeActions > 0 then -- is it a table and does it have stuff in
   for _,v in ipairs(resumeActions) do -- go through each key in the table and put the value in v
     v() -- the value should be a function, run it. If it ends up not being a function the script will error here
   end
 elseif type(resumeActions) == "string"
   if resumeActions == "quit" then
     return
   elseif resumeActions == "continue" then
     -- continue to while true loop
   else
     error("Unexpected string from findResumeActions")
   end
 else
   error("Unexpected return value from findResumeActions")
 end
 
 while true do
   action.descend()
   action.goToLava()
   action.getLava()
   action.goToShaftBottom()
   action.ascend()
   action.goToQuarry()
   action.giveLava()
   action.goToShaftTop()
 end