endEssentia

--##################--
-- Programm by ecco7777
-- https://pastebin.com/u/ecco7777
-- leicht veraendert von endminecraffter
-- https://pastebin.com/u/endminecraffter
-- Server: MyFTB.de Deutsches Minecraft modded Netzwerk
-- Benoetigte Mods/Apis: keine
--##################--

version = 1.3
function wrapPs(peripheralName)
periTab={}
sideTab={}
if peripheralName==nil then
print("Fehler")
end
local peripherals = peripheral.getNames()
local i2 = 1
for i =1, #peripherals do
if peripheral.getType(peripherals[i])==peripheralName then
periTab[i2]=peripheral.wrap(peripherals[i])
sideTab[i2]=peripherals[i]
i2=i2+1
end
end
if periTab~={} then
return periTab,sideTab
else
return nil
end
end
aspectsByName={aer=1,alienis=2,aqua=3,arbor=4,auram=5,bestia=6,cognitio=7,corpus=8,exanimis=9,fabrico=10,fames=11,gelum=12,herba=13,humanus=14,ignis=15,instrumentum=16,iter=17,limus=18,lucrum=19,lux=20,machina=21,messis=22,metallum=23,meto=24,mortuus=25,motus=26,ordo=27,pannus=28,perditio=29,perfodio=30,permutatio=31,potentia=32,praecantatio=33,sano=34,sensus=35,spiritus=36,telum=37,tempestas=38,tenebrae=39,terra=40,tutamen=41,vacuos=42,venenum=43,victus=44,vinculum=45,vitium=46,vitreus=47,volatus=48}
aspectsByNumber={"aer","alienis","aqua","arbor","auram","bestia","cognitio","corpus","exanimis","fabrico","fames","gelum","herba","humanus","ignis","instrumentum","iter","limus","lucrum","lux","machina","messis","metallum","meto","mortuus","motus","ordo","pannus","perditio","perfodio","permutatio","potentia","praecantatio","sano","sensus","spiritus","telum","tempestas","tenebrae","terra","tutamen","vacuos","venenum","victus","vinculum","vitium","vitreus","volatus"}

