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

 Kayıt ol
Etiketlenen Kullanıcılar

12Beğeni(ler)
  • 8 Post By Bozkurt-
  • 2 Post By Bozkurt-
  • 1 Post By SNOOPY
  • 1 Post By Sahmelek

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 13 Ağustos 2022, 15:22   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Girişte Ülke/Şehir/İSP Gösterme - Güncel



Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    ;- Muaf port ekleme.
    if $istok(6661,%_port,32) { return }
    ;- Muaf nick ekleme
    elseif $istok(Lilith,%_nick,32) { return }
    ;- Muaf ident ekleme
    elseif $istok(ident ident1 ident2,%_ident,32) { return }
    ;- Muaf IP ekleme
    elseif $istok(85.104.93.153,%_ip,32 ) { return }
    who +I $9
  }
}
raw 352:*:{
  sockopen $+(nerdenpro,%:rand) ipinfo.io 80 
  sockmark $+(nerdenpro,%:rand) $+($4,¿,$6)
}
on *:sockopen:nerdenpro*:{ 
  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/geo) HTTP/1.1 
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Host: ipinfo.io
  sockwrite -n $sockname Accept-Language: en-US
  sockwrite -n $sockname Content-Type: application/json; charset=utf-8
  sockwrite -n $sockname $crlf 
}
on *:sockread:nerdenpro*:{ 
  var %:nerdenpro | sockread %:nerdenpro | tokenize 32 %:nerdenpro
  if region isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }
  if city isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) City $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }
  if country isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }
  if "org isin %:nerdenpro { 
    var %:isp $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) 
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)  $hget(%:n,City)
    msg #Giriş 0,1[Giriş Bilgi]  0,4Nick:  0,1 %:n   0,4IP:  0,1 %ip   0,4Ulke Kodu:  0,1  %ülke  0,4Şehir:  0,1 %sehir  0,4 ISP:  0,1 %:isp
    .hfree -w %:n | sockclose $sockname
  } 
} 
alias _tr return $replace($1-,Ãœ,Ü,ÅŸ,ş,Ä,Ğ,Ä°,İ,Ö,Ö,ü,ü,ÅŸ,Ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,б,ı,Ğ°,İ,Ç,Ç,Å,Ş,ĞŸ,ğ,â,,Â,)


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

Merhabalar;
Kod ile sunucuza giren kişilerin bilgilerini kanala yansıtabilirsiniz. Türkçe karakter hatasının çözümü için alias eklenmiştir. Site üzerinden bilgileri çekmek için api almanıza gerek yoktur. Güncel çalışan kod olmadığı için yaptım. Son günlerde sekershelle ait gbotun veri çekmesinde sıkıntı olduğu için paylaşıyorum.

__________________
Kahpeliğin bahanesi, İhanetin telafisi olmaz.
Konu Che tarafından (14 Ağustos 2022 Saat 10:55 ) değiştirilmiştir. Sebep: Code düzeltildi.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver
Alt 13 Ağustos 2022, 17:59   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte Ülke/Şehir/İSP Gösterme - Güncel



Girişte Ülke kodu yerine ülke adını görmek isterseniz.

Kodun en altına şu satırı ekleyiniz.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias _dzlt return $replace($1-,TR,TÜRKİYE,US,A.B.D,DE,ALMANYA,IT,İTALYA,FR,FRANSA,AZ,AZERBAYCAN,BE,BELÇİKA,BG,BULGARİSTAN,)


Şu kısımı
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
  if country isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }

Şu şekilde düzeltebilirsiniz. Daha fazla eklemek istediğiniz ülkelerin kodlarını ekleyerek çoğaltabilirsiniz.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
  if country isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $_dzlt($_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),"))) }


__________________
Kahpeliğin bahanesi, İhanetin telafisi olmaz.
 
Alıntı ile Cevapla

Alt 31 Ağustos 2022, 12:19   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte Ülke/Şehir/İSP Gösterme - Güncel



Kod için sağ ol MasteR06. Sadece mIRC girişlerin de uyarı veriyor. Bir de Vpn sorgu da eklenebilir mi?

 
Alıntı ile Cevapla

