Tekil Mesaj gösterimi
Alt 16 Şubat 2015, 09:18   #1
Çevrimdışı
CINN
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
!nerden Kodu Çalısmıyor




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 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 } on *:sockopen:yerbul:{ sockwrite -n $sockname GET /ip-address-locator.php?lookup= $+ %nrd HTTP/1.1 sockwrite -n $sockname host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sockwrite -n $sockname $crlf } on *:sockread:yerbul: { var %yerbul sockread %yerbul if (*<i>*</i><b>* iswm %yerbul) { msg #opers 4Hostu:2 $gettok($replacecs($htmlfree(%yerbul),Hostname:,@),2,64) } if (<i>*</i> <b>* iswm %yerbul) || (<i>*<b>*</b><br />* iswm %yerbul) { msg #opers 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 $active .nerden $2 .timer 1 2 .sockclose nerden } else { .userip $2 .enable #nerdenbul set -e %aktif $active .nerden $2 .timer 1 2 .sockclose nerden } } } #nerdenbul off raw 340:*: { set %nrd $gettok($2,2,64) .disable #nerdenbul } #nerdenbul end



Konu Toprak tarafından (16 Şubat 2015 Saat 16:47 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver