function chabujicunchu
fid=fopen('a1.txt');
a1=fgets(fid);
fclose(fid);
x=findstr(a1,'h');
y=findstr(a1,'i');
str0=a1(x+1:y-1);
shux=str2num(str0);
shux=shux*3;
v=num2str(shux);
u=a1(1:x);
w=a1(y:length(a1));
uu=[u,v,w];

promp={'輸入路徑及名稱：（默認為：E:\matlab6.5\work\mywork\a2.txt）'};
default={'E:\matlab6.5\work\mywork\a2.txt'};
stringa=inputdlg(promp,'新文件的路徑及名稱',1,default);
stringb=char(stringa);
save stringab stringb

fid1=fopen(stringb,'a+');
fprintf(fid1,'%s',uu);
fclose(fid1);