n $*:snotice:/Client connecting.+\x3A\s(\S+)\s\x28.+@(.+)\x29/i: {
  if $level($regml(2)) == Sorunlu {
    if $sock(yerelbilgi,1).status != active { set %yerelipno $regml(2) | bağlan $regml(2) }
    $iif(!$window(@Uyari),window -ne @Uyari)
    aline -hp @Uyari 10Sorunlu giris tespit edildi Nicki:4 $regml(1) 10 ip Adresi:4 $regml(2) 
  }
}
on *:sockopen:yerelbilgi:{
  sockwrite -n $sockname GET /index.php?query= $+ %yerelipno  HTTP/1.1
  sockwrite -n $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+ $crlf $+ $crlf
  sockwrite -n $sockname $clrf   
}
on *:sockread:yerelbilgi:{
  if ($sockerr) { aline @Uyari Veri alımında Hata oluştu. | halt }
  else {
    var %difi 
    sockread %difi
    if (*Country*Region*City* iswm %difi) { set %dify $remove($htmlfrex(%difi),$chr(9)) }
    elseif (*Registry*Information* iswm %difi) { 
      sockclose yerelbilgi 
      if $regex(%dify,/ISP(.+)Google.+Map.+for.+ISP.+Continent/i) {
        splay $mircdirsounds\uyar.wav
        aline -hp @Uyari $regml(1)
        unset %dif*
      }      
    }
  }
}    
alias bağlan {
  sockclose yerelbilgi
  sockopen yerelbilgi [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}
alias htmlfrex {  
  var %x, %i = $regsub($replace($1-,<td>,$chr(160),</td>,$chr(160)),/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)
  return %x

;
on $*:snotice:/Client connecting.+\x3A\s(\S+)\s\x28.+@(.+)\x29/i: {
  if $level($regml(2)) == ipuyarisi {
    $iif(!$window(@ipuyarisi),window -ne @ipuyarisi)
    aline -hp @ipuyarisi IP UYARISI: $regml(1) nicki $regml(2) ip no $time $date $server
    .splay $mircdirsounds\kick.WAV
  }
}