tAPI

--[[

    Author: Zachary Knoblauch
    Version: 1.8
    Type: API

    An api for the the long winded functions with huge names that I'm too lazy to type
    out all the way.

    Custom Functions

        download(url, fileName)
        cl()
        createLabel(name)
        Labels:drawLabel(x, y, height, bCol, tCol)

--]]



function version()
    version = 1.8
    return version
end

function download(url, fileName)
  if type(url) ~= "string" then
    error("Incorrect argument received for type URL. Expected string, received : "..type(url), 2)
  elseif type(fileName) ~= "string" then
    error("Incorrect argument received for type fileName. Expected string, received : "..type(fileName), 2)
  else
      local download = http.get(url)
      if download then
        local handle = download.readAll()
        download.close()
        local file = fs.open(fileName, "w")
        file.write(handle)
        file.close()
        print("File: "..fileName.." downloaded")
      else
        print("Unable to download file: "..fileName)
        print("Located at URL: "..url)
      end
    end
end

function cPos(x, y)
    term.setCursorPos(x, y)
end

function bgCol(col)
    term.setBackgroundColor(col)
end

function txtCol(col)
    term.setTextColor(col)
end

function drawLine(x1, y1, x2, y2, col)
    paintutils.drawLine(x1, y1, x2, y2, col)
end

function cl()
  term.clear()
  term.setCursorPos(1, 1)
end

function clearLine(col)
    term.setBackgroundColor(col)
    term.clearLine()
end

function drawBox(x1, y1, x2, y2, col, fill)
    if fill == nil then
        paintutils.drawBox(x1, y1, x2, y2, col)
    elseif fill == false then
        paintutils.drawBox(x1, y1, x2, y2, col)
    elseif fill == true then
        paintutils.drawFilledBox(x1, y1, x2, y2, col)
    end
end

function cPrint(text, y)
  local x = term.getSize()
  local centerXPos = (x - string.len(text)) / 2
  term.setCursorPos(centerXPos, y)
  write(text)
end

labelList = {}
Labels = {}
Labels.__index = Labels

function createLabel(name)
    label = {}
    setmetatable(label, Labels)
    label.name = name
    return label
end

function Labels:drawLabel(x, y, height, bCol, tCol)
    table.insert(labelList, {self.name, x, y, height, self.action})

    self.x = x
    self.y = y
    if self.tCol == nil then
        self.bCol = bCol
    end

    self.tCol = tCol
    for i = 1, height do
        drawLine(x, y + i, x + #self.name + 1, y + i, bCol)
    end

    cPos(x, y + math.ceil(height/2))
    txtCol(tonumber(tCol))
    bgCol(tonumber(bCol))
    term.write(" "..self.name.." ")
end