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




45Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 17 Şubat 2015, 15:44   #1
Çevrimdışı
Girişte Ülke/Şehir/İSP Gösterme


sohbet


Merhaba,
Sunucuya giriş yapan kullanıcının ülke/şehir/isp adresini @Giriş penceresine yansıtır.
En az oper yetkiniz olması gerek ve sunucuya giriş/çıkış(snotice)'leri görmeniz gerekmektedir..


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


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*Client connecting on port*:who +I $9 raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(pro,%:r) $+($4,¿,$6) alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:pro*:{ sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname Connection: keep-alive sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8 sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36 sockwrite -nt $sockname $crlf } on *:sockread:pro*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (ISP Provider: isin %:pro) { var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) $iif(!$window(@Giriş),window -e @Giriş) .echo @Giriş Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp .hfree -sw %:n sockclose $sockname } }

Kaynak: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Merhaba,
Sunucuya giriş yapan kullanıcının ülke/şehir/isp adresini @Giriş penceresine yansıtır.
En az oper yetkiniz olması gerek ve sunucuya giriş/çıkış(snotice)'leri görmeniz gerekmektedir..


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


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*Client connecting on port*:who +I $9 raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(pro,%:r) $+($4,¿,$6) alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:pro*:{ sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname Connection: keep-alive sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8 sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36 sockwrite -nt $sockname $crlf } on *:sockread:pro*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (ISP Provider: isin %:pro) { var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) $iif(!$window(@Giriş),window -e @Giriş) .echo @Giriş Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp .hfree -sw %:n sockclose $sockname } }

Kaynak: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
__________________
Mükеmmеl kişiyi aramaktan vazgеç. Tеk ihtiyacın olan sana sahip olduğu için şanslı olduğunu düşünеn biridir.
  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
radyo44.com.tr
Alt 17 Şubat 2015, 18:07   #2
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Güzel olmuş. Emeklerine sağlık.

__________________
Tell me. Do you bleed? You will..!
  Alıntı ile Cevapla

Alt 17 Şubat 2015, 18:46   #3
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Teşekkürler toprak yalnız bende iki sefer gösteriyor.
Nick:4 sheqerr - IP:4 88.249.208.73 - Ulke:4 Turkey - Sehir:4 Istanbul - ISP:4 Turk Telekom
Nick:4 sheqerr - IP:4 88.249.208.73 - Ulke:4 Turkey - Sehir:4 Istanbul - ISP:4 Turk Telekom

  Alıntı ile Cevapla

Alt 17 Şubat 2015, 19:00   #4
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




mercenary Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Teşekkürler toprak yalnız bende iki sefer gösteriyor.
Nick:4 sheqerr - IP:4 88.249.208.73 - Ulke:4 Turkey - Sehir:4 Istanbul - ISP:4 Turk Telekom
Nick:4 sheqerr - IP:4 88.249.208.73 - Ulke:4 Turkey - Sehir:4 Istanbul - ISP:4 Turk Telekom

Sanırım mIRC'inizde başka bir kod daha var girişte who filan çeken.

Kod'daki bu kısmı kaldırın siz tamamdır..
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*Client connecting on port*:who +I $9


__________________
Mükеmmеl kişiyi aramaktan vazgеç. Tеk ihtiyacın olan sana sahip olduğu için şanslı olduğunu düşünеn biridir.
  Alıntı ile Cevapla

Alt 18 Şubat 2015, 22:50   #5
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Peki bunu kanala yansıtmak için ne yapmamız gerekiyor @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Örnek #Şehir kanalına yansıtmak istiyorum.

  Alıntı ile Cevapla

Alt 19 Şubat 2015, 01:53   #6
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




