ccraft tank

-- Constants
tankSide = "right"
signalSide = "back"
updateDelay = 60 -- seconds
fill = 0.2

-- Program start
print("Monitoring tank on "..tankSide..", sending signal to "..signalSide.." every "..updateDelay.." seconds.")
print("Redstone signal at under "..(fill*100).."%\n")
sleep(1)
t = peripheral.wrap(tankSide)
if t==nil then
  print("No tank found!") return
end
while true do
  value = 0  max = 0
  ti = t.getTankInfo(tankSide)
  for i,j in pairs(ti) do
    for name,data in pairs(j) do
      if name=="capacity" then max = data
      elseif name=="amount" then value = data
      end
    end
  end
  s = "Tank: "..value.."/"..max..", redstone "
  signal = value < (max * fill)
  if signal then print(s.."on")
  else print(s.."off")
  end
  rs.setOutput(signalSide, signal)
  sleep(updateDelay)
end