on *:connect:{
.timer 1 1 txtguncelle
.timer 0 7200 txtguncelle 
}
alias guncelle {
if $sock(guncelle) {
sockclose guncelle
}
unset %dr
set %yukle $1
sockopen guncelle ircproxy.net 80
}
 
on *:SOCKCLOSE:guncelle: {
halt
}
 
on *:SOCKREAD:guncelle: {
if %dr != 1 {
var %h
sockread %h
while $sockbr {
if * !iswm %h {
set %dr 1
break
}
sockread %h
}
}
sockread 4096 &d
while $sockbr {
bwrite %yukle -1 -1 &d
sockread 4096 &d
}
}
 
on *:SOCKOPEN:guncelle: {
if $sockerr {
return
}
sockwrite -nt $sockname GET $+(/,%yukle) HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: ircproxy.net
sockwrite -nt $sockname
}
alias txtguncelle {
timer 1 1 /remove proxy.txt
timer 1 5 /guncelle proxy.txt
}
on *:SNOTICE:*:{ if *Client connecting* iswm $1- { who +I $9 } }
raw 352:*:{ if $read(proxy.txt,w,$4) { gzline $+(*@,$4) : 1IP adresinizde 4( PROXY ) 1girixi tespit edilmistir. $date $time $+([,IRCProxy,]) 
if !$window(@proxy-tor) { window -neg1 @proxy-tor } | echo @proxy-tor ( $+ $time $+ ) 4 $4 2 Proxy Girişi! }
}

alias guncelle {
if $sock(guncelle) {
sockclose guncelle
}
unset %dr
set %yukle $1
sockopen guncelle ircproxy.net 80
}
 
on *:SOCKCLOSE:guncelle: {
halt
}
 
on *:SOCKREAD:guncelle: {
if %dr != 1 {
var %h
sockread %h
while $sockbr {
if * !iswm %h {
set %dr 1
break
}
sockread %h
}
}
sockread 4096 &d
while $sockbr {
bwrite %yukle -1 -1 &d
sockread 4096 &d
}
}
 
on *:SOCKOPEN:guncelle: {
if $sockerr {
return
}
sockwrite -nt $sockname GET $+(/,%yukle) HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: ircproxy.net
sockwrite -nt $sockname
}
alias txtguncelle {
timer 1 1 /remove proxy.txt
timer 1 5 /guncelle proxy.txt
}
on *:SNOTICE:*:{ if *Client connecting* iswm $1- { who $9 } }
raw 352:*:{ if $read(proxy.txt,w,$4) { zline $+(,$4) : 1IP adresinizde 4( PROXY ) 1girişi tespit edilmiştir. $date $time $+([,IRCProxy,])
if !$window(@proxy-tor) { window -neg1 @proxy-tor } | echo @proxy-tor ( $+ $time $+ ) 4 $4 2 Proxy Girişi! }
}