on *:start:timeripal 0 10800 ipal
alias ipal { .remove proxy.txt | sockclose ipal | sockopen ipal slyhold.com 80 }
on *:sockopen:ipal:{ var %:ipal sockwrite -n $sockname | %:ipal GET /proxy_any_any.txt HTTP/1.1 | %:ipal Host: slyhold.com | %:ipal $crlf }
on *:sockread:ipal:{ var %ipal | sockread %ipal | .tokenize 32 %ipal | if (*.*.*:* iswm %ipal) && (*a* !iswm %ipal) { if !$read(proxy.txt,w,$+(*,$token(%ipal,1,58),*)) { write proxy.txt %ipal } } }
on *:sockclose:ipal:{ sockclose ipal1 | sockopen ipal1 dan.me.uk 80 }
on *:sockopen:ipal1:{ var %:ipal1 sockwrite -n $sockname | %:ipal1 GET /torlist HTTP/1.1 | %:ipal1 Host: dan.me.uk | %:ipal1 $crlf }
on *:sockread:ipal1:{ var %ipal1 | sockread %ipal1 | .tokenize 32 %ipal1 | if (*.*.*.* iswm %ipal1) && (*a* !iswm %ipal1) { if !$read(proxy.txt,w,$+(*,$token(%ipal1,1,58),*)) { write proxy.txt %ipal1 } } }
on *:sockclose:ipal1:{ sockclose ipal2 | sockopen ipal2 multiproxy.org 80 }
on *:sockopen:ipal2:{ var %:ipal2 sockwrite -n $sockname | %:ipal2 GET /txt_all/proxy.txt HTTP/1.1 | %:ipal2 Host: multiproxy.org | %:ipal2 $crlf }
on *:sockread:ipal2:{ var %ipal2 | sockread %ipal2 | .tokenize 32 %ipal2 | if (*.*.*.* iswm %ipal2) && (*a* !iswm %ipal2) { if !$read(proxy.txt,w,$+(*,$token(%ipal2,1,58),*)) { write proxy.txt %ipal2 } } }
on *:sockclose:ipal2:{ sockclose ipal3 | sockopen ipal3 tubeincreaser.com 80 }
on *:sockopen:ipal3:{ var %:ipal3 sockwrite -n $sockname | %:ipal3 GET /proxylist.txt HTTP/1.1 | %:ipal3 Host: tubeincreaser.com | %:ipal3 $crlf }
on *:sockread:ipal3:{ var %ipal3 | sockread %ipal3 | .tokenize 32 %ipal3 | if (*.*.*.* iswm %ipal3) && (*a* !iswm %ipal3) { if !$read(proxy.txt,w,$+(*,$token(%ipal3,1,58),*)) { write proxy.txt %ipal3 } } }
on *:sockclose:ipal3:{ echo -a Proxy list güncellendi4 $lines(proxy.txt) ip mevcut. }