Alt 31 Ağustos 2022, 16:44   #4
Çevrimiçi
~ BLaCK_and_WHiTe ~
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte Ülke/Şehir/İSP Gösterme - Güncel



Güzel çalışma olmuş

__________________
BLaCK_and_WHiTe is now known as SNOOPY
 
Alıntı ile Cevapla

Alt 01 Eylül 2022, 01:01   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte Ülke/Şehir/İSP Gösterme - Güncel



High Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod için sağ ol MasteR06. Sadece mIRC girişlerin de uyarı veriyor. Bir de Vpn sorgu da eklenebilir mi?

Muaf port kısmına web ve mobil portları eklememiş olduğunuza emin olun. Vpn sorgusu için bu sitenin api anahtarlı versiyonunu kullanıyor olmanız lazım.

__________________
Kahpeliğin bahanesi, İhanetin telafisi olmaz.
 
Alıntı ile Cevapla

Alt 01 Eylül 2022, 01:04   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte Ülke/Şehir/İSP Gösterme - Güncel



MasteR06 Nickli Üyeden Alıntı
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:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    ;- Muaf port ekleme.
    if $istok(6661,%_port,32) { return }
    ;- Muaf nick ekleme
    elseif $istok(Lilith,%_nick,32) { return }
    ;- Muaf ident ekleme
    elseif $istok(ident ident1 ident2,%_ident,32) { return }
    ;- Muaf IP ekleme
    elseif $istok(85.104.93.153,%_ip,32 ) { return }
    who +I $9
  }
}
raw 352:*:{
  sockopen $+(nerdenpro,%:rand) ipinfo.io 80 
  sockmark $+(nerdenpro,%:rand) $+($4,¿,$6)
}
on *:sockopen:nerdenpro*:{ 
  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/geo) HTTP/1.1 
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Host: ipinfo.io
  sockwrite -n $sockname Accept-Language: en-US
  sockwrite -n $sockname Content-Type: application/json; charset=utf-8
  sockwrite -n $sockname $crlf 
}
on *:sockread:nerdenpro*:{ 
  var %:nerdenpro | sockread %:nerdenpro | tokenize 32 %:nerdenpro
  if region isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }
  if city isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) City $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }
  if country isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }
  if "org isin %:nerdenpro { 
    var %:isp $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) 
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)  $hget(%:n,City)
    msg #Giriş 0,1[Giriş Bilgi]  0,4Nick:  0,1 %:n   0,4IP:  0,1 %ip   0,4Ulke Kodu:  0,1  %ülke  0,4Şehir:  0,1 %sehir  0,4 ISP:  0,1 %:isp
    .hfree -w %:n | sockclose $sockname
  } 
} 
alias _tr return $replace($1-,Ãœ,Ü,ÅŸ,ş,Ä,Ğ,Ä°,İ,Ö,Ö,ü,ü,ÅŸ,Ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,б,ı,Ğ°,İ,Ç,Ç,Å,Ş,ĞŸ,ğ,â,,Â,)


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

Merhabalar;
Kod ile sunucuza giren kişilerin bilgilerini kanala yansıtabilirsiniz. Türkçe karakter hatasının çözümü için alias eklenmiştir. Site üzerinden bilgileri çekmek için api almanıza gerek yoktur. Güncel çalışan kod olmadığı için yaptım. Son günlerde sekershelle ait gbotun veri çekmesinde sıkıntı olduğu için paylaşıyorum.

Elinize Sağlık Fakat giriş Hatası veriyor bu neden acaba Böyle Bir Nick Bulunamadı : #Giriş

