hhu_runpf.m

用于潮流计算的实用程序是电力系统毕业设计的必备程序包 使用范围很广的 欢迎测试

function hhu_runpf
disp('          ***欢迎使用Power Flow Calculation Packages进行潮流计算，请选择潮流计方法***    ')
disp('                 ')
disp('                 ')
disp('              －－－－－－－－－－－－－－－－－－－－－－－－－－   ')
disp('                        [1].直 流 法 潮 流 计 算                                                                         '   )
%disp('|参考文献: H. Wang, C. E. Murillo-Sánchez, R. D. Zimmerman, R. J. Thomas, “On Computational Issues of                  |')
%disp('| Market-Based Optimal Power Flow”, IEEE Transactions on Power Systems, Vol. 22, No. 3,Aug. 2007, pp. 1185-1193.    \   |')
disp('              －－－－－－－－－－－－－－－－－－－－－－－－－－   ')


disp('                        [2].牛 顿 拉 夫 逊 法 潮 流 计 算   ')
%%disp('        参考文献:  W. F. Tinney and C. E. Hart, “Power Flow Solution by Newton’s Method”, IEEE Transactions on')
%%disp (' Power Apparatus and Systems, Vol. PAS-86, No. 11, Nov. 1967, pp. 1449-1460. ')
disp('              －－－－－－－－－－－－－－－－－－－－－－－－－－   ')


disp('                        [3].快 速 PQ 分 解 法 潮 流 计 算   ')
%%disp('        参考文献:  B. Stott and O. Alsac, “Fast decoupled load flow”, IEEE Transactions on Power Apparatus and')
%%disp (' Systems, Vol. PAS-93, June 1974, pp. 859-869. ')

disp('              －－－－－－－－－－－－－－－－－－－－－－－－－－   ')
disp('                        [4].Gauss-Seidel 潮 流 计 算   ')
%%disp('        参考文献: A. F. Glimm and G. W. Stagg, “Automatic calculation of load flows”, AIEE Transactions (Power')
%%disp (' Apparatus and Systems), vol. 76, pp. 817-828, Oct. 1957. ')
disp('              －－－－－－－－－－－－－－－－－－－－－－－－－－   ')
disp('                        [5].退 出 程 序 运 行   ')
%%disp('        参考文献: A. F. Glimm and G. W. Stagg, “Automatic calculation of load flows”, AIEE Transactions (Power')
%%disp (' Apparatus and Systems), vol. 76, pp. 817-828, Oct. 1957. ')
disp('              －－－－－－－－－－－－－－－－－－－－－－－－－－   ')
disp('                 ')
disp('                 ')

choice = input('     ****输入您的选择[1-5之间]*** :        ');
if isempty(choice)
   disp('                 ')
   disp('                 ')
    disp('                      **** 错误： 输入不能为空，请重新选择***      ');
   hhu_runpf
end
switch choice
    case 1
     hhu_dcpf
    case 2
     hhu_newtonpf
    case 3
      hhu_pqpf
    case 4
      hhu_gspf
    case 5 
      hhu_break;
       
       
   otherwise
      hhu_again;  
 end

return