experia tracker v2

-- essentia reader computer FSM--

os.loadAPI("button")
os.loadAPI("melStart")

m = peripheral.find("monitor")
p = peripheral.find("EssentiaProvider")

local x,y,z,v
local n,a
local colorsToUse = {colors.green,colors.blue,colors.brown}
local colorTracker, collumnTracker, rowTracker
local rowOffset, collumnOffset, collumnOffset2, rowLimit, collumnLimit

--Set up some important 'local' globals (srsly lua?)
collumnOffset = 18
collumnOffset2 = 13     --Used for variable
rowOffset = 1
collumnLimit = 3
rowLimit = 15


n = -1
a = 0
x = 1
y = 0
z = y
lineblank = ""
aspectNum = 48

function aspectTable()

  --Grab the nonbeliever table
  local tempList = {p.getAspects()}
  --Now convert (I hope)
  eTable = {}
  local iTemp2 = 0
  for iTemp=1,table.getn(tempList),2 do
    iTemp2 = iTemp2 + 1
    eTable[iTemp2] = {}
    eTable[iTemp2].name = tempList[iTemp]
    eTable[iTemp2].amount = tempList[iTemp+1]
  end
  --Attempt the sorting
  local sort_func = function( a,b ) return a.name < b.name end
  table.sort( eTable, sort_func )

end

function aspectDis()

  --Reset trackers
  colorTracker = 0
  collumnTracker = 0
  rowTracker = 0

  --Do out first setup
  --m.setTextColor(colorsToUse[colorTracker])

  for i, result in ipairs( eTable ) do
    --Position the cursor
    m.setCursorPos(1+(collumnOffset*collumnTracker), 1+(rowOffset*rowTracker))
    m.write(result.name)
    m.setCursorPos(collumnOffset2+(collumnOffset*collumnTracker), 1+(rowOffset*rowTracker))
    m.write(":" .. result.amount)
    --Bump down a row
    rowTracker = rowTracker + 1
    --If rowTracker is equal to rowLimit,
    --reset and bump collumnTracker
    if(rowTracker == rowLimit) then
        rowTracker = 0
        collumnTracker = collumnTracker + 1
        --Also set the colorTracker
        colorTracker = colorTracker + 10
        --m.setTextColor(colorsToUse[colorTracker])
    end
  end
end

--melStart.startup()

m.setBackgroundColor(colors.purple)
m.setTextColor(colors.black)
m.setTextScale(1.5)

while true do
  m.clear()
  aspectTable()
  aspectDis()
  sleep(1)

end