alias d_pass { if $regex($1,/on/i) { if $read(pass.txt,w,$server $+ *) { nickserv identify $gettok($v1,2,32)
    echo $color(notice) -a *** $server sunucusunda nickiniz Nick Servisine tanıtıldı. | return }
    else {  echo $color(notice) -a *** $server sunucusunda kayıt altına alınmış şifreniz bulunmuyor.
  echo $color(notice) -a *** Kayıtlı nickiniz varsa /d_pass add Şifre komutu ile kayıt altına alabilirsiniz. | return } }
  if $regex($1,/add/x20) { if $read(pass.txt,w,$server $+ *) { echo $color(notice) -a *** $server sunucusu için zaten  $+([,$gettok($v1,2,32),]) şifreniz kayıtlı durumda. | return }
  write pass.txt $server $2 | echo $color(notice) -a *** Nick şifreniz $server sunucusu için şifreniz $+([,$2,]) olarak kayıt altına alındı. | return }
  if $regex($1,/del/i) { if !$read(pass.txt,w,$server $+ *) {  echo $color(notice) -a *** $server sunucusunda kayıt altına alınmış şifreniz bulunmuyor. | return }
  write $+(-ds,$server) pass.txt | echo $color(notice) -a *** $server sunusuna ait şifreniz listeden silindi | return }
  if $regex($1,/list/i) { 
    echo $color(notice) -a *** Kayıt altına aldığınız sunucular ve şifreleriniz | echo -a - | var %' 1 | while %' <= $lines(pass.txt) { %pass = $read(pass.txt,%') | echo $color(notice) -a *** Sunucu: $gettok(%pass,1,32) Şifreniz: $gettok(%pass,2,32)
    inc %' } 
  } 
}

/d_pass add Şifre

/d_pass on

/d_pass del

/d_pass list