View difference between Paste ID: vWSMVhJS and YZLNksBr

 function clear()
 term.clear()
 term.setCursorPos(1,1)
 end
-function setTable(name, freq, xmin, xmax, ymin, ymax)
+
 lock = false
-   mob[name]["freq"] = freq
+
-   mob[name]["active"] = false
+
 tX, tY = term.getSize()
 
-   mob[name]["xmax"] = xmax
+rednet.open("right")
-   mob[name]["ymax"] = ymax
+
 clear()
 local mob={}
 redout = {}
-   setTable("Chicken", colors.red, 17, 24, 2, 3)
+sheep = false
-   setTable("Cow", colors.white, 17, 20, 6, 7)
+
-   setTable("Pig", colors.yellow, 17, 20, 4, 5)
+function setTable(name, active, xmin, ymin, actiontype, action)
    --start, Whether it should be on or off when the program starts (true = on, false = off)
    --Modified by SuPeRMiNoR2
    mob[name] = {}
    mob[name]["action"] = action
    mob[name]["actiontype"] = actiontype
    mob[name]["active"] = active
    mob[name]["xmin"] = xmin
    mob[name]["ymin"] = ymin
    templen = xmin + #name - 1
    mob[name]["xmax"] = templen
    mob[name]["ymax"] = ymin
 end
 
-      local on = data["active"]
+
    setTable("Reboot", false, 35, 17, "other", "reboot")
-      fill(17,y,currColor, name)
+   setTable("Steam Engines", true, 1, 3, "other", "steam")
-      y = y+2
+   setTable("Lock", true, 1, 17, "other", "lock")
    setTable("Lights", true, 1, 1, "other", "lights")
 end
 
 function fill(x,y,color,text)
   term.setBackgroundColor(color)
   term.setCursorPos(x,y)
   term.write(text)
   term.setBackgroundColor(colors.black)
-          print(name)
+
 
 function screen()
 while true do
 term.clear()
    if lock == false then
-function setWire()
+
    local currColor
    for name,data in pairs(mob) do
-      if data["active"] == false then
+      x = data["xmin"]
-         wire = colors.combine(wire, data["freq"])
+      y = data["ymin"]
       local on = data["active"]
       if on == true then currColor = colors.lime else currColor = colors.red end
-   redstone.setBundledOutput("bottom", wire)
+      fill(x,y,currColor, name)
    end
    fill(36, 1, colors.lime, os.time())
-fillTable()
+
-setWire()
+   if lock == true then
    fill(12, 9, colors.red, "Control Panel Locked")
-  term.clear()
+
-  screen()
+
---  fill(17,2,colors.lime, "Chicken")
+sleep(0.2)
-  local e,side,x,y = os.pullEvent("monitor_touch")
+
-  print(x..":"..y)
+
-  checkxy(x,y)
+
-  setWire()
+
-  sleep(.1)
+
-end
+
         if x>=data["xmin"] and x<= data["xmax"] then
 	  if lock == false then
           data["active"] = not data["active"]
 	  print(name..":"..tostring(x)..":"..tostring(y))
           end
           if lock == true then
           if name == "Lock" then
           data["active"] = not data["active"]
           end
           end
         end
       end
    end
 end
 
 function doStuff()
    local wire = 0
    for name, data in pairs(mob) do
       if data["active"] == true then
         if data["actiontype"] == "other" then
 		if data["action"] == "reboot" then
 			os.reboot()
 		end
 		if data["action"] == "sheep" then
 			sheep = true
 		end
 		if data["action"] == "steam" then
 			rednet.broadcast("steam_on")
 		end
 		if data["action"] == "lock" then
 			lock = true
 		end
 		if data["action"] == "lights" then
 			rednet.broadcast("lights_on")
 		end
 	end
       end
      if data["active"] == false then
 	 if data["actiontype"] == "wire" then
 		if data["inver"] == true then
         		wire = colors.combine(wire, data["action"])
 		end
 	end
 	if data["actiontype"] == "other" then
 		if data["action"] == "sheep" then
 			sheep = false
 		end
 	end
 	if data["action"] == "steam" then
 			rednet.broadcast("steam_off")
 		end
 	if data["action"] == "lock" then
 			lock = false
 		end
         if data["action"] == "lights" then
 			rednet.broadcast("lights_off")
 	end
     end
 end
 redstone.setBundledOutput("bottom", wire)
 end
 
 function mainLoop()
 while true do
   local e,side,x,y = os.pullEvent("monitor_touch") --Get event
   print("Click: "..tostring(x)..":"..tostring(y))
   checkxy(x,y) --Check to see if click is on a button, and toggle state if it is
   doStuff() --Reads button state and does actions
   sleep(0.1)
 end
 end
 
 function main()
 fillTable() --Populate data table
 sleep(2)
 doStuff() --Run once to start autostart things
 parallel.waitForAll(mainLoop, screen)
 end
 
 main()