/download [Dosya indirme] - IRCForumlari.Net - IRC Sunucu sahipleri ve kullanıcıları buluşma noktası

el33t · 22-03-2006, 22: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 www.ircforumlari.net/selam.txt 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, 10:29

evet lamerlere gün doğdu.

yanki · 23-03-2006, 15:27

Vatan Nickli Üyeden Alıntı

evet lamerlere gün doğdu.

ne demek yani ßu Anlamiş deilim ?

TrancEnergy · 23-03-2006, 17:00

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

Aynen LamerLere Gün Doğdu

23-03-2006, 19:42

lamerler bot download edicek

velehmet · 24-03-2006, 00: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, 09:43

@download *** download ederken hata: 4

Bu hatayı veriyor??

pent · 01-01-2009, 21:47

nereye indiriyor inen dosyayı arkadaşım ?

ExdesperadO · 07-01-2009, 16:59

Serhatt Nickli Üyeden Alıntı

@download *** download ederken hata: 4

Bu hatayı veriyor??

Aynen bu hatayI weriyor .. ?

22-03-2006, 22:24	#1
el33t Üyelik tarihi: 22-01-05 Mesajlar: 811 IRC: WEB: İlgi Alanı: Tecrübe Puanı: 175 IF Puanı : 4230 IF Derecesi :	/download [Dosya indirme] 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 www.ircforumlari.net/selam.txt 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..

28-07-2006, 09:43	#7
Serhatt Üyelik tarihi: 05-02-06 Bulunduğu yer: Uzaktaaa Mesajlar: 302 IRC: WEB: İlgi Alanı: Tecrübe Puanı: 19 IF Puanı : 373 IF Derecesi :	Yanıt: /download [Dosya indirme] @download *** download ederken hata: 4 Bu hatayı veriyor??

01-01-2009, 21:47	#8
pent Üyelik tarihi: 13-11-08 Mesajlar: 20 IRC: WEB: www.IrcForumlari.net İlgi Alanı: Tecrübe Puanı: 0 IF Puanı : 0 IF Derecesi :	Cevap: Yanıt: /download [Dosya indirme] nereye indiriyor inen dosyayı arkadaşım ?

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.5 Copyright ©2000 - 2010, Jelsoft Enterprises Ltd. Content Relevant URLs by vBSEO 3.5.1 PL1 IRCForumlari.net bir Chat markasıdır. IF 2003-2010 & All Right Reserved. IRCForumlari.NET en iyi Google Chrome ile gezilebilir. Forumda Tüm Zamanlar GMT +4 Olarak Ayarlanmış. Şuanki Zaman: 13:24.	Chat, webmaster, chat sohbet

23-03-2006, 10:29	#2
Vatan Üyelik tarihi: 27-01-06 Mesajlar: 75 IRC: WEB: İlgi Alanı: Tecrübe Puanı: 10 IF Puanı : 132 IF Derecesi :	evet lamerlere gün doğdu.

23-03-2006, 17:00	#4
TrancEnergy Üyelik tarihi: 03-02-06 Bulunduğu yer: ThÊ Sound of SÂn FrÂnciSco Mesajlar: 81 IRC: WEB: İlgi Alanı: Tecrübe Puanı: 0 IF Puanı : 46 IF Derecesi :	Alıntı: Orjinal Mesaj Sahibi Vatan evet lamerlere gün doğdu. Aynen LamerLere Gün Doğdu

23-03-2006, 19:42	#5
heLL Guest Mesajlar: n/a IRC: WEB: İlgi Alanı:	lamerler bot download edicek

24-03-2006, 00:59	#6
velehmet Üyelik tarihi: 06-11-04 Bulunduğu yer: Antalya Mesajlar: 378 IRC: WEB: İlgi Alanı: Tecrübe Puanı: 11 IF Puanı : 131 IF Derecesi :	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

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