eTheRciTy Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Peki bunu kanala yansıtmak için ne yapmamız gerekiyor @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Örnek #Şehir kanalına yansıtmak istiyorum.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#giriste on on *:snotice:*Client connecting on port*:who +I $9 raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(pro,%:r) $+($4,¿,$6) alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:pro*:{ sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname Connection: keep-alive sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8 sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36 sockwrite -nt $sockname $crlf } on *:sockread:pro*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (ISP Provider: isin %:pro) { var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) msg #Şehir Nick:2 %:n - IP:2 %ip - Ulke:2 %ülke - Sehir:2 %sehir - ISP:2 %:isp .hfree -sw %:n sockclose $sockname } } #giriste end menu menubar { +> IP GIRIS ..Aç:!if $group(#giriste).status = on { echo 4 -tgae IP NERDEN Zaten AÇIK } | else { /.enable #giriste | echo 4 -tgae IP NERDEN AÇILDI | set %giriste on } ..Kapat:!if $group(#giriste).status = off { echo 4 -tgae IP NERDEN Zaten KAPALI } | else { /.disable #giriste | echo 4 -tgae IP NERDEN KAPATILDI | set %giriste off } ..Durum < $replace($group(#giriste).status, off, Kapalı, on, Açık) >:. }


__________________
"Gittiğin yola inandıysan attığın adımlardan korkma."
Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.

Konu Feragat tarafından (19 Şubat 2015 Saat 02:04 ) değiştirilmiştir. Sebep: mIRC Kod'larını CODE Tagı içinde paylaşalım lütfen.
  Alıntı ile Cevapla

Alt 20 Şubat 2015, 03:01   #7
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Guzel Kod yazmisin Toprak
ama CR3.5 te calismiyor. bu sekilde hata veriyor

01:56] -> Server: 315:*:halt
-
[01:56] -> Server: 352:*:{
-
+I End of /WHO list.
-
( 315:*:halt ) Yanlis Komut Kullandiniz..
( 352:*:{ ) Yanlis Komut Kullandiniz..

statuste connect bu sekilde gozukuyir
[01:57] -iRC.network.CoM- *** Notice -- Client connecting on 5.5.5.5:6667
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
client

  Alıntı ile Cevapla

Alt 20 Şubat 2015, 14:29   #8
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




POSOFxPOWER Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Guzel Kod yazmisin Toprak
ama CR3.5 te calismiyor. bu sekilde hata veriyor

01:56] -> Server: 315:*:halt
-
[01:56] -> Server: 352:*:{
-
+I End of /WHO list.
-
( 315:*:halt ) Yanlis Komut Kullandiniz..
( 352:*:{ ) Yanlis Komut Kullandiniz..

statuste connect bu sekilde gozukuyir
[01:57] -iRC.network.CoM- *** Notice -- Client connecting on 5.5.5.5:6667
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
client



CR'de hiç bulunmadım ama mantık şu kullanıcı girişte who +I Nick komutunu uyguluyor ve 352.' rawda ip adresini alıp socks açıyor..

__________________
Mükеmmеl kişiyi aramaktan vazgеç. Tеk ihtiyacın olan sana sahip olduğu için şanslı olduğunu düşünеn biridir.
  Alıntı ile Cevapla

Alt 16 Mart 2015, 16:39   #9
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




güzeL çalışma olmus

  Alıntı ile Cevapla

Alt 19 Mart 2015, 00:16   #10
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Hocam Emeklerine Sağlık Kod Harika Bir Şekilde Çalışıyor Ellerine Sağlık Hocam.

  Alıntı ile Cevapla

Cevapla

Etiketler
girişte, gösterme, Ülke or Şehir or İsp

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
ülke Şehir Yeni Z-Lined mIRC Scripting Hazır Kodlar 6 09 Aralık 2011 15:56
Ülke-Şehir Bulucu. h4pp3n mIRC Scripting Hazır Kodlar 24 01 Nisan 2011 11:36
28 ülke, 67 fotoğrafçı, tek şehir pyracantha Sinema Dünyası 0 30 Aralık 2010 18:59
Whois'de ülke gösterme Yardim Pls... GamSe Unreal IRCd 4 05 Şubat 2008 22:24