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

Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 14 Nisan 2009, 13:16   #11
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: yarim lütfen...




Birazdaha Açarsan İsteğini Yardımcı Olabiliriz Diye Düşünüyorum

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Mobil Chat
Alt 14 Nisan 2009, 13:16   #12
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: yarim lütfen...




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#giriscikis off on ^*:join:#:{ if !$window(@Join/Part) { window -ne @Join/Part } echo $colour(join text) -t @Join/Part *** Giriş: $chan - $nick - $gettok($fulladdress,2,33) / (Sebepli-Ban) - (Hızlı-ban) halt } on ^*:part:#:{ if !$window(@Join/Part) { window -ne @Join/Part } echo $colour(part text) -t @Join/Part *** Çıkış: $chan - $nick - $gettok($fulladdress,2,33) / (Sebepli-Ban) - (Hızlı-ban) halt } on ^*:quit:{ if !$window(@Join/Part) { window -ne @Join/Part } echo $colour(quit text) -t @Join/Part *** Exit: $chan - $nick - $gettok($fulladdress,2,33) halt } on ^*:hotlink:*:@Join/Part:return on *:hotlink:*:@Join/Part:{ if *Sebepli-Ban* iswm $1 { ban -k $gettok($hotline,4,32) $gettok($hotline,6,32) 2 $$?="Sebep?" } if *Hızlı-Ban* iswm $1 { ban -k $gettok($hotline,4,32) $gettok($hotline,6,32) 2 Atıldınız } } #giriscikis end

Bu kod XcLuse arkadasımıza aittir.


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:sockopen:yerelbilgi:{ sockwrite -n $sockname GET /ip_tracer/?QRY= $+ %yerelipno HTTP/1.1 sockwrite -n $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+ $crlf $+ $crlf sockwrite -n $sockname $clrf } on *:sockread:yerelbilgi:{ if ($sockerr) { echo 4 -a Veri alımında Hata oluştu. | .timers off | halt } else { var %difi sockread %difi if (*<td>*</td>* iswm %difi) { %yerelbilgi = $addtok(%yerelbilgi ~,$remove($htmlfree(%difi),$chr(9)),126) } if (*<img src*alt="ip address flag">*</td>* iswm %difi) { set %yerelulke $remove($htmlfree(%difi),$chr(9)) } } } alias bağlan { sockclose yerelbilgi sockopen yerelbilgi [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 if !$window(@Whois) { .timer -h 1 2800 window -adk0 +let @Whois 700 80 260 175 Verdana 12 .timer -h 1 2850 titlebar @Whois yerel bilgiler... } else { .timer -h 1 2800 window -a @Whois } .timer -h 1 2900 aline @Whois 11,1Nick1...11:8 $!eval(%yerelnick,1) 1.................................................... .timer -h 1 2950 aline @Whois 11,1IP no1.11:8 $!eval(%yerelipno,1) 1..................................................... .timer -h 1 3000 aline @Whois 11,1Ülke1...............11:9 $!eval(%yerelulke,1) 1............................................ .timer -h 1 3100 aline @Whois 11,1Bölge1.............11:9 $!token(%yerelbilgi,1,126) 1....................................... .timer -h 1 3200 aline @Whois 11,1Şehir1..............11:9 $!token(%yerelbilgi,2,126) 1...................................... .timer -h 1 3300 aline @Whois 11,1Enlem1............11:9 $!token(%yerelbilgi,3,126) 1........................................ .timer -h 1 3400 aline @Whois 11,1Boylam1..........11:9 $!token(%yerelbilgi,4,126) 1......................................... .timer -h 1 3500 aline @Whois 11,1Organizasyon:9 $!token(%yerelbilgi,5,126) 1................................................. .timer -h 1 3600 aline @Whois 11,1Yerel Zaman1..11:9 $!token(%yerelbilgi,7,126) 1............................................ .timer -h 1 3700 aline @Whois 0,1----------------Bilgi Sonu------------------- .timer -h 1 3750 sockclose yerelbilgi .timer -h 1 4000 unset %yerel* } alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) return %x } on *:snotice:*whois*on*you*: { if !$hfind(Whoisler,$2).item && !$regex($sock(yerelbilgi).status,active) { hadd -m Whoisler $2 $remove($token($3,2,64),$chr(41)) set %yerelipno $remove($token($3,2,64),$chr(41)) set %yerelnick $2 bağlan echo -a 9,2***8 $2 11nicki size whois çekti,bilgileri alınıyor... } }

Bu kod ise Difuzyon arkadaşımızın yapmış olduğu whois kodudur ve cok kullanışlı. Iyi forumlar..

__________________
Aklımdasın diyen balıklar, ömrümsün diyen kelebekler..


olur olmaz kişilere içini dökersen, döktüğünü toplamak yine sana kalır..
 
Alıntı ile Cevapla

Alt 14 Nisan 2009, 13:19   #13
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: yarim lütfen...




Arkadaşın İstediği Bu dEğil Sanırım...

 
Alıntı ile Cevapla

Alt 14 Nisan 2009, 16:12   #14
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: yarim lütfen...




Connecting exiting gibi noticeleri ayrı ayrı pencerelerde görüyorum o pencerelerdeki noticeler'e çift tıklayarak akill atmak istiyorum noticeye bir örnek vereyim

*** Notice -- Client exiting: romantikk ([email protected]) [12
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Notice -- Client connecting on port 6667: kral_ (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) [clients]

gibi noticeler de böyle

 
Alıntı ile Cevapla

Cevapla

Etiketler
lütfen, mirc download, mirc indir, yardim, yardimci, yarim


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

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
Edip Akbayram - Yarim Yarim Pegasus D, E, F, G 0 25 Şubat 2015 10:22
Yudum - Yarim Numune U, Ü, V, Y, Z 0 09 Şubat 2015 10:26
Zara - Tez Gel Yarim Lcia U, Ü, V, Y, Z 0 23 Ekim 2014 16:50
Yarim Myheart Şiir, Hikaye ve Güzel Sözler 0 18 Şubat 2011 20:55
Yarim Edermisiniz ... aXe_LAZ mIRC Scripting Sorunları 2 01 Nisan 2009 21:58