Konu: !nerden Nick
Tekil Mesaj gösterimi
Alt 11 Ocak 2013, 22:43   #5
Çevrimdışı
Med Cezir
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !nerden Nick




CR ye uyumlu şekli, ayrıca active ekrana yansıyordu sonuçlar onu kanala yansıyacak şekilde ayarladım.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) return %x } alias nerden { sockopen yerbul
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 } on *:sockopen:yerbul:{ sockwrite -n $sockname GET /ip-address-locator.php?lookup= $+ %nrd HTTP/1.1 sockwrite -n $sockname host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $crlf } on *:sockread:yerbul: { var %yerbul sockread %yerbul if (*<i>*</i><b>* iswm %yerbul) { msg %aktif 4Hostu:2 $gettok($replacecs($htmlfree(%yerbul),Hostname:,@),2,64) } if (<i>*</i> <b>* iswm %yerbul) || (<i>*<b>*</b><br />* iswm %yerbul) { msg %aktif 4 $+ $replacecs($gettok($htmlfree(%yerbul),1,58),IP Country,Ülke,Code,Kodu,IP Continent,Kıta,IP Region,Bölge,IP City,Şehir,IP Latitude,Enlem,IP Longitude,Boylam,Organization,Şirket,ISP Provider,Servis Sağlayıcı) $+ : $+ 2 $+ $gettok($htmlfree(%yerbul),2,58) } } on *:text:*:#: { if ($1 == !nerden) || ($1 == .nerden) && ($2) { if ($left($2,1) isnum) { .set -e %nrd $2 | set -e %aktif $chan .nerden $2 .timer 1 2 .sockclose nerden } else { who $2 .enable #nerdenbul set -e %aktif $chan .timer 1 2 .sockclose nerden } } } #nerdenbul off raw 352:*:{ set %nrd $4 nerden $4 .disable #nerdenbul } #nerdenbul end


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver