collectRemoteData

local args = {...}
local channelList = args
local event, modemSide, senderChannel, replyChannel, message, senderDistance

local mon0 = peripheral.wrap("monitor_0")
local modem = peripheral.wrap("left")

for k,num in pairs(channelList) do modem.open(tonumber(num)) end

while true do

  event, modemSide, senderChannel, replyChannel, message, senderDistance = os.pullEvent("modem_message")
--  print(senderDistance)
  local amount = 0
  local cap = -1
  if message.amount then amount = message.amount end
  if message.capacity then cap = message.capacity end
  mon0.clear()
  mon0.setCursorPos(1,1)
  mon0.write("Fractionator 01: ".. (amount/cap*100) .."%")

end