try this..

Code:
Menu channel,status {
  Color:dialog -mo dcn dcn
}
dialog dcn {
  title "Test"
  size -1 -1 77 30
  option dbu
  combo 2, 4 7 35 70, drop
  check "Check", 3, 41 9 30 10
  button "Cancel", 4, 4 19 35 10, cancel
  button "Update", 5, 40 19 35 10, ok
}
on *:dialog:dcn:*:*:{
  if ($devent == init) {
    if ($did == 0) { 
      if (%chk == 1) did -c $dname 3
      /dcnon
    }
  }
  if ($devent == sclick) {
    if ($did == 2) {
      if ($did(2).seltext) {
        set %colour $did(2).sel
        /dcnon
      } 
    }
  }
}
alias -l dcnon {
  did -a dcn 2 01 White
  did -a dcn 2 02 Black
  did -a dcn 2 03 Dk.Blue
  did -a dcn 2 04 Green
  did -a dcn 2 05 Red
  did -a dcn 2 06 Maroon
  did -a dcn 2 07 Purple
  did -a dcn 2 08 Orange
  did -a dcn 2 09 Yellow
  did -a dcn 2 10 Lt.Green
  did -a dcn 2 11 Teal
  did -a dcn 2 12 Cyan
  did -a dcn 2 13 Blue
  did -a dcn 2 14 Pink
  did -a dcn 2 15 Dk.Grey
  did -a dcn 2 16 Lt.Grey
  did -c dcn 2 %colour
}