Hazır kod /* Pencereniz Skype Gibi Olsun İstiyorsanız */

alias ozel { dialog -md new new }
dialog New {
  title "Özel Mesaj Penceresi"
  size -1 -1 295 184
  option dbu
  edit "", 1, 6 16 287 121, multi return vsbar
  edit "", 2, 8 142 242 39
  button "Gonder", 3, 256 141 35 19
  combo 4, 6 3 112 205, size drop
  button "Temizle", 5, 256 163 35 19
}

on *:dialog:new:*:*: {
  if $devent == sclick {
    if $did == 5 {
      did -r $dname 1
    }
    if $did == 3 {
      msg $did(4) $did(2)
      did -a $dname 1 $crlf
      did -a $dname 1 $me $+ : $did(2)
      did -r $dname 2
    }
  }
  if $devent == init {
    var %i 1
    while %i <= $query(0) {
      did -a $dname 4 $query(%i)
      inc %i
    }
    did -c $dname 4 1
  }
}