on *:text:*:?: { if $regex($1,/^((!|\.)pass)$) {
    if $2 == sifre { set %login $addtok(%login,$nick,32) 
    msg $nick Şifre kabul edildi. | halt }
  else { msg $nick hatalı şifre girişi yaptınız. Lütfen bot sahibinden gerekli şifreyi temin ediniz. } } 
  if $left($1,1) == $chr(35) {
    if !$istok(%login,$nick,32) { msg $nick komut kullanma yetkisine sahip değilsiniz | halt }
mode $2- } }

alias ytnick return Nick
on *:text:*:?: { 
  if $regex($1,/[!.](s|ş)ifre/i) {
    if !$2 { msg $nick Seçenek belirtmediniz. Örn: !sifre <gir> şifre }
    if $regex($replace($2,aç,on,ac,on,kapat,off),/(on|off|ekle|sil)/i) {  
      if $istok($ytnick,$nick,32) { 
        if $regml(1) == on { msg $nick Şifre girme özelliği açıldı.  | set -e %sifreoz. on }
        if $regml(1) == off { msg $nick Şifre girme özelliği kapatıldı. | unset %sifreoz. }
        if $regml(1) == ekle && $3 {
          if %sifreoz. == on {
            if (%bsifre) { set %bsifre $3 | msg $nick Şifre $3 olarak değiştirildi. | return }
            msg $nick Şifre $3 olarak belirlendi. | set %bsifre $3 
          }
          else msg $nick Şifre girme özelliği kapalı durumda. 
        }
        if $regml(1) == sil { if (%bsifre) { unset %bsifre | unset %login | msg $nick Şifre ve yetkili nickler sıfırlandı. } }
      } 
      else msg $nick Bu komutu kullanabilecek yetkiye sahip değilsin 
    }
    if $2 == gir && $3 {
      if (%sifreoz. == $null) { msg $nick Şifre girme özelliği kapalı durumda. | return }
      if $3 == %bsifre { msg $nick Şifrenizi doğru bir şekilde girdiniz | set %login $addtok(%login,$nick,32) }
      else msg $nick Yanlış şifre girildi. 
    }
  }
  if $left($1,1) == $chr(35) {
    if !$istok(%login,$nick,32) { msg $nick komut kullanma yetkisine sahip değilsiniz | return }
    mode $1-
  }
}