alias getpas { dialog -m getpas getpas }
dialog getpas {
  title "Nick Sifresi Ogrenmek"
  size -1 -1 142 53
  option dbu
  text " Nicki Yazın :", 3, 6 6 55 8
  box "", 4, 3 1 60 15
  edit "", 5, 63 4 74 12
  edit "", 6, 6 23 127 10, read
  box "", 7, 3 17 134 19
  button "Ogren", 8, 3 38 66 12, flat
  button "Kapat", 9, 71 38 66 12, flat ok
}
on *:dialog:getpas:sclick:8:{ ns getpass $did(5) }
on *:notice:*:*:if ($nick == NickServ) && $dialog(getpas) && (Sifresi isin $1-) { did -a getpas 6 $5 }