1 .ur .go %InputFileName%
 2 .rt
 3 .la booktitle
 4 .if %ArgCount% < 1            ;.* must have a title
 5 .then .err No title given.
 6 .rt
 7 .endif
 8 .*
 9 .srv ORDER_NO ""
10 .indctl on
11 .if %ArgCount% > 1
12 .then     .ts "%Arg2%" ^= ""
13           .srv ORDER_NO ", (Order No.*N%Arg2%)"
14 .endif
15 .if %ArgCount% > 2
16 .then     .srv PUNC "%Arg3%"
17 .else     .srv PUNC ","
18 .endif
19 .ur %.fnt CSI%%Arg1%%.fnt%%ORDER_NO%%PUNC%
20 .indctl
21 .rt
22 .*
23 .la note
24 .ur .ur .spt %%{%MPM_SPACE% +  %LABELSPACE%}%% ;.* add appropriate lead
25 .ur .ur .inl +%%{3 * %PAR_INDENT%}%%
26 .ur .ur .unh %%{2 * %PAR_INDENT%}%%
27 .fnt CSBR
28 Note:
29 .fnt
30 .rt