Am 07.06.10 02:03, schrieb Scott Steele:

> Thanks a lot for all of that! I'm having trouble getting it to run,
> though. I tried copy/pasting it into the Context Live site but get  [...]

The mail client messed up my code, here is a slightly modified version:

\unprotect

\def\v!fancybreak{fancybreak}

\def\????fb{@@@@fb}

\getparameters
   [\????fb]
   [\c!spacebefore=,
     \c!spaceafter=,
          \c!align=\v!middle,
     \c!indentnext=\v!yes]

\def\fancybreakparameter 
#1{\csname\dofancybreakparameter{\????fb\currentfancybreak}#1\endcsname}
\def\dofancybreakparameter 
#1#2{\ifcsname#1#2\endcsname#1#2\else\expandafter\dodofancybreakparameter\csname#1\s!parent\endcsname#2\fi}
\def\dodofancybreakparameter#1#2{\ifx#1\relax\s!empty\else\dofancybreakparameter#1#2\fi}

\unexpanded\def\setupfancybreak
   {\dodoubleempty\dosetupfancybreak}

\def\dosetupfancybreak[#1][#2]%
   {\ifsecondargument
      \getparameters[\????fb#1][#2]%
    \else
      \getparameters[\????fb][#1]%
    \fi}

\unexpanded\def\definefancybreak
   {\dodoubleempty\dodefinefancybreak}

\def\dodefinefancybreak[#1][#2]%
   {\getparameters[\????fb#1][\s!parent=\????fb,#2]%
    \setvalue{#1}{\dofancybreak{#1}}}

\unexpanded\def\dofancybreak#1%
   {\begingroup
    \edef\currentfancybreak{#1}%
    \everyvbox{\setupalign[\fancybreakparameter\c!align]}%
    \dowithnextbox
      {\blank[\fancybreakparameter\c!spacebefore]%
       \flushnextbox
       \blank[\fancybreakparameter\c!spaceafter]%
       \checknextindentation[\fancybreakparameter\c!indentnext]
       \dorechecknextindentation
       \endgroup}
      \normalvbox}

\definefancybreak[\v!fancybreak]

\protect

\starttext

\input knuth
\fancybreak{$* * *$}
\input ward

\page

\setupindenting[yes,medium]

\input knuth
\fancybreak{$* * *$}
\input ward

\stoptext

Wolfgang