__________________

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 Sahmelek tarafından (01 Eylül 2022 Saat 01:06 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 01 Eylül 2022, 20:15   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte Ülke/Şehir/İSP Gösterme - Güncel



Sahmelek Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Elinize Sağlık Fakat giriş Hatası veriyor bu neden acaba Böyle Bir Nick Bulunamadı : #Giriş

Girişleri ayrı bir pencere de Giris adı altında görmek senin için daha kullanışlı olacaktır
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    ;- Muaf port ekleme.
    if $istok(6661,%_port,32) { return }
    ;- Muaf nick ekleme
    elseif $istok(Lilith,%_nick,32) { return }
    ;- Muaf ident ekleme
    elseif $istok(ident ident1 ident2,%_ident,32) { return }
    ;- Muaf IP ekleme
    elseif $istok(85.104.93.153,%_ip,32 ) { return }
    who +I $9
  }
}
raw 352:*:{
  sockopen $+(nerdenpro,%:rand) ipinfo.io 80 
  sockmark $+(nerdenpro,%:rand) $+($4,¿,$6)
}
on *:sockopen:nerdenpro*:{ 
  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/geo) HTTP/1.1 
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Host: ipinfo.io
  sockwrite -n $sockname Accept-Language: en-US
  sockwrite -n $sockname Content-Type: application/json; charset=utf-8
  sockwrite -n $sockname $crlf 
}
on *:sockread:nerdenpro*:{ 
  var %:nerdenpro | sockread %:nerdenpro | tokenize 32 %:nerdenpro
  if region isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }
  if city isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) City $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) }
  if country isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $_dzlt($_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),"))) }
  if "org isin %:nerdenpro { 
    var %:isp $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) 
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)  $hget(%:n,City)
    $iif(!$window(@Giris),window -e @Giris)
    .echo @Giris 0,1[Giriş Bilgi]  0,4Nick:  0,1 %:n   0,4IP:  0,1 %ip   0,4Ulke Kodu:  0,1  %ülke  0,4Şehir:  0,1 %sehir  0,4 ISP:  0,1 %:isp
    .hfree -w %:n | sockclose $sockname
  } 
} 
alias _tr return $replace($1-,Ãœ,Ü,ÅŸ,ş,Ä,Ğ,Ä°,İ,Ö,Ö,ü,ü,ÅŸ,Ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,б,ı,Ğ°,İ,Ç,Ç,Å,Ş,ĞŸ,ğ,â,,Â,)
alias _dzlt return $replace($1-,TR,TÜRKİYE,US,A.B.D,DE,ALMANYA,IT,İTALYA,FR,FRANSA,AZ,AZERBAYCAN,BE,BELÇİKA,BG,BULGARİSTAN,)
 
Alıntı ile Cevapla

Alt 01 Eylül 2022, 21:03   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte Ülke/Şehir/İSP Gösterme - Güncel



Sahmelek Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Elinize Sağlık Fakat giriş Hatası veriyor bu neden acaba Böyle Bir Nick Bulunamadı : #Giriş

#Giriş yerine yansıtmak istediğiniz kanal hangisi ise onu yazın. Öyle bir kanal olmadığı için böyle bir hata alıyorsunuz.

__________________
Kahpeliğin bahanesi, İhanetin telafisi olmaz.
 
Alıntı ile Cevapla

Cevapla

Etiketler
bölge, geo, giren, giriŞ, gÜncel, gösterme, hangi, ipinfo, irc, isp, kode, mirc, nereden, remotesi, snotice, sunucuya, şehir, Şehirden

« önceki Konu | sonraki Konu »

Konuyu Toplam 3 Üye okuyor. (1 Kayıtlı üye ve 2 Misafir)
Lrys

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
Çözüldü Girişte Şehir Gösterme ve Şehir Yasaklama Xadd1 mIRC Scripting Sorunları 44 19 Eylül 2022 19:55
Girişte Şehir Gösterme Addonu Düzeltme KeMaNiSt mIRC Scripting Sorunları 1 14 Temmuz 2020 02:00
Girişte Şehir Gösterme Addonu KeMaNiSt mIRC Scripting Hazır Kodlar 0 04 Haziran 2020 23:43
Girişte Şehir Gösterme Addonu KeMaNiSt mIRC Scripting Hazır Kodlar 0 04 Haziran 2020 22:52




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
trsikayet.com ferizli haber kaynarca haber yavru köpek sohbet instagram takipçi sohbet teması yetişkin sohbet
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net

mimarsinanokullari.com mjsanaokulu.com eburke.org 副業 https://www.newstrendline.com/