Yukari Çık
Güncel !nerden remotesi - ForumTurk.ORG

forumturk
  SohbetElit
Geri Dön   ForumTurk.ORG >
SekerShell

Like Tree2Beğeni
  • 2 Post By Linux

Yeni Konu Aç Cevapla
 
LinkBack Seçenekler Stil
Alt 07 - 04 - 2025, 07:10 PM   #1
Çevrimiçi
www.RadikalFM.Com
Kullanıcıların profil bilgileri ziyaretçilere kapalı
Güncel !nerden remotesi


on *:text:*:#:{
if $regex($1,/^([!\.]nerden)$/i) {
if !$2 { msg # Lütfen !nerden IP/Nick olarak belirtiniz. | return }
set %:kanal #
if $regex($2,/(\d+\.\d+\.\d+\.\d+)) { _nerden $2 }
else { .enable #nerdenbul | .who +I $2 }
}
}
on *:input:#:{
if $regex($1,/^([!\.]nerden)$/i) {
if !$2 { msg # Lütfen !nerden IP/Nick olarak belirtiniz. | return }
set %:kanal #
if $regex($2,/(\d+\.\d+\.\d+\.\d+)) { _nerden $2 }
else { .enable #nerdenbul | .who +I $2 }
}
}
#nerdenbul off
raw 352:*: _nerden $4
raw 315:*:.disable #nerdenbul
#nerdenbul end
alias _nerden { var %:r $r(1000,99999) | sockopen $+(yerbul,%:r) igs.klavyenet.com 80 | sockmark $+(yerbul,%:r) $1 }
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } }
on *:sockopen:yerbul*:{
if ($sockerr) { .sockclose $sockname }
else {
sockwrite -nt $sockname GET $+(/bilgi.php?ip=,$token($sock($sockname).mark,1,191)) HTTP/1.1
sockwrite -nt $sockname Host: $sock($sockname).addr
sockwrite -nt $sockname Connection: keep-alive
sockwrite -nt $sockname Cache-Control: max-age=0
sockwrite -nt $sockname Upgrade-Insecure-Requests: 1
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/89.0.4389.114 Safari/537.36
sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9
sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.9,en-US;q=0.8,en;q=0.7
sockwrite -nt $sockname $crlf
}
}

on *:sockread:yerbul*:{
var %:yerbul | sockread %:yerbul | tokenize 32 %:yerbul
if (IP: isin %:yerbul) { msg %:kanal IP Adresi: $token($sock($sockname).mark,1,191)) }
if (Country: isin %:yerbul) { msg %:kanal Ülke:4 $iif(!$token($htmlfree(%:yerbul),2,58),Belirsiz,$t oken($htmlfree(%:yerbul),2,58)) }
if (Posta Code: isin %:yerbul) { msg %:kanal Ülke Kodu:4 $iif(!$token($htmlfree(%:yerbul),2,58),Belirsiz,$t oken($htmlfree(%:yerbul),2,58)) }
if (Continent: isin %:yerbul) { msg %:kanal Kıta:4 $iif(!$token($htmlfree(%:yerbul),2,58),Belirsiz,$t oken($htmlfree(%:yerbul),2,58)) }
if (region: isin %:yerbul) { msg %:kanal Ülke Plaka:4 $iif(!$token($htmlfree(%:yerbul),2,58),Belirsiz,$t oken($htmlfree(%:yerbul),2,58)) }
if (City: isin %:yerbul) { msg %:kanal Sehir:4 $iif(!$token($htmlfree(%:yerbul),2,58),Belirsiz,$t oken($htmlfree(%:yerbul),2,58)) }
if (ISP: isin %:yerbul) { msg %:kanal ISP:4 $iif(!$token($htmlfree(%:yerbul),2,58),Belirsiz,$t oken($htmlfree(%:yerbul),2,58)) }
if (Latitude: isin %:yerbul) { msg %:kanal Enlem:4 $iif(!$token($htmlfree(%:yerbul),2,58),Belirsiz,$t oken($htmlfree(%:yerbul),2,58)) }
if (Longitude: isin %:yerbul) { msg %:kanal Boylam:4 $iif(!$token($htmlfree(%:yerbul),2,58),Belirsiz,$t oken($htmlfree(%:yerbul),2,58)) | sockclose $sockname }
}


Örnek :

[22:10] (&X) !nerden Suha
[22:10] (X-Sistem) IP Adresi: 45.**.*.*.*.*
[22:10] (X-Sistem) Kıta: Asia
[22:10] (X-Sistem) Ülke: Avrupa
[22:10] (X-Sistem) Sehir: S/A
[22:10] (X-Sistem) Ülke Plaka: 00058
[22:10] (X-Sistem) Ülke Kodu: 160405478
[22:19] (X-Sistem) ISP: Nshell Hizmetleri
[22:10] (X-Sistem) Enlem: 40.19255
[22:10] (X-Sistem) Boylam: 29.0587
MaSKe ve Günışığı bunu beğendi.
  Alıntı ile Cevapla
Cevapla

Etiketler
güncel, mirc, nerden, remote



Şu an bu konuyu okuyan kişi sayısı: 1 (0 üye ve 1 misafir)
 
Seçenekler
Stil

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 Açık
Pingbacks are Açık
Refbacks are Açık