on *:snotice:*: {
  if (*Kodu*GIRIS*Kod* iswm $1-) {
    dialog -m giriskodu giriskodu
  } 
}

dialog Giriskodu {
  title "Giris Kodunu Yaziniz"
  size -1 -1 120 47
  option dbu
  icon icon\10.ico, 0
  box "Ekranda Gördügünüz Kodu Kutucuga Yaziniz", 1, 2 1 116 44
  icon 2, 12 13 15 19, icon\10.ico, 0
  edit "", 3, 45 12 55 11
  button "TAMAM", 4, 45 27 55 12, ok
}

on 1:dialog:Giriskodu:sclick:4: {
  if ($did(Giriskodu,3)) .giris $did(Giriskodu,3)
}