IRCForumda - IRC ve mIRC Kullanıcıları  


Geri Git   IRCForumda - IRC ve mIRC Kullanıcıları > mIRC Scripting > mIRC Scripting Hazır Kodlar

Extra Sohbet https://SosyalChat.Com GulumSohbet Reklam Verin

SohbetSeli sohbetmevsimi.com 

IRC Shell Sohbet

Seker Sohbet SevdaFm

Herseyim Sohbet CanlarSohbet

Dostluklar Sohbet Dostluklar Sohbet Dostluklar Sohbet Dostluklar Sohbet Dostluklar Sohbet Dostluklar Sohbet Dostluklar Sohbet Dostluklar Sohbet 
Like Tree1Beğeni(ler)
  • 1 Post By Kuzey58

 
 
Seçenekler Stil
Alt 07 Aralık 2020, 18:55   #1
Standart İP Şehir Giriş Bilgileri

PHP- Kodu

#ipsehir on
on *:snotice:*Client connecting on port*:who +$9
raw 352
:*:var %:r $r(1000,99999) | sockopen $+(pro,%:rwww.ipaddresslocation.org 80 sockmark $+(pro,%:r) $+($4,¿,$6)
alias htmlfree { if ($len($1-) <= 900) { var %x, %$regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %$remove(%x, ,$chr(9)) | return %} } 
on *:sockopen:pro*:{ 
  
sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 
  sockwrite 
-nt $sockname Hostwww.ipaddresslocation.org 
  sockwrite 
-nt $sockname Connectionkeep-alive
  sockwrite 
-nt $sockname Accepttext/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 *:sockread:pro*:{  
  if ($sockerr) { .sockclose $sockname | return }
  var %:pro | sockread -f %:pro
  if (IP Country: isin %:pro) { .hadd -ms $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 -ms $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 #Opers 4,4.8,1 Nick :0 %:n 4,4.8,2 IP :0 %ip 4,4.9,1 Ulke :0 %ülke 4,4.9,2 Sehir :0 %sehir 4,4.8,1 ISP :0 %:isp 4,4.
    .hfree -sw %:n
    sockclose $sockname
  }
}
#ipsehir end
menu menubar {
  +> IP SEHIR
  ..Aç:!if $group(#ipsehir).status = on { echo 4 -tgae IP SEHIR Zaten Açık } | else { /.enable #ipsehir | echo 4 -tgae IP SEHIR AÇILDI | set %ipsehir on  }
  ..Kapat:!if $group(#ipsehir).status = off { echo 4 -tgae Port Korumasi Zaten KAPALI } | else { /.disable #ipsehir | echo 4 -tgae Port Koruması KAPATILDI | set %ipsehir off  }
  ..Durum < $replace($group(#ipsehir).status, off, Kapalı, on, Açık) >:.

Alternatif Koddur aLıntıdır.
Tayfun bunu beğendin
________________

Yüreğine giden bir bilet kes, cam kenarı değil can kenarı olsun.
 

« Kelime Tamamlama | - »
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 kodu Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Kapalı
Refbacks are Kapalı



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 13:58.