%
% vector to cmd for vm printing
% based on Prt_ in MMS
%
Cton.UnPrt
_Msg.file hex2asc
any?
{
 dup filename exch pathonly -1 right
 &" " ^" " ^ ^"tovmprtA.cmd "
 ofapp *runsnorm
} if