libgui

--v3
local function update()
  shell.run("delete","lg")
  shell.run("pastebin","get","sSF7NPYC","lg")
  os.reboot()
end
local args = {...}
if (args[1] == "update") then
  update()
end
function setup(name)
  sx,sy = nil
  buttons = {}
  tname = name
  pixels = {}
  local bg = colors.black
  sprites = {}
  inputs = {}
  oterm = term.current()
  if (name == "term") then
    sx,sy = term.getSize()
    local previous = term
  else
    m = peripheral.wrap(name)
    local previous = term.redirect(m)
    sx,sy = m.getSize()
  end
end
function createWindow(x,y,w,h,visible)
  local window = window.create(term.current(), x, y, w,h,visible)
  local scene = {oterm=oterm,x=x,y=y,window = window, bg=colors.black,w=w,h=h,buttons = {}, pixels = {}, sprites = {}, inputs = {},
  drawText = function (self, x,y,color,colorb,text)
    term.setCursorPos(x,y)
    term.setTextColor(color)
    term.setBackgroundColor(colorb)
    term.write(text)
  end,
  clearScreen = function ()
    term.clear()
  end,
  setBackgroundColor = function (color)
    term.setBackgroundColor(color)
  end,
  setTextColor = function(color)
    term.setTextColor(color)
  end,
  drawBT = function(self,name,x,xe,y,ye,color,colorb,text)
    term.setBackgroundColor(colorb)
    term.setTextColor(color)
    for i=x,xe do
      for g=y,ye do
        term.setCursorPos(i,g)
        term.write(" ")
      end
    end
    textline = (y + ye) / 2
    textline = string.format("%.1f", textline)
    textline = tonumber(textline)
    lines = {}
    for word in string.gmatch(text,"[^\n]+") do
       table.insert(lines,word)
    end
    if (#lines > 1) then
      for w=1,#lines do
        term.setCursorPos(x,y+w)
        term.write(lines[w])
      end
    else
      term.setCursorPos(x,textline)
      term.write(text)
    end
    table.insert(self.buttons,name..";"..x..";"..xe..";"..y..";"..ye)
  end,
  isButton = function(self,x,y)
    for i=1,#self.buttons do
      local parts = {}
      for word in string.gmatch(self.buttons[i],"[^;]+") do
        table.insert(parts,word)
      end
      name,bx,bxe,by,bye = parts[1],tonumber(parts[2]),tonumber(parts[3]),tonumber(parts[4]),tonumber(parts[5])
      if (bx-1 < x and x < bxe + 1 ) then
        if (by-1 < y and bye+1 > y) then
          return name
        end
      end
    end
    return self.buttons[1]
  end,
  fill  = function(x1,x2,y1,y2,color)
    term.setBackgroundColor(color)
    for i=x1,x2 do
      for g=y1,y2 do
        term.setCursorPos(i,g)
        self.pixels[x..y] = color
        term.write(" ")
      end
    end
  end,
  fillScreen  = function(self,color)
    term.setBackgroundColor(color)
    term.clear()
    self.pixels = {}
  end,
  drawImage  = function(x,y,name)
    image = paintutils.loadImage(name)
    paintutils.drawImage(image,x,y)
  end,
  getSize  = function(self)
    local sizet = {}
    sizet.x = self.w
    sizet.y = self.h
    return sizet
  end,
  drawInput  = function(self,name,x,x2,y,y2,limit)
    term.setBackgroundColor(colors.gray)
    term.setTextColor(colors.white)
    for i=x,x2 do
      for g=y,y2 do
        term.setCursorPos(i,g)
        term.write(" ")
      end
    end
    table.insert(self.inputs,name..";"..x..";"..x2..";"..y..";"..y2..";"..limit)
  end,
  isInput = function(self,x,y)
    term.setTextColor(colors.white)
    for i=1,#self.inputs do
      local parts = {}
      for word in string.gmatch(self.inputs[i],"[^;]+") do
        table.insert(parts,word)
      end
      name,bx,bxe,by,bye = parts[1],tonumber(parts[2]),tonumber(parts[3]),tonumber(parts[4]),tonumber(parts[5])
      if (bx-1 < x and x < bxe + 1 ) then
        if (by-1 < y and bye+1 > y) then
          return name
        end
      end
    end
    return false
  end,
  getInput = function(self,x,y,safe)
  for i=1,#self.inputs do
    local parts = {}
    for word in string.gmatch(self.inputs[i],"[^;]+") do
      table.insert(parts,word)
    end
    name,bx,bxe,by,bye,limit = parts[1],tonumber(parts[2]),tonumber(parts[3]),tonumber(parts[4]),tonumber(parts[5]),tonumber(parts[6])
    if (bx-1 < x and x < bxe + 1 ) then
      if (by-1 < y and bye+1 > y) then
        term.setCursorPos(bx,by)
        local text = limitRead(limit, safe)
        return text
      end
    end
  end
  return false
end,
  hide = function(self)
    self.window.setVisible(false)
    if (tname == "term") then
      term.redirect(self.oterm)
    else
      term.redirect(m)
    end
    paintutils.drawFilledBox(self.x, self.y, self.w, self.h, self.bg)

  end,
  getPos = function()
    return self.window.getPosition()
  end,
  rePos  = function(self,x,y,h2,w2)
    if (h2 and w2) then
      self.window.reposition(x,y,h2,w2)
    else
      self.window.reposition(x,y)
    end
  end
  }
  if (visible) then
    term.redirect(window)
  end
  return scene
end
function exit()
  term.native()
end
function drawText(x,y,color,colorb,text)
  term.setCursorPos(x,y)
  term.setTextColor(color)
  term.setBackgroundColor(colorb)
  term.write(text)
end
function clearScreen()
  term.clear()
end
function setBackgroundColor(color)
  term.setBackgroundColor(color)
end
function setTextColor(color)
  term.setTextColor(color)
end
function drawBT(name,x,xe,y,ye,color,colorb,text)
  term.setBackgroundColor(colorb)
  term.setTextColor(color)
  for i=x,xe do
    for g=y,ye do
      term.setCursorPos(i,g)
      term.write(" ")
    end
  end
  textline = (y + ye) / 2
  textline = string.format("%.1f", textline)
  textline = tonumber(textline)
  lines = {}
  for word in string.gmatch(text,"[^\n]+") do
     table.insert(lines,word)
  end
  if (#lines > 1) then
    for w=1,#lines do
      term.setCursorPos(x,y+w)
      term.write(lines[w])
    end
  else
    term.setCursorPos(x,textline)
    term.write(text)
  end
  table.insert(buttons,name..";"..x..";"..xe..";"..y..";"..ye)
end
function clearBTNS()
  buttons = {}
end
function isButton(x,y)
  for i=1,#buttons do
    local parts = {}
    for word in string.gmatch(buttons[i],"[^;]+") do
      table.insert(parts,word)
    end
    name,bx,bxe,by,bye = parts[1],tonumber(parts[2]),tonumber(parts[3]),tonumber(parts[4]),tonumber(parts[5])
    if (bx-1 < x and x < bxe + 1 ) then
      if (by-1 < y and bye+1 > y) then
        return name
      end
    end
  end
  return false
end
function fill(x,x2,y,y2,color)
  term.setBackgroundColor(color)
  for i=x,x2 do
    for g=y,y2 do
      term.setCursorPos(i,g)
      term.write(" ")
    end
  end
end
function fillScreen(color)
  term.setBackgroundColor(color)
  term.clear()
end
function drawLine(x1, y1, x2, y2, color)
    local dx = math.abs(x2 - x1)
    local dy = math.abs(y2 - y1)
    local sx, sy

    if x1 < x2 then
        sx = 1
    else
        sx = -1
    end

    if y1 < y2 then
        sy = 1
    else
        sy = -1
    end

    local err = dx - dy

    while true do
        term.setCursorPos(x1, y1)
        term.setTextColor(color)
        term.write(" ")

        if x1 == x2 and y1 == y2 then
            break
        end

        local err2 = 2 * err

        if err2 > -dy then
            err = err - dy
            x1 = x1 + sx
        end

        if err2 < dx then
            err = err + dx
            y1 = y1 + sy
        end
    end
end
function drawImage(x,y,name)
  image = paintutils.loadImage(name)
  paintutils.drawImage(image,x,y)
end
function getSize()
  local sizet = {}
  sizet.x = sx
  sizet.y = sy
  return sizet
end
function drawInput(name,x,x2,y,y2,limit)
  term.setBackgroundColor(colors.gray)
  term.setTextColor(colors.white)
  for i=x,x2 do
    for g=y,y2 do
      term.setCursorPos(i,g)
      term.write(" ")
    end
  end
  table.insert(inputs,name..";"..x..";"..x2..";"..y..";"..y2..";"..limit)
end
function isInput(x,y)
  for i=1,#inputs do
    local parts = {}
    for word in string.gmatch(inputs[i],"[^;]+") do
      table.insert(parts,word)
    end
    name,bx,bxe,by,bye = parts[1],tonumber(parts[2]),tonumber(parts[3]),tonumber(parts[4]),tonumber(parts[5])
    if (bx-1 < x and x < bxe + 1 ) then
      if (by-1 < y and bye+1 > y) then
        return name
      end
    end
  end
  return false
end
function getInput(x,y,safe)
  for i=1,#inputs do
    local parts = {}
    for word in string.gmatch(inputs[i],"[^;]+") do
      table.insert(parts,word)
    end
    name,bx,bxe,by,bye,limit = parts[1],tonumber(parts[2]),tonumber(parts[3]),tonumber(parts[4]),tonumber(parts[5]),tonumber(parts[6])
    if (bx-1 < x and x < bxe + 1 ) then
      if (by-1 < y and bye+1 > y) then
        term.setCursorPos(bx,by)
        local text = limitRead(limit, safe)
        return text
      end
    end
  end
  return false
end
function setCursorPos(x,y)
   term.setCursorPos(x,y)
end
function drawAdvancedImage(x,y,img)
  if img then
    for i=1,#img do
      pixel = img[i]
      local var1, var2, var3, var4, var5 = pixel:match("([^|]+)|([^|]+)|([^|]+)|([^|]+)|([^|]+)")
      term.setCursorPos(x + tonumber(var2),y + tonumber(var3))
      term.setBackgroundColor(getColor(var4))
      term.setTextColor(getColor(var5))
      if  string.find(var1,"\space") then
              term.write(" ")
      else
        term.write(var1)
     end
    end
  end
end















-- FUNC
function getColor(colorName)
  local colors = {
  white = colors.white,
  orange = colors.orange,
  magenta = colors.magenta,
  lightBlue = colors.lightBlue,
  yellow = colors.yellow,
  lime = colors.lime,
  pink = colors.pink,
  gray = colors.gray,
  lightGray = colors.lightGray,
  cyan = colors.cyan,
  purple = colors.purple,
  blue = colors.blue,
  brown = colors.brown,
  green = colors.green,
  red = colors.red,
  black = colors.black
}

  return colors[colorName]
end
function isColor(value)
  local table = {
  white = colors.white,
  orange = colors.orange,
  magenta = colors.magenta,
  lightBlue = colors.lightBlue,
  yellow = colors.yellow,
  lime = colors.lime,
  pink = colors.pink,
  gray = colors.gray,
  lightGray = colors.lightGray,
  cyan = colors.cyan,
  purple = colors.purple,
  blue = colors.blue,
  brown = colors.brown,
  green = colors.green,
  red = colors.red,
  black = colors.black
}
  for k, v in pairs(table) do
    if k == value then
      return true
    end
  end
  return false
end
function limitRead(limX, rChar,color,colorb)
        term.setBackgroundColor(colors.gray)
        term.setTextColor(colors.white)
        term.setCursorBlink(true)
        local origX, origY = term.getCursorPos()
        local returnString = ""
        while true do
                local xPos, yPos = term.getCursorPos()
                local event, p1, p2 = os.pullEvent()
                if event == "char" then
                        returnString = returnString..p1
                        if not rChar then
                                if not limX then
                                        write(p1)
                                else
                                        if string.len(returnString) >= limX then
                                                term.setCursorPos(origX, origY)
                                                write(string.sub(returnString, (string.len(returnString)-limX)+1))
                                        elseif string.len(returnString) < limX then
                                                write(p1)
                                        end
                                end
                        else
                                if not limX then
                                        write(rChar)
                                else
                                        if string.len(returnString) >= limX then
                                                term.setCursorPos(origX, origY)
                                                write(string.rep(rChar, limX))
                                        elseif string.len(returnString) < limX then
                                                write(rChar)
                                        end
                                end
                        end
                elseif event == "key" and p1 == 259 then --backspace
                        returnString = string.sub(returnString, 1, (string.len(returnString))-1)
                        term.setCursorPos(xPos-1,yPos)
                        write(" ")
                        term.setCursorPos(origX, origY)
                        if string.len(returnString) >= limX then
                                if not rChar then
                                        write(string.sub(returnString, (string.len(returnString)-limX)+1))
                                else
                                        write(string.rep(rChar,limX))
                                end
                        else
                                if not rChar then
                                        write(returnString)
                                else
                                        write(string.rep(rChar, string.len(returnString)))
                                end
                        end
                elseif event == "key" and p1 == 257 then --enter
                        break
                end
        end
        term.setCursorBlink(false)
        return returnString
end