View difference between Paste ID: SYGgZg3y and wTfZ7hpz

 local args={...}
 local sep="|"
 local serv_id=167
 rednet.open("top")
 reader = peripheral.wrap("back")
 rfid=peripheral.wrap("left")
 writer=peripheral.wrap("right")
 
 function on() rs.setOutput("bottom",true) end
 function off() rs.setOutput("bottom",false) end
 
 function check(data)
   if data:sub(1,7)=="CARD|OK" then
      local allow=false
-  rednet.send(serv_id,"CARD|ADD|"..args[2]:sub(1,20)..sep..s.."|")
+    for door in string.gmatch(data:sub(9),"(.-),") do
       if door == ourdoor then allow=true break end
     end
 
     if not allow then return end
     on()
     os.sleep(1.5)
-  rednet.send(serv_id,"CARD|ADD|"..args[2]:sub(1,20)..sep..s..sep)
+    off()
   else
     off()
   end
 end
 
 function checkrfid(data)
   if data:sub(1,7)=="CARD|OK" then
     on()
     valid=true
   else
     if not valid then
       off()
     end
   end
 end
 
 if args[1]=="writemag" then -- name,daat
   local s=table.concat({unpack(args,3)}," "):sub(1,79)
   reader.beginWrite(args[2]:sub(1,20)..sep..s,args[2].."'s ID card")
   rednet.send(serv_id,"CARD|ADD|"..args[2]:sub(1,20)..sep..s.."|"..args[3]..sep)
   print("Swipe a blank card!")
-    if data:sub(1,7)=="CARD|OK" then
+
-      print("Authentication sucessful.")
+
   local s=table.concat({unpack(args,3)}," "):sub(1,79)
-      os.sleep(1.5)
+
   print("Writing..")
-      else
+  rednet.send(serv_id,"CARD|ADD|"..args[2]:sub(1,20)..sep..s..sep..args[3]..sep)
   os.pullEvent("rfid_written")
 else
   while true do
     reader.setInsertCardLight(true)
     local e,data=os.pullEvent()
     if e=="char" or e=="key" then
       on()
       os.sleep(3)
       off()
     elseif e=="mag_swipe" then
     reader.setInsertCardLight(false)
     data=data..sep
-      if data:sub(1,7)=="CARD|OK" then
+
-        on()
+
-        valid=true
+
-      else
+
-        if not valid then
+
-        off()
+
-        end
+
-      end
+
     check(data)
     elseif e=="rfid_detected" then
       data=data..sep
-    else print(e,data) end
+
       local id=0
       while id~=serv_id do
         local i,resp=rednet.receive()
         id=i
         data=resp
       end
 
       checkrfid(data)
 
     elseif e=="rfid_scan_done" then if not valid then off() end valid=false
     end
     rfid.scan(3)
   end
 end