el33t · 22-03-2006, 21:24

Aşağıdaki kodu son günlerde herkes istediği için mircscripts.org adresinden ^Andy'nin download için socket örneğini (http://www.mircscripts.org/download.php?id=85) sizler için biraz değiştirdim. Kodu remote'a (ALT+R) koyuyorsunuz.
/download adres istediğiniz-dosya komutuyla çalışıyor, örneğin [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] dosyasını almak istiyorsak kullanmamız gereken komut:
/download ircforumlari.net selam.txt
İşte kod:

alias download {
if ($sock(download)) {
echo $colour(info text) @download *** başka bir dosya download ediliyor, birazdan tekrar deneyiniz.
return
}
sockopen download $1 80
sockmark download $1 $2
}
on *:sockopen:download:{
if ($sockerr) {
echo $colour(info text) @download *** download ederken hata: $sockerr
return
}
write -c $gettok($sock($sockname).mark,2,32)
unset %downloadlength %downloadready
window -c @download
sockwrite -n $sockname GET $+(/,$gettok($sock($sockname).mark,2,32)) HTTP/1.0
sockwrite -n $sockname Accept: */*
sockwrite -n $sockname Host: $gettok($sock($sockname).mark,1,32)
sockwrite -n $sockname
}
on *:sockread:download:{
if (%downloadready != 1) {
var %header
sockread %header
while ($sockbr) {
if (Content-length: * iswm %header) {
%downloadlength = $gettok(%header,2,32)
if (* !iswm $window(@download)) window @download
echo $colour(info text) @download *** dosya boyutu: %downloadlength bytes
}
elseif (* !iswm %header) {
%downloadready = 1
%downloadoffset = $sock($sockname).rcvd
break
}
sockread %header
}
}
sockread 4096 &d
while ($sockbr) {
if (* !iswm $window(@download)) window @download
echo $colour(info text) @download *** alınan: $round( $calc(100 * ($sock($sockname).rcvd - %downloadoffset) / %downloadlength) ,1) $+ %
bwrite $gettok($sock($sockname).mark,2,32) -1 -1 &d
sockread 4096 &d
}
}
on *:sockclose:download:{
echo $colour(info text) @download *** indirme tamamlandı.
}

Umarım işinize yarar..

Vatan · 23-03-2006, 09:29

evet lamerlere gün doğdu.

yanki · 23-03-2006, 14:27

Alıntı:

Vatan Nickli Üyeden Alıntı

evet lamerlere gün doğdu.

ne demek yani ßu Anlamiş deilim ?

Deejays · 23-03-2006, 16:00

Alıntı:
Orjinal Mesaj Sahibi Vatan
evet lamerlere gün doğdu.

Aynen LamerLere Gün Doğdu

23-03-2006, 18:42

lamerler bot download edicek

velehmet · 23-03-2006, 23:59

Daha download edilmeden ve lamerlik taslanmadan insanları lamer yerine koyan insanlar lamerliğin kitabını yazacak seviyeye gelince insanları hor görmemeyi öğrenebilecekler. lamer ne demek bilmeden cevap yazmakda bir lamerliktir

Serhatt · 28-07-2006, 08:43

@download *** download ederken hata: 4

Bu hatayı veriyor??

pent · 01-01-2009, 20:47

nereye indiriyor inen dosyayı arkadaşım ?

ExdesperadO · 07-01-2009, 15:59

Alıntı:

Serhatt Nickli Üyeden Alıntı

@download *** download ederken hata: 4

Bu hatayı veriyor??

Aynen bu hatayI weriyor .. ?

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Copyright	Link
Powered by vBulletin® Version 3.8.4 Copyright ©2000 - 2010, Jelsoft Enterprises Ltd. IRCForumlari.net bir Chat markasıdır. IF 03-09 & All Right Reserved. Sitemizdeki Materyallerin Kaynak Belirtilmeden Başka Sitelerde Yayınlanması Yasaktır.	Chat, webmaster, mirc, mirc indir, Chat, mirc, sohbet, mirc

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)