os.loadAPI("ba")
local c
m = peripheral.wrap("left")
m.clear()

function fillTable()
   ba.setTable("Lava", lava, 3,13,7,9)
   ba.setTable("Water", water, 15,25,7,9)
   --ba.setTable("DICK", dick, 27,37,7,9)
   --ba.setTable("Empty1", empty ,15,25,15,17)
   --ba.setTable("Empty2", emptyy ,27,37,15,17)
   --ba.setTable("Empty3", emptyyy ,3,13,19,21)
   --ba.setTable("Empty4", emptyyyy ,15,25,19,21)
   --ba.setTable("Empty5", emptyyyyy ,27,37,19,21)

   ba.screen()
end

function getClick()
   event,side,x,y = os.pullEvent("monitor_touch")
   ba.checkxy(x,y)
end

local function addcol(col, side)
  rs.setBundledOutput(side, colors.combine(rs.getBundledOutput(side),col))
end

local function remcol(col, side)
  rs.setBundledOutput(side, colors.subtract(rs.getBundledOutput(side),col))
end

function getTank()
   addcol(colors.white, 'bottom')
   sleep(4)
   addcol(colors.pink, 'bottom')
   sleep(2)
   remcol(colors.white, 'bottom')
   remcol(colors.pink, 'bottom')
end

function lava()
   ba.flash("Lava")

   addcol(colors.yellow, 'bottom')
   sleep(1)
   addcol(colors.orange, 'bottom')
   sleep(2)
   getTank()
   sleep(1)
   remcol(colors.yellow, 'bottom')
   remcol(colors.orange, 'bottom')
end

function water()
   ba.flash("Water")

   addcol(colors.black, 'bottom')
   sleep(1)
   addcol(colors.red, 'bottom')
   sleep(2)
   getTank()
   sleep(1)
   remcol(colors.black, 'bottom')
   remcol(colors.red, 'bottom')
end

function dick()
   ba.flash("DICK")
   addcol(colors.brown, 'bottom')
   sleep(2)
   addcol(colors.pink, 'bottom')
   sleep(1)
   remcol(colors.brown, 'bottom')
   remcol(colors.pink, 'bottom')
   sleep(1)
end


fillTable()
ba.heading("Free liquid!")
ba.label(5,10, "Insert empty openblock tank. Choose liquid. Get full tank!")

while true do
   getClick()
end