function()
	while true do
	  event, char = os.pullEvent("char")
	  if char == "r" then
		shell.run("storageL")
	  elseif char == "h" then
		shell.run("storageL")
	  else
		zDrive.monClear(MO, mon1, mon2)
		zDrive.monClear(1, term, nil)
		term.setCursorPos(1, 1)
		break
	  end
	end
  end

amount = 12345678.123456879
local s = string.format("%f", amount)
print(s)

string.sub(s, i [, j])
s:sub(i [,j])

term.write(amountString:sub(#amountString - (sizeX - i), #amountString - (sizeX - i)))

--button on/off color
bactive = colors.cyan
binactive=colors.gray
--text on/off color
tactive=colors.white
tinactive=colors.black
--Background color
bgcolor = colors.black


buttons = {}
	
	
--I understand this is where values are being put into the table

	  function newButton(id,xmin,xmax,ymin,ymax,text,func)
		buttons[id] = {}
		buttons[id]["xmin"] = xmin
		buttons[id]["xmax"] = xmax
		buttons[id]["ymin"] = ymin
		buttons[id]["ymax"] = ymax
		buttons[id]["active"] = false
		buttons[id]["text"] = text
		buttons[id]["func"] = func
	  
	  end
	  ---------------------------------------------------------------------------------
	  function printButton(id)
		ymin = buttons[id]["ymin"]
		ymax = buttons[id]["ymax"]
		xmin = buttons[id]["xmin"]
		xmax = buttons[id]["xmax"]
		text = buttons[id]["text"]
		ia = buttons[id]["active"]

	  

			width = xmax - xmin
			height = ymax - ymin
		  
			if ia then m.setBackgroundColor(bactive) m.setTextColor(tactive)
			else m.setBackgroundColor(binactive) m.setTextColor(tinactive) end

-- what is happening here? This is where I get lost.
			for j = ymin,ymax do
			 m.setCursorPos(xmin,j)
			  for i = xmin,xmax do

				m.write(" ")

			 end

		   end

		
		m.setCursorPos(xmin + width / 2 - #text / 2 + 1,ymin + height / 2)

	   m.write(text)
	   m.setBackgroundColor(bgcolor)
	  
	  end

Moni1, Moni2 = zDrive.findTperipherals("monitor")

function findTperipherals(p)
s = {}
  for _,v in pairs(rs.getSides()) do
	    if #s == 2 then break end
	    if peripheral.getType(v) == p then
		  table.insert(s, v)
	    end
  end
  return unpack( s )
end

--Set up two peripherals
function findTperipherals(p)
s = {}
  for _,v in pairs(rs.getSides()) do
	if #s == 2 then break end
	if peripheral.getType(v) == p then
	  table.insert(s, v)
	end
  end
  return unpack( s )
end
function wrapTperipherals(j, l, k, m)
if k ~= nil then
  MO = 2
  l = peripheral.wrap(j)
  advMon(l, j)
  m = peripheral.wrap(k)
  advMon(m, k)
elseif j ~= nil then
  MO = 1
  l = peripheral.wrap(j)
  advMon(l, j)
  notes("IMPORTANT", "With a second advanced monitor","you will see more information.")
  sleep(3)
else
  niceError("No advanced monitors attached to the computer","")
  return
end
end

--Header function
function header(te)
  term.clear()
  term.setCursorPos(1, 1)
  term.setTextColor(colors.cyan)
  cprint("---------========= "..te.." =========---------")
  term.setTextColor(colors.white)
end

--Error Messages
function niceError(Ea, Eb)
  header("Error!")
  term.setCursorPos(1, 3)
  cprint(Ea)
  cprint(Eb)
  local x, y = term.getCursorPos()
	if Eb == "" then
	y2 = y
	elseif Eb ~= "" then
	y2 = y + 1
	end
  term.setCursorPos(1, y2)
  term.setTextColor(colors.cyan)
  cprint("---------========= Error! =========---------")
  term.setTextColor(colors.white)
  error()
end

--Center text print
function cprint (t)
  local x2, y2 = term.getCursorPos()
  local x, y = term.getSize()
  term.setCursorPos(math.ceil((x/2) - (t:len()/2)), y2)
  print(t)
end

--Notes
function notes(te, ta, tb)
  term.clear()
  term.setCursorPos(1, 1)
  term.setTextColor(colors.cyan)
  cprint("---------========= "..te.." =========---------")
  term.setCursorPos(1, 3)
  term.setTextColor(colors.white)
  cprint(ta)
  cprint(tb)
  term.setCursorPos(1, 6)
  term.setTextColor(colors.cyan)
  cprint("---------========= "..te.." =========---------")
  term.setCursorPos(1, 8)
  term.setTextColor(colors.white)
end

--Set up two peripherals
MO = 0

Moni1, Moni2 = zDrive.findTperipherals("monitors")

--Moni1 holds side info and mon1 is variable to write with
zDrive.wrapTperipherals(Moni1, mon1, Moni2, mon2)

mon1.write("This is Monitor 1!")
mon2.write("This is Monitor 2!")
print("There is "..MO.."/2 monitors connected.")

for k,v in pairs(redstone.getSides()) do
  if peripheral.getType(v) == "monitor" then
  return v
  end
  reader1, reader2 = tostring(v)
  print(reader1.."   "..reader2)
end

(wrap the sensor to "nreader" or somesuch here)
u = 0
for i=1,9 do
  UUID,state,title,cardinfotable = nreader.get(i)
  if UUID ~= nil then
  print(something)
  u = u + 1
  else u = u
  end			
end
print(u.."slot in use"

for k,v in pairs(redstone.getSides()) do
  if peripheral.getType(v) == "monitor" then
  print(v)
  print(#v)
  end
end