pb_add.m

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

%添加电话簿
function pb_add(pb_htable)
disp 'Type the name for the new entry, followed by Enter.'
disp 'Then,type the phone number(s), one per line.'
disp 'To complete the entry, type an extra Enter.'
name=input('::', 's');
entry=[name '^'];
while 1
    line=input('::','s');
    if isempty(line)
        break;
    else
        entry=[entry line '^'];
    end;
end;
if strcmp(entry, '^')
    disp 'No name entered'
    return;
end;
pb_htable.put(pb_keyfilter(name), entry);
disp ''
disp(sprintf('%s has been added to the phone book.', name));