mescanner

delay=60
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

me=wrapPs("tileinterface")[1]

function getIndex(fingerprint)
if fingerprint.nbt_hash==nil then
index = fingerprint.id.."/"..fingerprint.dmg
else
index = fingerprint.id.."/"..fingerprint.dmg.."/"..fingerprint.nbt_hash
end
return index
end

function getItemsByIndex(iitems)
oitems={}
for i=1, #iitems do
oitems[getIndex(iitems[i].fingerprint)]=iitems[i]
end
return oitems
end

function addLog(var)
if fs.getFreeSpace("./disk")>100 then
fp=fs.open("disk/log.txt","a")
fp.writeLine(var)
fp.close()
else
print("Speicher Voll")
end
end

items1=me.getAvailableItems()
items1ByIndex=getItemsByIndex(items1)

while true do

    sleep(delay)
    items2=me.getAvailableItems()
    items2ByIndex=getItemsByIndex(items2)

    if textutils.serialize(items1)~=textutils.serialize(items2) then
        for i=1,#items1 do
            if items2ByIndex[getIndex(items1[i].fingerprint)]~=nil then
                if items2ByIndex[getIndex(items1[i].fingerprint)].size~=items1[i].size then
                    if items2ByIndex[getIndex(items1[i].fingerprint)].size-items1[i].size>0 then
                    term.setTextColor(colors.green)
                    else
                    term.setTextColor(colors.red)
                    end
                    print(items2ByIndex[getIndex(items1[i].fingerprint)].size-items1[i].size.." "..getIndex(items1[i].fingerprint))
                    --addLog(items2ByIndex[getIndex(items1[i].fingerprint)].size-items1[i].size.." "..getIndex(items1[i].fingerprint))
                end
            else
                print("-1 "..getIndex(items1[i].fingerprint))
                --addLog("-1 "..getIndex(items1[i].fingerprint))
            end


        end

    end

    items1=items2
    items1ByIndex=items2ByIndex
end