alias geton {
;aşağıdaki kısıma
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yerine istediğin sitenina adresini yazıcan
;eğer adres
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] gibi ise yine ilk / tan onceki ile http:// arasını yazıcan
; yani
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ve aşağıdaki GET / dan sonra yazılacak olan / kısıma da
; /denem/a.htm
sockopen getonaddress
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}
on *:sockopen:getonaddress: {
;aşağıda GET ten sonraki / yerine dosya adını yazıcan mesela adres
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ise /istenen.txt yazıcaksın
var %GetSend = $+(GET / HTTP/1.0,$CrLf,Accept: */*",$CrLf,User-Agent: Mozilla4.0,$CrLf,Host: $ip,$CrLf,$CrLf)
echo -s %getsend
sockwrite -n $sockname %GetSend
}
on *:sockread:getonaddress*: {
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:getonaddress: echo -a $+([,$sockname,]) Socketi kapandı.