![](https://secure.gravatar.com/avatar/ca8c18f77a91d7f6fa3e7b3d17386f25.jpg?s=120&d=mm&r=g)
Hello everybody. Some time ago, Wolfgang helped me write an environment to have code above and typeset output below. I'll glue you a MWE below. \mainlanguage [it] \setupbodyfont [modern] \defineuserdata [example] [alternative=example] \defineuserdataalternative [example] [renderingsetup=userdata:example] \startsetups [userdata:example] \blank \startembeddedxtable [width=\textwidth,strut=no,offset=1ex,framecolor=black,rulethickness=0.5pt] \startxrow [corner=03,align=normal] \startxcell \typebuffer [userdata] [option=tex] \stopxcell \stopxrow \startxrow [corner=01,align=normal] \startxcell \getuserdata \stopxcell \stopxrow \stopembeddedxtable \blank \stopsetups \starttext \startuserdata [example] \starttext C’era una volta un re\dots \stoptext \stopuserdata \stoptext Now, the question: Can the code to be improved? How can I modify the code to have the example typeset to the right of the box? I would like the box to be 0.5\textwidth wide. Thanks in advance Tommy