w=wrapPs("tt_aspectContainer")
m=wrapPs("monitor")[1]
me=wrapPs("tileinterface")[1]
crystalAspects={  iter = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "e02b869d0f5fae947df6187fa86c89ff",  },  tutamen = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "7efe695fcc02157c8d6b336a22951b18",  },  bestia = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "44b2fd6ee511aceb6d66d89ab0cc3ab3",  },  victus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "deb8b6eae28ee107f585558014b784ae",  },  metallum = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "07275fa65074555c50144eeaadcaa369",  },  gelum = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "6d1c371dc8953ab3b349d038149fbabf",  },  machina = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "e49f0a0b4c2005d70427b2cf0bb547c1",  },  tenebrae = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "d750071ba212a62216ff3509f819aa0a",  },  terra = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "bb9211b894dea99a6b674ebe63759333",  },  meto = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "438d48d3ad9a71d7c74b740d9af0d498",  },  potentia = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "3e4cde7bf9498dfb8d074b11fde2c2d8",  },  ordo = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "a77c4b35bbb1a4c84b15122dd52354bf",  },  sano = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "a552823dce9fa32a4d0a643fc6d80a2a",  },  corpus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "fc3b58c6d43b367885edb94a1c0b4a9e",  },  messis = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "edcfd189529c148e868fa75f723b8688",  },  humanus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "5e4a7da5863dfff7dbc5bc2613372aa6",  },  herba = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "1c288c94a8a1868d12b5842efa3ad6af",  },  permutatio = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "363450adb133ce7c203fc43eadde8978",  },  pannus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "7adcf7ebaa90cc8cbb52edde554d096b",  },  fames = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "d78c7daa7e7404c74b5652b528b4bf98",  },  spiritus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "ae9bbd1dc25b4265679ff7f62e7bad22",  },  lux = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "1b9a468a86912077309e99d381993d22",  },  limus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "e2b2efb91662c9c82aea577feecb6a1e",  },  mortuus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "e58e5e079bc42dd22a42918b30a50949",  },  tempestas = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "74359249c0ceae36dbbcbbc6ac0aef32",  },  perfodio = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "932f023de69175bddc9e49726204eb26",  },  auram = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "74e597f80329c162890ae5c586baebd7",  },  fabrico = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "4bd51093dae3a8de9f013bdbb9f38e5b",  },  volatus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "b1863b99cb7c15b3c6a7a253c17d9129",  },  aqua = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "358c318e194980b0c0835a9f1ce41750",  },  venenum = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "4ff390fa1460fcfff17b3959c63622f9",  },  arbor = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "8003e0e23f094ccea997e06935a7f768",  },  exanimis = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "115fc0e04f597df5cb2f05075b640178",  },  vacuos = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "e17a8e072528e849045d2fc9292500b6",  },  ignis = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "ad5cc1bd74d2230c5c483e4c1bbc7948",  },  lucrum = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "045fd94215a5f119598e95d4961d508b",  },  sensus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "9edea0f9fa5a09fcd7ce93ca83f865ed",  },  aer = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "64630f917da3a7214b1ef2c91a90d090",  },  alienis = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "f4822536f3c421b0c4f7976181d1614d",  },  motus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "2dc5bd6dfbc37d3dda4f078312b78449",  },  vitreus = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "047206f1fafce8cdc716c9c822b1d2cb",  },  telum = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "3b3b1614a2b9152dcbf2b884ded1e3fc",  },  vinculum = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "100f092974acf71f2f081ac59d724f4c",  },  praecantatio = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "b06b63e28f76cf46121ac7ac9f195242",  },  vitium = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "8aeb0e0af059fc412dcfa2c42e983203",  },  cognitio = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "045aec975e8e153977a7dda8243425a7",  },  perditio = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "18add493aeeb97a3fe71cf8130fe8675",  },  instrumentum = {    id = "Thaumcraft:ItemCrystalEssence",    dmg = 0,    nbt_hash = "577749d66e4d1ca063910eb52c72de2b",  },}

function addAspect(aspect,aspectCount)
    if aspects[aspect]==nil then
    aspects[aspect]=0
    end
    aspects[aspect]=aspects[aspect]+aspectCount
end

function refill(aspect,aspectCount)
--if aspect.canExport("up") == false then
--writeerror(1,aspect)
--sleep(10)
--refill(aspect,aspectCount)
--else
me.exportItem(crystalAspects[aspect],"up",aspectCount)
sleep(15)
--end
end

function writeerror(error,aspect)
if error == 1 then
m.setCursorPos(1,1)
m.setTextColor(colors.red)
m.write("Aspect ".. aspect .." Nicht im ME-System vorhanden")
end
end

while true do
aspects={}
for i=1,#w do
cAspects=w[i].getAspects()
    for i2=1,#cAspects do
    addAspect(cAspects[i2],w[i].getAspectCount(cAspects[i2]))
    end
end

i2=1
m.clear()
for i=1, #aspectsByNumber do
    if aspects[aspectsByNumber[i]]~=nil then
        if aspects[aspectsByNumber[i]]<256 then
        m.setTextColor(colors.red)
        else
        m.setTextColor(colors.green)
        end
        if i2<27 then
        m.setCursorPos(1,i2)
        else
        m.setCursorPos(23,i2-26)
        end
        m.write(aspectsByNumber[i]..": "..aspects[aspectsByNumber[i]])
        m.setCursorPos(39,26)
        m.write("Version: "..version)
    end
    if aspects[aspectsByNumber[i]]<256 then
    m.clear()
    m.setCursorPos(1,1)
    m.write(aspects[aspectsByNumber[i]].." "..aspectsByNumber[i].." nur noch vorhanden.")
 m.setCursorPos(1,2)
 m.write("Wird aufgef\195\188llt auf 256.")
m.setCursorPos(39,26)

        m.write("Version: "..version)

    refill(aspectsByNumber[i],256-aspects[aspectsByNumber[i]])
    end
i2=i2+1
end
sleep(1)
end