pb_display.m

这是机械工业张德丰《MATLAB与外部程序接口编程》随书源码

function pb_display(entry)
disp ''
disp '- - - - - - - - - - - - - -'
[t,r]=strtok(entry, '^');
while ~isempty(t)
    disp (sprintf(' %s', t))l
    [t,r]=strtok(r, '^');
end;
disp '- - - - - - - - - - - - - -'