IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  reklamver

>
+
Etiketlenen Kullanıcılar

11Beğeni(ler)
  • 10 Post By L4roXyL
  • 1 Post By L4roXyL

 
 
LinkBack Seçenekler Arama Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 29 Eylül 2012, 20:34   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Baloncuk Tarzı Whois




Yazan: L4roXyL - Hasan AYDENİZ
Tarih: 29 Eylül 2012 - Cumartesi
Not: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]dökümanıdır.


Kodun amacı, kanalda herhangi bir kelimeye($1) tıklandığı zaman; eğer o kelime kanal içerisinde bulunan bir nick ise, o kişinin whois bilgilerini özel pic-win penceresi içerisinde gösterir. Facebook'daki kişinin üzerine geldiğinizde çıkan baloncuk tarzı bilgi penceresi gibi.

Yani kısacası kanalda <nick> veya text içerisinde geçen bir nick-e tıkladığınız zaman, o kişiye ait whois bilgisini online olarak görürsünüz.

Özellikler:
  • Pencere şeffafdır, arkası görülebilir. Bu özelliği kaldırmak istiyorsanız /setlayer-ı kaldırırsınız.
  • Mouse ile pencere üzerinden çıkarsanız, pencere otomatik kapanır.
  • Mouse ile pencere üzerinde çift tıklama yaparsanız, o kişinin özeline gidersiniz(/query nick)
  • Mouse ile pencere üzerinde sol tıklama yaparsanız, o kişinin bulunduğu kanalları aktif ekranda görebilirsiniz.
  • Tüm sonuçlar /whois komutuna ait raw numalarından gelen sonlandırma numarası ile(318) görüntülenir. Bu sizin lag durumunuza veya ircop vb. yetki erişimleri durumuna göre hızlılık gösterir. Yani kısacası pencerenin açılma hızı, muhtemelen 0.5 saniye ile 1.5 saniye arasında değişebilir.

Geliştirmeye açıktır. Renkleri vs. değiştirin isterseniz, ne yaparsanız yapın yani.

Not: HOTLINK olayından dolayı kanaldaki her text tıklanabilir olacaktır. Eğer siz sadece <nick> biçimleri tıklanabilsin istiyorsanız, on hotlink satırını;

Alıntı:
on ^*:hotlink:*<*>*:#:

Olarak değiştirin.

-

Önizleme:


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Kodumuz:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
;written l4roxyl,,. ;date 29/09/2012 ;,,. on ^*:hotlink:*:#: { if ($mouse.key & 1) { if ($regsubex($1,/[ $+ $prefix $+ <>]/g,) ison #) { sline # $v1 .enable #___|___ .whois $v1 $(,%__c = #) return } halt } } alias -l _cp return $+($chr(2),$1,$chr(2)) alias -l _tf { var %m = $chr(32) Dakika,%s = $chr(32) Saniye,%h = $chr(32) Saat return $replace($1-,mins,%m,min,%m,secs,%s,sec,%s,hrs,%h,hr,%h) } alias -l ___|___ { $(,%3 = 250) while /____\ { dec -u %3 1 window @_/ $window(@_/).dx $window(@_/).dy %3 $iif(%3 < 100,$v1,100) setlayer $calc(%3 -35) @_/ if %3 = 0 { window -c @_/ | $iif($hget(%_w),hfree $v1) | break } } } alias -l sq { $(,%_w = $1) $iif($window(@_/),window -c $v1) window -pdBw0zo +bL @_/ $2 $3 0 0 while /?/?_\?\? { inc -u %2 5 window @_/ $calc($2 -10) $calc($3 -10) %2 $iif(%2 >= 100,100,%2) drawrect -rf @_/ $rgb(0,0,0) 1 0 0 %2 %2 setlayer $iif(%2 >= 215,215,%2) @_/ if %2 = 250 break } drawfill -r @_/ $rgb(0,0,0) - 0 0 drawrect -rf @_/ $rgb(65,129,127) 1 0 0 250 7 drawrect -r @_/ $rgb(65,129,127) 1 0 0 248 98 var %_dt__: = drawtext -rop @_/ $rgb(255,255,255) Verdana 10 5 var %_n = $token($hget($1,_id),3-,32) %_n = $iif($len(%_n) >= 32,$mid(%_n,1,32) $+ ..,%_n) %_dt__: 9 Ident: $_cp($token($hget($1,_id),1,32)) %_dt__: 22 İsim: $_cp(%_n) %_dt__: 35 Kanallar: $_cp($token($hget($1,_chans),0,32)) $& - Prefix: $_cp($regex($hget($1,_chans),/([ $+ $prefix $+ ])#./g)) / Sol Tıkla. %_dt__: 48 Nick durumu: $_cp($iif($hget($1,_reg),$v1,Kayıtsız.)) %_dt__: 60 Idle: $_cp($iif($hget($1,_idle),$regsubex($v1,/(\D+)/g,$chr(32) $_tf(\1) $chr(32)),Erişilemiyor.)) %_dt__: 71 Bağlantı: $_cp($iif($hget($1,_sign),$v1,Erişilemiyor.)) %_dt__: 83 Status: $_cp($iif($hget($1,_own),$v1,Normal kullanıcı.)) } menu @_/ { leave:___|___ rclick:!echo -ec info %__c - %_w rumunuzun bulunduğu kanallar: $_cp($hget(%_w,_chans)) dclick:___|___ | query %_w } #___|___ off raw *:*: { haltdef tokenize 32 $rawmsg var %_ = hadd -m $4 if ($2 = 311) %_ _id $5-6 $strip($right($8-,-1)) if ($2 = 307) %_ _reg Kayıtlı. if ($2 = 319) %_ _chans $right($5-,-1) if ($2 = 317) { %_ _idle $duration($5) %_ _sign $asctime($6,dd/mm/yy - hh:nn:ss) } if ($2 = 313) %_ _own $right($5-,-1) if ($2 = 318) { sq $4 $mouse.dx $mouse.dy $active .disable #___|___ } } #___|___ end



Konu L4roXyL tarafından (01 Ekim 2012 Saat 18:01 ) değiştirilmiştir.
 
Alıntı ile Cevapla

 

Etiketler
baloncuk, tarzı, whois


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Baloncuk. dreamy Avatar ve Smiley 0 19 Kasım 2011 14:37
Giriş Çıkış Yapana Whois ( @Whois Penceresinde ) LauReLL mIRC Scripting Hazır Kodlar 12 06 Temmuz 2009 09:30
whois çekene uyarı beraber Sajoin ve 2 kere whois kill olmasını istiyorum nasıldı ? Rekor37 mIRC Scripting Sorunları 1 06 Haziran 2009 15:34
baloncuk sorunu FeriT mIRC Scripting Sorunları 2 17 Aralık 2007 12:40
Baloncuk Sistemi v1.0 McKruGer mIRC Scripting Hazır Kodlar 3 20 Eylül 2006 18:06