dialog X {
title "xXx"
size -1 -1 110 95
option dbu
button "Ekle", 1, 70 23 25 12, default flat multi
combo 2, 4 23 60 50, size
button "Sil", 3, 70 38 25 12, default flat multi
button "Giriş", 4, 70 58 37 12, default flat multi
text "Nick Listesi", 5, 4 13 32 8
link "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
", 6, 26 84 53 8
}

alias xxx { if !$dialog(x) { dialog -ma x x } }
on *:dialog:x:*:*:{
;INIT eventi dialog açıldığında devreye girer. Biz nickler.txt dosyamızın içindekileri
;2 id numaralı combo kutumuza aktarıyoruz ve 1. sıradaki veriyi seçiyoruz
  if $devent == INIT { loadbuf 0 -o $dname 2 nickler.txt | did -c $dname 2 1 }
;eğer dialog üzerinde herhangi bir şeye basıldığında
  if $devent == SCLICK {
;eğer bu 1 idli butonusa (ekle butonu)
    if $did == 1 {
;eğer nickler.txt'de editte yazılan yazı yoksa nickler.txt'e ekle
      var %_ = $did(2).text
      if !$read(nickler.txt,w,%_) { write nickler.txt %_ | did -a $dname 2 %_ }
    }
;eğer bu 3 idli butonsa (sil butonu)
    if $did == 3 {
;eğer nickler.txt'te bu veri varsa dosyadan sil ve comboboxdan da sil.
      if $read(nickler.txt,w,$did(2).seltext) { write $+(-dl,$readn) nickler.txt | did -d $dname 2 $did(2).sel | did -c $dname 2 1 }
    }
;eğer 4 nolu idye basıldığında
    if $did == 4 {
;echo ile seçili text ekrana gösteriliyor. istediğin komutu sen buraya yazmalısın.
      echo :: Giriş tuşuna basıldı. $did(2).text seçili.
    }
  }
}

* /loadbuf: Açılamıyor 'C:\mIRCTurk\nickler.txt' (Satır 14, Nick.txt)