[NTG-context] What is a better way to do this macro?

Dear gang, Consider the following (also attached): =====choice-cs.tex==== \def\CHOICE#1#2{\leavevmode\vbox{\tabskip=0pt\everycr={} \halign{\strut\hfil##\hfil\cr#1\cr#2\cr}}} \setuppagenumber[state=stop] \setupwhitespace[big] \starttext (One~* Two~* Three~* Four) is even. (\CHOICE{x}{One}~* \CHOICE{1}{Two}~* \CHOICE{x}{Three}~* \CHOICE{2}{Four}) is even. \stoptext ====================== What is best way to define the \CHOICE macro without low-level TeX commands, only high-level ConTeXt commands? Thanks in advance and Best wishes Idris -- Idris Samawi Hamid Professor of Philosophy Colorado State University Fort Collins, CO 80523