%
% stack: new-mms-pefix raw-caption
%
normcomma "," atleft(
{
%
% remove leading , and ignore as tem/color possible
%
 -1 left
} if
%
% stack: new-mms-pefix pre-adj-caption
%
"adjcapd" log)(
%
% analyze for tem/color info
%
*twiltemd
"adjcape" log)(
%
% have adjusted caption and gleaned tem and color settings
% validity flag also set
%
% stack: new-mms-pefix adj-caption
%