IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Merhabalar;
Remote sunucuya giriş yapan kullanıcının giriş bilgilerini @Giriş penceresinde göstermektedir.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

on *:text:*:#Bilgi:{

if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) { who +I $strip($6) | if (!$window(@Giriş)) { window -en @Giriş } | echo -t @Giriş - 4Nick: 2 $strip($6)  } }

raw 352:*:var %:r $r(1000,99999) | sockopen $+(nrdn,%:r) ipinfo.io 80 | sockmark $+(nrdn,%:r) $+($4,¿,$6)

on *:sockopen:nrdn*:{ 

  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/geo) HTTP/1.1 

  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8

  sockwrite -n $sockname Connection: keep-alive

  sockwrite -n $sockname Host: ipinfo.io

  sockwrite -n $sockname  $crlf 

}

on *:sockread:nrdn*:{ 

  var %:nrdn | sockread %:nrdn | tokenize 32 %:nrdn

  if ("*": * iswm $1-) {

    var %2 = $remove($2-,",$chr(44)) 

    if ($1 == "ip":) { if (!$window(@Giriş)) { window -en @Giriş } | echo -t @Giriş - 4IP:2 %2 } 

    if ($1 == "city":) { if (!$window(@Giriş)) { window -en @Giriş } | echo -t @Giriş - 4Sehir:2 %2 }

  if ($1 == "country":) { if (!$window(@Giriş)) { window -en @Giriş } | echo -t @Giriş - 4Ülke:2 %2 | sockclose $sockname } }

}

}

Sunucu girişlerini snotice olarak görüyorsanız.

Kod:

on *:text:*:#Bilgi:{

if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) { who +I $strip($6)

kısmını;

Kod:

on *:snotice:*Client connecting on port*:who +I $9

Şeklinde değiştirmeniz gerekmektedir. Keyifli paylaşımlar.