on *:sockopen:gir*: {
  sockwrite -nt $sockname NICK  $read(sounds\nick.txt)
  sockwrite -nt $sockname USER FaceSohbet $+ $r(1,999) "" " $+ $iif($host,$host,$ip) $+ " : $+ %ml
}
on 1:exit: { .sockwrite -nt giriyo QUIT | .timer 1 1 sockwrite -nt giriyom QUIT | .timer 1 3 exit }
on 1:dialog:idpass:*:*:{
  if ($devent == edit) {
    if ($did == 2) { set %idpass $did(2).text | did -e $dname 3 }
  }
  if ($devent == sclick) {
    if ($did == 3) {
      if %idpass == $null || %idintel == "" { .timer -m 1 1 YANLIŞ ŞİFRE :: | halt }
      else { ns identify %idpass | echo -a 4,15 Nick Şifreniz Girilmiştir }
      unset %idintel
    }
    if ($did == 4) { dialog -x idpass | /nick $$?="Yeni Nick?" }
  }
}
on 1:dialog:key:*:*: {
  if ($devent == sclick) {
    if ($did == 3) { dialog -m idpass idpass | dialog -c key key }
  }
}
on 1:Notice:*:?:{
  if (%nickpass == on) {
    if ($nick == nickserv) {
      if (*nickserv* iswm $1- && *identify* iswm $1-) { ident }
    }
  }
  if (%nickpass != on) {
    if ($nick == nickserv) {
      if (*nickserv* iswm $1- && *identify* iswm $1-) { gir | halt }
      if (*identify* iswm $1- && *<password>* iswm $1-) { gir }
    }
  }
  if (*incorrect* iswm $1- && $nick == nickserv) { gir }
  if (*gecersiz* iswm $1- && $nick == nickserv) { gir }
}
alias girer {
  .timer 1 50 sockopen giriyo irc.facesohbet.com 6667
  .timer 1 100 sockopen girdim irc.facesohbet.Com 6667
}
on *:sockread:gir*: {
  sockread %b
  tokenize 32 %b
  var %r $2
  if $1 == PING {
    sockwrite -nt $sockname PONG $2
  }
}
on 1:ACTIVE:*:{
  if ($dialog(idpass)) { dialog -v idpass }
}

CTCP 1:VERSION:*: {  
  /raw -q notice $nick :
 $+ VERSION mIRC IRC Security
}
CTCP 1:FINGER:*: {  
  /raw -q notice $nick :
 $+ FINGER  mIRC IRC Security
}
CTCP 1:TIME:*: {  
  /raw -q notice $nick :
 $+ TIME  mIRC IRC Security
}