test affichage reactors

reactor = peripheral.wrap("back")
mon = peripheral.wrap("top")
mon.clear()
mon.setBackgroundColor(colors.blue)
color = blue

--fuel = 0
--maxFuel = 0

function calc(min, max)

  percent = 53 / max

  x = percent * min

  --print("percent: "..percent.." x: "..x)

  return 53, x

end

function progress(current, max, pos1, pos2)

--Power
  maxX,x = calc(current,max)
  for i=0,3 do
    for z=1,maxX do
      mon.setCursorPos(pos1+z,pos2+i)
      if z <= x then
        mon.setBackgroundColor(colors.green)
      else
        mon.setBackgroundColor(colors.white)
      end

      mon.write(" ")
    end
  end
end

function draw(color)
  mon.clear()

  mon.setCursorPos(28,1)
  mon.write("Reactor")

  mon.setCursorPos(2,10)
  mon.write("Fuel:")
  mon.setCursorPos(1,11)
  mon.write(math.floor((fuel/maxFuel)*100).."%")

  mon.setCursorPos(2,16)
  mon.write("RF/t:")
  mon.setCursorPos(1,17)
  mon.write(math.floor(rf/1000).."kRF/t")

  progress(power,maxPower,7,3)
  progress(fuel,maxFuel,7,9)
  progress(rf,maxRf,7,15)

  if reactor.getActive() == true then
    mon.setBackgroundColor(colors.blue)
  else
    mon.setBackgroundColor(colors.red)
  end
end
  sleep(2)
end