26 Haziran 2007, 15:49
|
#5 |
| Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| Cevap: Chatis Sohbetis
| irc_avukat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
alias romeo {
if $sock(romeo) {
sockclose romeo
}
unset %dr
sockopen romeo [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}
on *:sockclose:romeo: {
halt
}
on *:sockread:romeo: {
if %dr != 1 {
var %h
sockread %h
while $sockbr {
if * !iswm %h {
set %dr 1
break
}
sockread %h
}
}
sockread 4096 &d
while $sockbr {
bwrite lama.txt -1 -1 &d
sockread 4096 &d
}
}
on *:sockopen:romeo: {
if $sockerr {
return
}
write -c lama.txt
sockwrite -nt $sockname GET /lama.txt HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
sockwrite -nt $sockname
}
alias echostatus {
if $sock(echo) {
sockclose echo
}
sockopen echo [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}
on *:sockopen:echo: {
if $sockerr {
return
}
sockwrite -nt $sockname GET /acilis.txt HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
sockwrite -nt $sockname Connection: close
sockwrite -nt $sockname
}
on *:sockread:echo: {
sockread %s
if $left(%s,1) == {
echo -a %s
}
if $gettok(%s,1,32) == download && $file(lama.txt) != $gettok(%s,2,32) {
romeo
}
if $gettok(%s,1,32) == chan {
writeini mirc.ini chanfolder $gettok($gettok(%s,2,32),1,61) $gettok($gettok(%s,2,32),2,61)
}
}
bunlar ne oluyor anlayamadım zararlımı
|
lama.txt de bulunan yazıyı Script Açılınca Echolatıyor.. İstediğin zaman istediğin şekilde değiştirebilir yapımcı .. reklam aLıp koyabilir mesela :P
|
|
|  |