华中科技大学电力系统分析课程设计报告 基于matlab的短路电流计(7)

Z=handles.Z; end

[filename, pathname] = uiputfile({'*.txt','txt-files(*.txt)'},'保存txt','Result.txt');

if filename==0

msgbox('您未选择保存！','对话框','warn'); return

else msgbox('保存成功！','对话框','help'); end

filename=[pathname,filename];

fid=fopen(filename,'wt'); %获得打开文件的返回值，功能类似于指针 fprintf(fid,'%s\\n%s %d %s %d \\n','网络参数:','①该网络节点数为',n,'，短路节点序号为',f);

fprintf(fid,'%s \\n%s \\n','②发电厂参数为','节点号 阻抗值 电压值');

for i=1:p-1

fprintf(fid,' %g %6.2f %6.2f \\n',gg(i,:)); end

fprintf(fid,'%s \\n%s\\n','③接地漏抗的导纳为','节点号 导纳值'); for i=1:q-1

fprintf(fid,' %g %6.2f \\n',loukang(i,:)); end

fprintf(fid,'%s\\n','④网络阻抗矩阵'); for i=1:n for j=1:n

if imagz(i,j)==0 imagz(i,j)=1/0; end end end for i=1:n for j=1:n

31

fprintf(fid,'%6.2f ',imagz(i,j)); end

fprintf(fid,'\\n'); end

fprintf(fid,'\\n%s\\n%s %6.2f\\n%s\\n','短路计算结果为：','①短路电流大小：If=',If,'②各支路电流I为');

for i=1:n for j=1:n

fprintf(fid,'%6.2f ',I(i,j)); end

fprintf(fid,'\\n'); end

fprintf(fid,'%s\\n','③各节点电压V为：'); for i=1:n

fprintf(fid,'%6.2f ',V(i)); end

fprintf(fid,'\\n%s\\n','④Y矩阵如下'); for i=1:n for j=1:n

fprintf(fid,'%6.2f ',Y(i,j)); end

fprintf(fid,'\\n'); end

fprintf(fid,'%s\\n','⑤Z矩阵如下'); for i=1:n for j=1:n

fprintf(fid,'%6.2f ',Z(i,j)); end

fprintf(fid,'\\n'); end

fclose(fid);

guidata(hObject,handles);

32