mIRC Oto Şifre Girme (Snippets Code)

on *:notice:*:?: {
  if $nick == nickserv {
    if IDENTIFY sifreniz isin $strip($1-) && $readini(otosifre.63,$network,$me) { var %sifre $v1
      .msg nickserv identify %sifre
      echo -es 4**3 Oto sifreleme ile sifreniz girilmistir.(Sifreniz: %sifre  $+ )
      return
    }
    if $regex($strip($1-),/(sifre kabul edildi|nicki ile sisteme login)/i) && $network == $hget($network,isim) {
      writeini otosifre.63 $network $hget($network,nick) $hget($network,sifre)
      echo -es **Oto sifreleme kayit edildi.(Sunucu: $server - Nick: $hget($network,nick) - Sifre: $hget($network,sifre) $+ )
      echo -es **3Kayit edildi.
      .hfree -sw $network
      return
    }
  }
}

alias sifre { echo -ea $iif($readini(otosifre.63,$network,$1),$1 nickine ait Sifre: $v1,$1 nickine ait Sifre yok) }
alias identify {
  if $network {
    hadd -m $network isim $network
    hadd -m $network sifre $1-
    hadd -m $network nick $me
    identify $1-
  }
  else { echo -ea Herhangi bir yere bagli degilsiniz. }
}