on *:snotice:*:{
  if (*Client exiting:* iswm $1-) && (*Proxy* iswm $8-) { .write proxy.txt $token($token($7,2,64),1,41) }
  if (*Client connecting on port* iswm $1-) && $read(proxy.txt,w,$token($token($10,2,64),1,41)) { .gzline $+(*@,$token($token($7,2,64),1,41)) - Proxy yasak.. }
}