colorList =

{

[ "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

}

sideList = {

"top" ,

"front" ,

"left" ,

"right" ,

"back" ,

"bottom"

}

stateList = { }

for i = 1 , table.getn ( sideList ) do

stateList [ sideList [ i ] ] = { colorList }

for color , call in pairs ( colorList ) do

end

end

while true do -- Start an endless loop

os . pullEvent ( "redstone" ) -- Yeild the computer until some redstone changes

term . clear ( )

x = 1

--Check each side & color to see if it's changed.

for i = 1 , table.getn ( sideList ) do

for color , call in pairs ( colorList ) do

if stateList [ sideList [ i ] ] [ color ] ~= redstone . testBundledInput ( sideList [ i ] , call ) then

term . setCursorPos ( 1 , x )

term . write ( sideList [ i ] .. " " .. color .. " is now " )

term . write ( redstone . testBundledInput ( sideList [ i ] , call ) )

stateList [ sideList [ i ] ] [ color ] = redstone . testBundledInput ( sideList [ i ] , call )

x = x + 1

end

end

end