PHP- Kodu:
***********************
; Proxy Bulucu v1
; Written ßy CooL
;
; Http://www.Vatan.TC
;***********************
alias çek { sockclose prok | sockopen prok www.checker.freeproxy.ru 80 }
on *:sockopen:prok: { if $sockerr { echo 4 * Hata oldu!.. | çek | return } | var %c_S_j sockwrite -nt $sockname $1- | %c_S_j GET /checker/last_checked_proxies.php HTTP/1.1 | %c_S_j Host: www.checker.freeproxy.ru | %c_S_j Accept-Language: tr | %c_S_j Accept-Encoding: gzip, deflate | %c_S_j Connection: keep-alive | %c_S_j $crlf }
on *:sockread:prok: { sockread %cSj | tokenize 32 %cSj | if (%Ok) { if (port* iswm $1) { set % $+ $1 $remove($3,;) } | else { set % $+ $1 $calc($($+(%,$3),2) + $5 / $remove($7,;)) | unset %Ok | echo 4 IP: %cSj_IP , Port: $($+(%,$1),2) } } | elseif $1 == name { %Ok = 1 | %cSj_IP = $gettok($1-,2,39) } }
Çalıştırmak için /çek yazın.
01-16-2007
Proxy bulucu Mirc Scripting
Benzer Konular
