Tekil Mesaj gösterimi
Alt 29 Mart 2013, 15:13   #5
Çevrimdışı
Feragat
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: .nerden [IP|Nick] Yeni..




Eğer kendi scriptine eklersen(on $*:text...) event ı ile, başkaları !nerden <Nick veya IP> komutu ile kullanabilir sen kullanamazsın. Bu tarz sorgular %100 doğru göstermez, Ayrıca bazı kullanıcılar sorgulanan nickin veya IP in ev adresini gösteriyor gibi yalnış bilgilere sahip, yalnızca IP adresinin dağıtıldığı,sağlandığı hizmet binasının adresini gösterir(Genellikle aynı şehirdir.) ve bu kesinlikle %100 değildir, bölgeye, konuma ve pek çok şeye göre farklılık gösterir. Eğer !nerden <Nick veya IP> komutuyla hem sen, hem de başkaları kullansın istiyorsan bir bota vs. "on $*:text" event'ı ile entegre etmen gerek kodu. Aslında pek çok site var IP sorgulayan ben uzun zamandır bunu kullanıyordum, diğerlerinden bana göre biraz daha sağlıklı geldiği için(kısmen) bu adresi seçtim.

Eğer kodu kendi Scriptine aşağıdaki haliyle eklersen hem sen hemde diğer kullanıcılar Kullanabilir.
Not: Diğer kullanıcılar #OperHelp kanalda !nerden <Nick veya IP> şeklinde kullanılar, Sen /bul <Nick veya IP> komutuyla kullanabilirsin. İyi forumlar.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias bul { if $regex($1,/(\d+\56\d+\56\d+\56\d+)$/iA) { .set -e %nrd $1 | .set -e %c_n $chan | .nerden } elseif $regex($1,/^[^\d]/i) { .userip $1 | .enable #nrdn | .set -e %c_n $chan } } alias nerden { if $sock(yerbul) { sockclose yerbul } sockopen yerbul
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 } on $*:text:/^((!|.)nerden\40\S+)$/i:#OperHelp: { if $regex($2,^\d) { .set -e %nrd $2 | .set -e %c_n $chan .nerden } else { .userip $2 .enable #nrdn .set -e %c_n $chan } } on *:sockopen:yerbul:{ var %xy = sockwrite -n $sockname %xy GET /ip-address-locator.php?lookup= $+ %nrd HTTP/1.1 %xy host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Connection: keep-alive %xy Cache-Control: max-age=0 %xy Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8 %xy User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/43.0.2357.81 Safari/537.36 %xy Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4 %xy $crlf } on *:sockread:yerbul: { if ($sockerr) { /msg %c_n Bağlantı Hatası Oluştu! | halt } var %yerbul sockread %yerbul if $regex(hst,%yerbul,/(</\142><\142\162\40/><\151>\110\S{7}\72</\151>\40<\142>(.+)</\142><\142\162\40/>)$/i) { /msg %c_n 2Host:4 $regml(hst,2) } if $regex(cnt,%yerbul,/^(<\151>\111\120\40\S{7}\72</\151>\40<\142>(\S+)</\142>)$/i) { /msg %c_n 2Ulke:4 $regml(cnt,2) } if $regex(cod,%yerbul,/^(<\151>\111\120\40\S{7}\40\S{4}\72</\151>\40<\142>(\S+)</\142><\142\162\40\/>)$/i) { /msg %c_n 2Ulke Kodu:4 $regml(cod,2) } if $regex(kta,%yerbul,/^(<\151>\111\120\40\103\S{8}\72</\151>\40<\142>(\S+)</\142><\142\162\40\/>)$/i) { /msg %c_n 2Kita:4 $regml(kta,2) } if $regex(rgn,%yerbul,/^(<\151>\111\120\40\122\S{5}\72</\151>\40<\142>(\S+)</\142><\142\162\40\/>)$/i) { /msg %c_n 2Bolge:4 $regml(rgn,2) } if $regex(cty,%yerbul,/^(<\151>\111\120\40\103\S{3}\72\40<\142>(\S+)</\142><\142\162\40\/>)$/i) { /msg %c_n 2Sehir:4 $regml(cty,2) } if $regex(org,%yerbul,/^(<\151>\117\S{11}\72</\151>\40<\142>(.+)</\142><\142\162\40\/>)$/i) { /msg %c_n 2Organizasyon:4 $regml(org,2) } if $regex(iss,%yerbul,/^(<\151>\111\123\120\40\S{8}\72</\151>\40<\142>(.+)</\142><\142\162\40\/><\142\162\40\/>)$/i) { /msg %c_n 2Servis Saglayici:4 $regml(iss,2) } } #nrdn off raw 340:*: { if (!$2) { /msg %c_n Sorgulanan Nick Sunucuda bulunmuyor. | goto down } .set -e %nrd $regsubex($2,/.+\100(\d+\56\d+\56\d+\56\d+)$/g,\1) .nerden :down .disable #nrdn } #nrdn end


__________________
The Ghost of Christmas Past...

i'm here sometimes
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver