dialog mservs {
  title ".:: MemoServ ::."
  size -1 -1 141 49
  option dbu
  box "", 1, 5 1 130 22
  text %memoname Nickinden notunuz var  , 2, 8 9 97 10
  button "Menu", 3, 24 30 37 12, default flat
  box "Okuyun:", 4, 5 22 130 23
  button "Kapat", 5, 76 30 37 12, flat ok
}
on *:dialog:mservs:init:*: {
  mdx MarkDialog $dname
  mdx SetDialog $dname bgcolor $rgb(230,245,252)
  mdx SetColor $dname 2 textbg $rgb(230,245,252)
  mdx SetColor $dname 2 background $rgb(230,245,252)
  ;mdx SetColor $dname 2 text $rgb(0,0,0) 
}
on 1:dialog:mservs:sclick:*: {
  if ($did == 3) {
    .dialog -m memoservx memoservx
  }
}
on *:notice:*:*: {
  if ($nick == Memoserv) && (*nick'inden yeni bir notunuz var.* iswm $1-) {
    /set %memoname $1 
  }
  if ($nick == MemoServ) && ($6 == okuyabilirsiniz.) {
    .dialog -m mservs mservs 
  }
}