dialog sifre {
  title "Nick/Şifre Paneli"
  size -1 -1 100 60
  option dbu
  box $me Nicki Şifrelidir;, 1, 5 3 90 35
  text "Şifre Gir:", 2, 10 13 30 8
  text "Yeni Nick:", 3, 10 24 30 8
  edit "", 4, 40 12 50 10, pass
  edit "", 5, 40 23 50 10
  button "Tamam", 6, 10 43 37 12, default
  button "İptal", 7, 55 43 37 12, cancel
}
dialog sifre1 {
  title "Şifre Paneli"
  size -1 -1 100 60
  option dbu
  box , 1, 5 3 90 35
  text "Şifre Gir:", 2, 10 25 30 8
  text "Yanlış Şifre! Tekrar deneyiniz;", 3, 10 11 80 8, center
  edit "", 4, 40 24 50 10, pass
  button "Tamam", 6, 10 43 37 12, ok
  button "İptal", 7, 55 43 37 12, cancel
}
on *:notice:*:*:{ 
  if $nick == NickServ {
    if $regex($1-,/^Gecersiz\ssifre\.$/) { dialog -m sifre1 sifre1 }
    if $regex($1-,/^Bu\skayitli\sve\ssifre/) { .timeridentify 1 3 dialog -m sifre sifre }
    if $regex($1-,/Sifre\skabul\sedildi\./) { .timeridentify off }
  } 
}
on *:dialog:sifre:sclick:6:{
  if ($did(4) && !$did(5)) { .identify $did(4) | /dialog -c sifre sifre }
  if ($did(5) && !$did(4)) { .nick $did(5) | /dialog -c sifre sifre }
  if ($did(4) && $did(5)) {
    $iif($input(Sadece Şifre Veya Sadece Yeni Nick Yazınız!,ohud,Hata!),did -r $dname 4-5)
  }
}
on *:dialog:sifre1:sclick:6:{
  if $did(4) { .identify $did(4) }
}