alias temiz { dialog -m temizle temizle }
dialog temizle {
  title "Temizle"
  size -1 -1 156 187
  option dbu
  button "Cs Temizle", 1, 60 21 37 12, flat
}
On *:Dialog:temizle:sclick:1:{ if $regex($active,^#) {
cs temizle $active | dialog -x temizle temizle } }