View difference between Paste ID: 05NTcfxk and 6fEgZqqn

 function quitProgram()
-  manual=redstone.getInput("front")
+local e, msg=os.pullEvent("char")
-  if manual then
+	if msg=="q"
-    cell.setEnergySend(100)
+	then quit=true
-   else
+	end
-     cell.setEnergySend(0)
+
-   end
+
 function man_ovr()
 local e=os.pullEvent()
 if e=="redstone" then
-for i=0,sz-1, 1 do
+ovr=true
 end
 end
 
 function readSlots()
   for i=0, sz-1, 1 do
       tbl[i+1]=p.getStackInSlot(i)
       term.setCursorPos(1,1)
       pct= math.floor((i+1) / 27 * 100)
       print(pct.. "% complete")
   end
 end
 
-  for i=1,60, 1 do
+function wait()
-  man_ovr()
+sleep(0.05)
-  term.clear()
+
-  term.setCursorPos(1,1)
+
-  p=peripheral.wrap("bottom")
+
-  n=p.getInvName()
+
-  sz=p.getSizeInventory()
+
-  tbl={}
+
 
 -- infinite loop
 while true do
 parallel.waitForAny(quitProgram,wait,man_ovr)
 
---  mon.addText(3,30,tostring(pct), 0xFFFFFF)
+if quit ==true then
 print ("quitting program")
-    end
+break
-    if tbl then
+
-      slots=#tbl
+
-      mon.clear()
+if ovr==true then
-      mon.addText(3,25,tostring(slots).." slots full",0xFFFFFF)
+
-      --note.triggerNote()
+else
-      --note.triggerNote()
+
-      --mon.addText(3,20,tostring(60-
+
-      if slots>10 then
+--60 cycles till it exits and provides power to clear any machines
-        cell = peripheral.wrap("left")
+
-        cell.setEnergySend(100)
+end