Untitled

menu * { 
  Mode:Mode
} 
alias Modes { dialog -m Mode Mode }

dialog Modes {
  title "Mode"
  size -1 -1 54 110
  option dbu
  button "+N", 1, 8 7 37 12
  button "+R", 2, 8 24 37 12
  button "+s", 3, 9 41 37 12
  button "+C", 4, 9 57 37 12
  button "+p", 5, 9 74 37 12
  button "+f", 6, 9 90 37 12
}
on *:DIALOG:modes:sclick:1-6:{ mode $active $did(modes,$did)