Posted to tcl by Stu at Sat May 20 14:33:10 GMT 2023view pretty

M BuBdBlBrM BoBc
^M1
:{M0,1} -padx {0 10} {10 0}
T
M BlBuM Bc
  BrBd  Bo
^M3
T
M Bu  M Bc
  BlBr  Bo
  Bd
^M5
:B12,17 -columnspan 2
T
M Bu  M BcBo
  BlBr   
  Bd
^M7
T
M BlBuBr  M Bo
    Bd      Bc

^M9
:B24,26 -rowspan 2 

:B18,23 -columnspan 2
.{B<udlroc>} -text \u2191 \u2193 \u2190 \u2192 Ok Cancel
:T -sticky ew -columnspan 2 -pady 6
.B<udlr> -width 2
.B<oc> -width 5