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

>
+
Etiketlenen Kullanıcılar

2Beğeni(ler)
  • 2 Post By Feragat

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 30 Haziran 2019, 13:00   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ülke sehir ısp eski kullandığı nickler mirc kodu hakkında




hatamı buldm ve sanırım şimdioldu güzelde çalışıyor yalnız anlamadığım ülke yerini boş bırakıyor
Nick: DJ-Kuzey IP: 178.241.11.235 - Ulke: - Sehir: Diyarbakir - ISP: Turkcell Önceki KuLandığı Nickler: Kuzey DJ-Kuzey Kuzey`Away Zaza
kod bu bir bakabilirmisiniz
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#giriste on on *:snotice:*Client connecting*:userip $token($token($7-,1,40),-1,32) raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 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: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 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 ^*!:nick: { if $regex($usermode,o) { set %tkp. [ $+ [ $newnick ] ] 1 | who +I $newnick } } raw 352:*: { if %tkp. [ $+ [ $2 ] ] { unset %tkp. [ $+ [ $2 ] ] } if %tkp. [ $+ [ $6 ] ] { if $5 == services.neselichat.net { return } var %ip = $4 ; get the previous nicks var %nicks = $readini(giris.txt, %ip, nicks) ; add the new nick ($addtok will take care of duplicates) var %nicks = $addtok(%nicks,$6,32) ; update the nicks writeini -n giris.txt %ip nicks %nicks halt } } menu nicklist { NickTakip: if $regex($usermode,o) { set %tkp. [ $+ [ $1 ] ] 1 | who +I $$1 } } on *:sockread:pro*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro if (IP Country: isin %:pro) { .hadd -m $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 -m $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 #MooS 0,1 Nick: 4 %:n 0 IP: 4 %ip 0- Ulke: 4 %ülke 0 - Sehir: 4 %sehir 0- ISP: 4 %:isp 0 Önceki KuLandığı Nickler:1  4 $readini(giris.txt, %ip, nicks) .hfree -w %: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, Kapali, on, Açik) >:. }



Konu Feragat tarafından (25 Temmuz 2019 Saat 19:34 ) değiştirilmiştir. Sebep: Raw event ı tek'e düşürüldü.
 
Alıntı ile Cevapla

Alt 01 Temmuz 2019, 20:45   #2
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ülke sehir ısp eski kullandığı nickler mirc kodu hakkında




SenatoR-SuVaRi Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
hatamı buldm ve sanırım şimdioldu güzelde çalışıyor yalnız anlamadığım ülke yerini boş bırakıyor
Nick: DJ-Kuzey IP: 178.241.11.235 - Ulke: - Sehir: Diyarbakir - ISP: Turkcell Önceki KuLandığı Nickler: Kuzey DJ-Kuzey Kuzey`Away Zaza
kod bu bir bakabilirmisiniz

Selamlar.

Kodu, yerli - yabancı bir kaç proxy ip ile denedim. Herhangi bir problem gözükmüyor.

Deneyebileceğin bir kaç yol
1-
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
//unset %:n %ülke* %:r*

2- mIRC 6.3x altındaki versiyonlarda değişken tanımlarken var %değişken = değer şeklinde "=" eşittir işareti kullanman gerekebiliyor, üst versiyonlar buna gerek duymuyor.

3- Benzer raw event'ları var ise onları devre dışı bırakman gerekebilir, bunun sebebi kodda aradığın veri yerine sana farklı veri sunabilir.

Şuan aklıma gelen nedenler bunlar. Kolay gelsin.

Test ettiğim IP'lerin Örnek görüntüsü:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

__________________
The Ghost of Christmas Past...

mircscripting.net

Konu Feragat tarafından (01 Temmuz 2019 Saat 20:47 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Cevapla

Etiketler
ip takip, nick, nick takip, ülke sehir ısp


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
Sehir Ülke Domainleri Aranmakta. TUNAHAN Domain Arıyorum 9 03 Nisan 2019 07:20
mirc te kanal genelinde yazılan yazılar görünmesin, sadece giren nickler görünsün xnxx4601 mIRC Scripting Sorunları 1 26 Mart 2015 14:33
mIRC'e Giren Kötü Nickler Cyptm mIRC Scripting Sorunları 12 19 Kasım 2007 21:17
Mirc regleme kodu hakkında Majesti mIRC Scripting Sorunları 7 29 Haziran 2006 18:41
Guest nickler hakkında Realinferno Servisler 1 15 Haziran 2006 10:30