View difference between Paste ID: kQ79jeRH and fGfQ3kXy

 local tableColorsToSiphon={white="tilesiphon_1",orange="tilesiphon_2",magenta="tilesiphon_3",lightBlue="tilesiphon_4",yellow="tilesiphon_5"}
 local colors ={}
 for  k,v in pairs(tableColorsToSiphon) do table.insert(colors,k) end
 
 --write(textutils.serialize(colors))
 
 function getColoredSiphon(color)
   return peripheral.wrap(tableColorsToSiphon[color])
 end
 
 function getAspect(color)
   local siphon=getColoredSiphon(color)
   local rawresults=siphon.getAspects()
   if (rawresults[1]==nil)then
     return nil
   else
     return rawresults[1]["name"]
   end
 end
 
 function getAspectAmount(color)
   local siphon=getColoredSiphon(color)
   local rawresults=siphon.getAspects()
   if (rawresults[1]==nil) then
     return nil
   else
     return rawresults[1]["quantity"]
   end
 end
 
 function isStable(color)
     local value1=getAspectAmount(color)
     if(value1==nil) then
       return false
     end
     os.sleep(0.85)
     if(getAspectAmount(color)==value1) then
       return true
     else
       return false
     end
 end
 
 function openNetwork()
   rednet.open("front")
 end
 
 function filtredWaitingMessage(time,filtre)
   openNetwork()
   local timer=os.startTimer(time)
   local continue=true
   while (continue) do
     local event,param1,message=os.pullEvent()
     if(event=="rednet_message") then
       if(message==filtre) then
         return param1, message
       end
     elseif(event=="timer") then
       if(param1==timer) then
         return nil, nil
       end
     end
   end
 end
 
 function setStartup()
   if(fs.exists("startup")==false) then
     local startupFile=fs.open("startup","w")
     startupFile.write("os.run({}, \""..shell.getRunningProgram().."\")")
     startupFile.close()
   end
 end
 
 function runProvider()
   openNetwork()
   while(true)do
     for k, v in pairs(colors) do
       write(" "..v)
       if(isStable(v))then
         write(" is stable\n")
         rednet.broadcast("wherestore-"..getAspect(v).."-"..getAspectAmount(v))
         local senderId, message=filtredWaitingMessage(0.2,"here")
         if (message=="here") then
           rednet.send(senderId,"store-"..getAspect(v))
           rednet.broadcast("open-"..v)
           while(getAspectAmount(v)~=nil) do
             os.sleep(0.05)
           end
           rednet.broadcast("close-"..v)
           os.sleep(0.15)
           rednet.send(senderId,"stop")
        end
       end
     end
   end
 end
 
 setStartup()
 runProvider()
 --local senderId, message=filtredWaitingMessage(20,"here")
 --write(textutils.serialize(message))
 --write(textutils.serialize(isStable("white")))