Tekil Mesaj gösterimi
Alt 23 Şubat 2012, 22:41   #2
Çevrimdışı
fav
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özele gelenin resmini görün




fav Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Evet arkadaşlar adından'da anlaşılacağı gibi özelinize gelen kişinin belirlemiş olduğu resmi o kişinin özel arkaplanında görmenize olanak sağlayan bir koddur

Bu kod sayesinde mirc üzerinde insanlar birbirlerini özel actıklarında görebilecek

Kullanımı
öncelikle her ikitarafta aynıkod mevcut olmalı

mirc ana dizini içersine avatar adlı klasöre resimlerini koymanız gerekmektedir
Resim boyutlarınız 16384 byte yi gecmemesi gerekmektedir

mirc veri aktarımı konusunda böyle bir sorun var mirc scriptlerde Binary files %veri ile ilgili araştırmalarım var busorunu aşabilirsem sanıyorumki aşılacak bir sorun güncellemeler geliştirmeler olacaktır

not: kod herkes tarafından geliştirme ve kullanıma açıktır.


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias urs { sockclose ursm | sockopen ursm [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 } on *:sockopen:ursm: { bread %ds 0 $lof(%ds) &file | set %ip $calc($bvar(&file,0) + 492) | bread $qt(%ds) 0 $file($qt(%ds)).size &img | sockwrite -n $sockname POST /upload.php HTTP/1.1 | sockwrite -n $sockname Accept: text/html, application/xhtml+xml, */* | sockwrite -n $sockname Referer: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | sockwrite -n $sockname Accept-Language: tr-TR sockwrite -n $sockname User-Agent: Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0) | sockwrite -n $sockname Content-Type: multipart/form-data; boundary=---------------------------7dc1cdf2f043e | sockwrite -n $sockname Host: d.hizliresim.com | sockwrite -n $sockname Content-Length: %ip | sockwrite -n $sockname Connection: Keep-Alive | sockwrite -n $sockname Cache-Control: no-cache sockwrite -n $sockname Cookie: __utma=251736208.584732837.1328376985.1329045042.1329064944.11; __utmz=251736208.1329036173.9.6.utmcsr=google|utmccn=(organic)|utmcmd=organic|utmctr=h%C4%B1zl%C4%B1%20resim%20y%C3%BCkle; __utmb=251736208.1.10.1329064947; __utmc=251736208; __utma=100797268.395949191.1327231426.1328356989.1329037975.3; __utmz=100797268.1329036275.3.3.utmcsr=hizliresim.com|utmccn=(referral)|utmcmd=referral|utmcct=/ sockwrite -n $sockname | sockwrite -n $sockname -----------------------------7dc1cdf2f043e | sockwrite -n $sockname Content-Disposition: form-data; name="upload"; filename="C:\Program Files (x86)\1\%ds" | sockwrite -n $sockname Content-Type: image/png | sockwrite -n $sockname | sockwrite $sockname &img | sockwrite -n $sockname | sockwrite -n $sockname -----------------------------7dc1cdf2f043e | sockwrite -n $sockname Content-Disposition: form-data; name="size" | sockwrite -n $sockname | sockwrite -n $sockname | sockwrite -n $sockname -----------------------------7dc1cdf2f043e sockwrite -n $sockname Content-Disposition: form-data; name="effect" | sockwrite -n $sockname | sockwrite -n $sockname | sockwrite -n $sockname -----------------------------7dc1cdf2f043e | sockwrite -n $sockname Content-Disposition: form-data; name="rotate" | sockwrite -n $sockname | sockwrite -n $sockname | sockwrite -n $sockname -----------------------------7dc1cdf2f043e-- | sockwrite -n $sockname } on *:sockread:ursm: { var %x | sockread %x | if (<img style="max-width: 336px; border: 1px solid #000;" src= isin %x) { var %itt $gettok(%x,3-,47) | var %brrg $gettok(%itt,1-,47) | set %brg $gettok(%brrg ,1,34) } } alias resimindir { if * $+ / $+ * !iswm $1 || $2 { echo -a * Hata! Oluştu } | if $sock(resin) || $sock(resin2) { echo -a * Yoğun veri iletişimi Tesbit edildi } else { .unset %resin.* | .set %resin.govde $remove($1,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | .set %resin.uzanti $gettok(%resin.govde,2-,47) | .set %resin.ana $gettok(%resin.govde,1,47) | .set %resin.ismi $gettok(%resin.govde,$numtok(%resin.govde,47),47) | sockopen resin %resin.ana 80 } } on *:sockopen:resin: { if $sockerr { echo 3 -a * Bağlantı Sorunu Oluştu } | else { sockwrite -n $sockname GET / $+ %resin.uzanti HTTP/1.0 | sockwrite -n $sockname Host: %resin.ana $+ $crlf $+ $crlf } } on *:sockread:resin: { var %ğ | sockread %ğ | if (*404*Not* iswm %ğ) || (*Found* iswm %ğ) { echo 4 -a * HATA! Veri iletişimi| sockclose resin | sockclose resin2 | .unset %resin.* | .halt } if (*403* iswm %ğ) || (*Forbid* iswm %ğ) { echo 4 -a * HATA! Yasak veri | sockclose resin | sockclose resin2 | .unset %resin.* | .halt } | if (* !iswm %ğ) { .sockclose resin2 | sockrename resin resin2 | write -c $qt(%resin.ismi) } } alias query { .timer 1 1 echo 3 $$1 Kendi Özelinize Resim Koymak için 4 Tıklayınız | query $$1 } on *:sockread:resin2: { sockread &pdata | bwrite $shortfn(%resin.ismi) -1 -1 &pdata } on *:sockclose:resin2: { if $isfile(%resin.ismi) { set %rsm %resin.ismi | .unset %resin.* } } alias dsy { var %fv $sfile($mircdir\Avatar\,Lütfen bir dosya seçiniz.,TAMAM) | set %ds avatar\ $+ $gettok(%fv,-1,92) | .timeruplod 1 3 urs } on ^*:notice:*:?: { if (.jpg isin $2) { set %fg $2 | set %niickk $nick | resimindir [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+ %fg | .notice %niickk %brg >-x .timerdowunload 3 5 yklr | write avt.txt %rsm haltdef } if (>-x isin $2) { set %fg $1 | set %niickk $nick | resimindir [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+ %fg | .timerdowunload 1 10 yklr | write avt.txt %rsm } haltdef } alias yklr { /Background -dp %niickk " $+ %rsm $+ " } on *:open:?:*:{ .notice $nick > %brg | echo 3 $nick Kendi Özelinize Resim Koymak için 4 Tıklayınız } on *:connect: { tmz } alias tmz { var %x = 1 | var %t = $lines(avt.txt) | while %x <= %t { .timer 1 $calc(%x * 2) .remove $read(avt.txt,%x) | inc %x } } on ^*:hotlink:*:*: { if Tıklayınız isin $strip($1) { return } | halt } on *:hotlink:*:*: { if Tıklayınız isin $strip($1) { if !$exists(Avatar) { mkdir Avatar } | var %fv $sfile($mircdir\Avatar\,Lütfen bir dosya seçiniz.,TAMAM) | set %ds avatar\ $+ $gettok(%fv,-1,92) | urs } } menu * { Avatarım .Karşı Tarafın göreceği Resiminizi Seçiniz:dsy .Klasöre Resim ekleyiniz:run $mircdiravatar }


kod dosyasında url adresleri tam yüklenmediği için txt olarak tekrar ekledim kodu arkadaşlar

not:.png + .jpg + .bmp uzantılarını desteklemektedir kodumuz
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if (.bmp isin $2) { set %fg $2 | set %niickk $nick | resimindir [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+ %fg | .notice %niickk %brg >-x .timerdowunload 3 5 yklr | write avt.txt %rsm haltdef }

bu kısımdan örnek alınarak uzantı eklenebilir

Burdan İndir Bu forumdaki ekleri görübilmek için 25 mesaja sahip olmanız gerekir. Sizin 0 Mesajınız var.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver