View difference between Paste ID: XNFp9bVn and iQJHJfi4

-local ae = peripheral.find("tileinterface")
+--# Program Config
 local turtleFromDrawerDirection = "north"
-local a  = peripheral.find("tt_aspectanlyzer")
+local turtleFromChestLocation = "south"
-local c  = peripheral.find("chest") or peripheral.find("iron")
+
 local programRestartInterval = 1.00             -- Program run interval
-for i,v in pairs(d) do
+local maxEssentiaAmount = 2000
-  print(i)
+local maxEssentiaAmountMessages = false
 
 --### ONLY MODFIY BELOW IF YOU KNOW WHAT YOU ARE DOING
-local items = {}
+---------------------------------------------------------------------------------------------------------------
 --### Static list of items containing specific essentia
-for i,v in pairs(items) do
+local itemHashList = {
-  for z,t in pairs(v) do
+  -- Etheal Essence
-    write(z)
+  ["f36968d453592c101629ff03dbbfee26"] = "machina",
-    write(" : ")
+  ["d5a708b5e6cf0f421e7dc9355d304dae"] = "ira",
-    print(t)
+  ["9124a2acb4161cb0484ccc06924c8e5c"] = "vinculum",
   ["69f0f950fc1af7fe3b5cd76b96fe2a12"] = "tempus",
-  print("---")
+  ["951cbfb1ee185cc2a0db21a7ee5c4658"] = "herba",
-  for z,t in pairs(v["fingerprint"]) do
+  ["2e0923f828ce335b6356bf1fde489986"] = "instrumentum",
-    write(z)
+  ["404d0f64c5aeb1fecc174850bf606a0f"] = "arbor",
-    write(" : ")
+  ["aa7b17df81fa0be6959f653e259d6a49"] = "meto",
-    print(t)
+  ["6a7f52f93c5b4558bdbfe12e52ea0209"] = "fabrico",
   ["7168677549d5906cd2fee78349113047"] = "invidia",
-  return
+  ["74d6ce35611a333020364e921b5864bf"] = "pannus",
---  print(v["fingerprint"]["id"])
+  ["2cf039eb58826a770024b859478bdf13"] = "desidia",
-end
+  ["50a0d85a9992ecdb9efce7d8a5fc7b15"] = "vitium",
   ["1100f8a3629369e4bd219f2b30d978ac"] = "messis",
   ["4b3878326e97bda1f0c8f02d43e1f724"] = "limus",
   ["3306eb2763dcd8bee9f4e77aa3a916bc"] = "perfodio",
   ["4058af44332d4a3c020ba28595eafe09"] = "tempestas",
   ["33992e4570fb0c5a46061cfe0a0f1550"] = "volatus",
   ["1e995bd21733e006a757af6511adeb14"] = "motus",
   ["c1266ba6956c8507b976ed0af0fe921c"] = "tenebrae",
   ["2d46425f72b47ee82e008df41fe44ff0"] = "fames",
   ["62ab1d0d4ce536081358faa06507f2a8"] = "superbia",
   ["d428fcfe78d4f204a1b7d7c88c597f4d"] = "lucrum",
   ["8e8405341043a4dc957058fea34f7fde"] = "gula",
   ["96e68bba97a9197b08e8b218f89f6cd1"] = "praecantatio",
   ["4b753601ce070e02ae12c0744afa8b01"] = "sensus",
   ["cc1b1319bed11adb3fb1133cfce0a9fc"] = "auram",
   ["c22f882f5d3ad66818112f7e109ed065"] = "humanus",
   ["1490e650a531f04fb231561dfb3cbc1c"] = "vacuos",
   ["b30a393ba36c2914da2124e0c15ba6c6"] = "metallum",
   ["651ed7f8722d8528927ffeb78c3b36af"] = "lux",
   ["503677942dd95011d466c40d7b305e4e"] = "mortuus",
   ["ef0a022b50093731e91c1775e9a6b2c4"] = "telum",
   ["552c659fd588d96f66fd2ad07a4948c6"] = "luxuria",
   ["b39c13da67e0f8fc6a1b415281dc1eb7"] = "tutamen",
   ["76fca4fc64045eb94d1e8eb9ef6d5721"] = "infernus",
   ["f37ca1c21238fb6d1a803ff3697bae37"] = "iter",
   ["6e496450ecf5f1366f504787abc1a7ce"] = "exanimis",
   ["ec96883e36124223662ee4b55e00ac43"] = "alienis",
   ["1af1aa4c0de6f05411c2921f8ea49ada"] = "cognitio",
   ["2e3aaf69f3b0eb9dc91d649ebfd7a6d6"] = "ordo",
   ["dfb1cc975c8f94b2743ac3d5271869a1"] = "potentia",
   ["665401c955afa0b1d77a63a9b8421b37"] = "perditio",
   ["69e96cbd20cf95621d1194fe3b700c5b"] = "permutatio",
   ["8bd1142ca027f3f3f2a7ea86420a4be7"] = "spiritus",
   ["fa69d331cb2d38384e02086c506eaa43"] = "bestia",
   ["dccfa897b53c2b437372cbb24c6e09b3"] = "sano",
   ["fc82a45802f77b91a76fa9f951de83bd"] = "corpus",
   ["c633bfdcd33be5dd1a75f6aff84d2ecf"] = "ignis",
   ["46239a9297df5f8f6b074e3735706db6"] = "victus",
   ["1cb399bc43c8bc3b7a6e53ee7c4b2652"] = "aqua",
   ["2ec178e9e6aa8958d7df1af5d3203999"] = "venenum",
   ["964fdc73a1032004ae92c5faaff017f0"] = "aer",
   ["7e83cd135885aa779957eda2a7f0778c"] = "gelum",
   ["f85a995d3cb9a4f606140f2191a5afc6"] = "terra",
   ["b9f3d17344cf347090104b28d49cfce0"] = "vitreus",
 }
 ---------------------------------------------------------------------------------------------------------------
 --### Helper Functions
 
 function firstCharacterUpperCase(str)
   return str:sub(1,1):upper()..str:sub(2)
 end
 
 function itemInfo(item,slot)
   moveFromDrawerToChest(slot,1)
   for i,v in pairs(item) do
     write(i)
     write(":")
     print(v)
   end
 end
 
 --### Helper Functions
 ---------------------------------------------------------------------------------------------------------------
 --### EssentiaProvider Functions
 local ep = peripheral.find("EssentiaProvider")
 local essentiaAmount = {}
 
 if not ep then
   error("\n\nNo EssentiaProvider detected.\nPlace on any side.")
 end
 
 function checkEssentiaProvider()
   if not ep.isOnline() then
     error("\n\nEssentiaProvider offline.")
   end
 end
 
 function prepareEssentiaProvider()
   checkEssentiaProvider()
   local success = ep.registerAsWatcher()
   write("registerAsWatcher() ")
   if success then
     print("done")
   else
     print("failed")
   end
 end
 
 function updateEssentiaAmounts()
   checkEssentiaProvider()
   essentiaAmount = {}
   local tmpLevel = {ep.getAspects()}
 
   for i=1,#tmpLevel,2 do
     e = tmpLevel[i]
     n = tmpLevel[i+1]
     essentiaAmount[e:lower()] = n
   end
 end
 
 function getEssentiaAmount(essentia)
   updateEssentiaAmounts()
   return essentiaAmount[essentia] or 0
 end
 
 function testEssentia(essentia)
   if essentia then
     print(firstCharacterUpperCase(essentia)..":"..getEssentiaAmount(essentia))
   end
 end
 --### EssentiaProvider Functions
 ---------------------------------------------------------------------------------------------------------------
 --### Drawer Functions
 local d  = peripheral.find("storagedrawers_container_controller")
 local items = {}  -- knows which slot to use for which essentia type
 
 if not d then
   error("\n\nNo drawer controller detected.\nPlace on any  side.")
 end
 
 function scanDrawerInventory()
   slots = {}
   for slot=1, d.getInventorySize() do                                                -- run through every slot in drawer
     local item = d.getStackInSlot(slot)                                              -- get ItemInformation
     if item then                                                                     -- item in slot ?
       local hash = item["nbt_hash"]                                                  -- get its hash
       local a = itemHashList[hash]                                                   -- get essence for that hash
 
       if a then                                                                      -- hash in itemHashList?
         local tmp = {["slot"] = slot}
         items[a] = tmp
       else
         print(item["id"].." not in itemHashList !!!")                                -- that item is not in itemHashList
         itemInfo(item,slot)
       end
     end
   end
 end
 
 function getSlotOfAspectItem(aspect)
   return items[aspect]["slot"] or -1
 end
 
 function getAmountOfAspectItem(aspect)
   return d.getStackInSlot(items[aspect]["slot"])["qty"] or 0
 end
 
 --### Drawer Functions
 ---------------------------------------------------------------------------------------------------------------
 --### Chest Functions
 local c  = peripheral.find("chest") or peripheral.find("iron") or peripheral.find("crystal")
 
 if not c then
   error("\n\nNo output chest detected.\nPlace on any  side.")
 end
 
 function allFromTurtleToChest()
   for i=1,16 do
     c.pullItem(turtleFromChestLocation,i)
   end
 end
 
 function fromTurtleToChest(slot)
   c.pullItem(turtleFromChestLocation,slot)
 end
 --### Chest Functions
 ---------------------------------------------------------------------------------------------------------------
 --### Program Functions
 function moveFromDrawerToChest(slot, nrOfItems)
   d.pushItem(turtleFromDrawerDirection, slot, nrOfItems)
   --allFromTurtleToChest()
   fromTurtleToChest(1)
 end
 
 function refillEssentia(aspect, amount)
   local essentiaPerItem = 2                                 -- 2 hardcoded for etheral essence
   local nrOfItems = math.ceil(amount/essentiaPerItem)
   --print("Try refilling "..amount.." "..firstCharacterUpperCase(aspect).." with "..nrOfItems.." items.")
   print("Try refilling "..amount.." "..firstCharacterUpperCase(aspect))
 
   local slot = getSlotOfAspectItem(aspect)
   local stored = getAmountOfAspectItem(aspect)
   if slot ~= nil then
     if stored < nrOfItems then
       print("Too less items to restore all "..amount.." essentia. Only "..stored.." available.")
       nrOfItems = stored
     end
     --print("Refilling "..firstCharacterUpperCase(aspect).." with "..nrOfItems.." items. / "..nrOfItems*essentiaPerItem.." essentia")
     print("Refilling "..firstCharacterUpperCase(aspect).." with "..nrOfItems.." items.")
     moveFromDrawerToChest(slot, nrOfItems)
   else
     print("No Item for "..firstCharacterUpperCase(aspect).." found.")
   end
 end
 
 function checkForEssentiaRefill(aspect,amount)
   local level = getEssentiaAmount(aspect)
   if amount < 0 then
     if level < maxEssentiaAmount then
       refillEssentia(aspect, -1*amount)
     else
       if printMaxEssentiaAmountMessages then
         print("Reached maxEssentiaAmount for "..firstCharacterUpperCase(aspect).." ("..level.."/"..maxEssentiaAmount..")")
       end
     end
   else
     -- print message if
     if level < maxEssentiaAmount then
       print(amount.." "..firstCharacterUpperCase(aspect).." refilled.")
     end
   end
 end
 
 --### Program Functions
 ---------------------------------------------------------------------------------------------------------------
 --### Default Main Program Functions
 function preRunProgram()
   checkEssentiaProvider()
 end
 
 function runProgram()
 
 end
 
 
 function postRunProgram()
 
 end
 
 local STOP = false
 local PROGRAM_RUN_TIMER = nil
 function handleEvent(event)
   if event[1] == "timer" and event[2] == PROGRAM_RUN_TIMER then
     preRunProgram()
     runProgram()
     postRunProgram()
     PROGRAM_RUN_TIMER = os.startTimer(programRestartInterval)
     return
   end
   if event[1] == "char" and event[2] == "t" then
     STOP = true
     print("Termination Key detected.\n!!! Terminating the program !!!")
     return
   end
   if event[1] == "essentia" then
     if event[2] == 1 then
       --essentia event
       checkForEssentiaRefill(event[3]:lower(), event[4]) -- essentia and amount
       return
     end
     if event[2] == 2 then
       --power event
       if event[3] then
         print("EssentiaProvider disconnected from the network")
         STOP = true
       else
         print("EssentiaProvider connected to the network")
       end
       return
     end
     if event[2] == 3 then
       --detach event
       STOP = true
       print("Lost connection with EssentiaProvider")
       return
     end
   end
 
   local ignoreList = {"char", "key", "key_up", "mouse_click", "mouse_up", "mouse_drag", "mouse_scroll", "rednet", "turtle_inventory"}
   for i,v in pairs(ignoreList) do
     if event[1] == v then
       return
     end
   end
 
   print("unhandeled event:")
   for i,v in pairs(event) do
     write(i)
     write(":")
     print(v)
   end
 end
 
 function preLoop()
   term.clear()
   term.setCursorPos(1,1)
   prepareEssentiaProvider()
   scanDrawerInventory()
   print("EssentiaRefiller started")
   PROGRAM_RUN_TIMER = os.startTimer(0)
 end
 
 function loop()
   while not STOP do
     handleEvent({os.pullEvent()})
   end
 end
 
 function postLoop()
 
 end
 --### Default Main Program Functions
 ---------------------------------------------------------------------------------------------------------------
 preLoop()
 loop()
 postLoop()