-----------------------------
--Reactor specifications
-----------------------------
Reactor           = component.proxy(component.get("b33f"))

-----------------------------
--Reactor Layout
-----------------------------
map = {-1,5,5,5,5,5,5,5,-1,
        3,4,4,4,4,4,4,4,3,
        3,3,3,3,3,3,3,3,3,
        3,3,3,3,3,3,3,3,3,
        3,4,4,4,4,4,4,4,3,
       -1,5,5,5,5,5,5,5,-1}


-----------------------------
--Functions
-----------------------------
function findChestSlot (transposer, side)
  for slot = 1, 27 do
    if transposer["getSlotStackSize"](side,slot) > 0 then
      return slot
    end
  end
  return -1
end

--< Tries to fill a reactor using the given transposer returns -1 upon failure >--
function fillReactor (transposer)
  for slot= 1, 54 do
    if transposer["getSlotStackSize"](1,slot) ==  0 then
      local FullCSlot = findChestSlot(transposer,map[slot])
      if FullCSlot > 0 then
        transposer["transferItem"](map[slot],1,1,FullCSlot,slot)
      else
        return -1
      end
    end
  end
  print("P")
  return 1
end

-----------------------------
--Start of Programm
-----------------------------

while(true) do
  -->Refill reactor
  returnCode = fillReactor(ReactorTransposer)
  if(returnCode < 0) then
    ReactorRedstone["setOutput"](3,0)
  end
  os.sleep(0.25)
end