StorageDrawerStatusReader

-- pastebin run 23wTdpEj
-- pastebin get 23wTdpEj startup
--
os.setComputerLabel('StorageMonitor')

term.clear()
term.setCursorPos(1,1)

function DeviceDetect(DeviceName)
DeviceSide="none"
for k,v in pairs(redstone.getSides()) do
if peripheral.getType(v)==DeviceName then
   DeviceSide = v
   break
end
end
  return(DeviceSide)
end

function newLine(text)
  local _,cY= m.getCursorPos()
  m.setCursorPos(1,cY+1)
  m.write(text)
end

MonitorSide=DeviceDetect("monitor")
print ("Monitor on side:"..MonitorSide)
m = peripheral.wrap(MonitorSide)
m.setTextScale(0.5)
m.clear()
m.setCursorPos(1, 0)

m.clear()
m.setCursorPos(1,1)
newLine("-----------------------------------------------")
newLine("               Storage  Drawer                 ")
newLine("                Status Reader                  ")
newLine("-----------------------------------------------")
newLine("            Press [Enter] to stop              ")
newLine("                                               ")

outputColor = colors.red
outputSide = 'left'

inputColors = {colors.white, colors.magenta, colors.lightBlue, colors.orange, colors.green, colors.yellow}
inputSides = {'back'}

colorSequence = {'white','orange','magenta','lightBlue','yellow','lime','pink','gray','lightGray','cyan','purple','blue','brown','green','red','black'}

colorsName = { white = 'White',
orange = 'Orange',
magenta = 'Magenta',
lightBlue = 'Light Blue',
yellow = 'Yellow',
lime = 'Lime',
pink = 'Pink',
gray = 'Gray',
lightGray = 'Light Gray',
cyan = 'Cyan',
purple = 'Purple',
blue = 'Blue',
brown = 'Brown',
green = 'Green',
red = 'Red',
black = 'Black'}



drawersStatus = {}

local function Read(side)
    for _,colorName in ipairs(colorSequence) do
        if redstone.testBundledInput(side, colors[colorName]) then
            newLine(colorsName[colorName] .. '=' .. redstone.getBundledInput(side, colorName))
            print(colorsName[colorName] .. '=' .. redstone.getBundledInput(side, colorName))
        end
    end
    sleep(1)
end


function exitProgram()
  repeat
    local ev, key = os.pullEvent('key')
  until key == keys.enter -- or whatever key i decide to use
end

Read('back');
--parallel.waitForAny(Read('back'), stop)