Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias geton {
.enable #socks
sockopen $+(getonadrs-,$remove($1-,http://)) $gettok($remove($1-,http://),1,47) 80
}
#socks on
on *:sockopen:getonadrs-*: {
var %GetSend = $+(GET $+(/,$right($sockname,$+(-,$pos($sockname,/)))) HTTP/1.0,$CrLf,Accept: */*",$CrLf,User-Agent: Mozilla4.0,$CrLf,Host: $mid($sockname,$calc($pos($sockname,-) + 1),$calc($pos($sockname,/) - $pos($sockname,-) - 1)),$CrLf,$CrLf)
sockwrite -n $sockname %GetSend
}
on *:sockread:getonadrs-*: {
if ($sockerr > 0) return
sockread %getonaddress
;aşağıdaki kısımdaki echo -s %getonaddress yerine write dosyaadi %getonaddress te yazdırabilirsin
;buradaki %getonaddress web sayfasından gelen değer
if $strip(%getonaddress) { echo -s %getonaddress }
}
on *:sockclose:getonadrs-*: {
echo 4 -a $+([,$sockname,]) Socketi kapandı.
.disable #socks
}
#socks end