if $did($dname,2).sel == 12 { cs temizle $chan   } 

if $did($dname,2).sel == 12 { if $regex($active,^#) { cs temizle $active } }

if $did($dname,2).sel == 12 { if $regex($active,^#) { cs temizle $active } }

if $did($dname,2).sel == 12 { if $regex($active,^#) { cs temizle $active | dialog -x $dname $dname } }

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:*: { 
  if $did($dname,1).sel == 1 { if $regex($active,^#) { cs temizle $active | dialog -x temizle temizle } }
}

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 } }