Simple Agricraft Computer Controller Analyzer

screen = peripheral.wrap('top')
seed = peripheral.wrap('right')
screen.setTextScale(1.25)

-- GET SEED STATS --
function getStats()

  if seed.getSpecimenStats() ~= nil then

    stat1, stat2, stat3 = seed.getSpecimenStats()
    screen.clear()
    screen.setCursorPos(1,1)
    screen.write(seed.getSpecimen())
    screen.setCursorPos(1,2)
    screen.write('Growth: ' .. stat1)
    screen.setCursorPos(1,3)
    screen.write('Gain: ' .. stat2)
    screen.setCursorPos(1,4)
    screen.write('Strength: ' .. stat3)

  end

end

-- CREATE WAITING SCREEN --
function loadingDots()

  screen.clear()
  screen.setBackgroundColor(colors.blue)
  screen.setCursorPos(1,1)

  screen.write('Waiting')
  sleep(.2)
  screen.setCursorPos(8,1)

  screen.write('.')
  sleep(.2)
  screen.setCursorPos(9,1)

  screen.write('.')
  sleep(.2)
  screen.setCursorPos(10,1)

  screen.write('.')
  sleep(.2)

end

-- ANALYZE SEEDS IN ANALYZER --
function analyzeSeeds()

  if seed.getSpecimen() == nil then

    screen.clear()
    screen.setCursorPos(1,1)
    screen.setBackgroundColor(colors.red)
    screen.write('There is no seed...')

  else
    seed.analyze()

    repeat
      sleep(.1)
    until seed.getSpecimenStats() ~= nil

    if seed.getSpecimenStats() ~= nil then
      getStats()
    end

  end

end

-- WAIT FOR REDSTONE INPUT --
function check()

  if redstone.getInput('left') == false then

    repeat
      loadingDots()
    until redstone.getInput('left') == true

    if redstone.getInput('left') == true then
      analyzeSeeds()
    end

  end

end

-- LOOP CONTAINER TO KEEP APPLICATION RUNNING --
while true do
  os.pullEvent()
  check()
end