增加多平衡机。

Signed-off-by: facat <dmy@dmy-PC.(none)>

openfile.m

@@ -6,16 +6,18 @@ function [Busnum,Balance,PQstandard,Precision,Linei,Linej,Liner,Linex,Lineb,kmax
 %    编制时间 ：2010.12
 %**************************************************************************
 data = dlmread(FileName);                                           % 一次读入全部数据
+zeroRow = find(data(:,1)==0); 
 Busnum= data(1,1);                                                       % 节点数
 PQstandard = data(1,3);                                               % 基准容量
 kmax = data(1,4);                                                           %最大迭代次数
 Precision = data(2,1);                                                    % 精度
-Balance = data(3,2);                                                      % 生成1到节点号的列向量
+%Balance = data(3,2);     
+Balance=data(3:zeroRow(1)-1,2);% 生成1到节点号的列向量
 CenterA=data(1,5);  %中心参数
 LineNum=data(1,2); %支路数
 Base=data(1,3);
 %% 各参数矩阵分块
-zeroRow = find(data(:,1)==0);                                     %查找第一列元素为零的行号
+
 line = data(zeroRow(1)+1:zeroRow(2)-1,:);               % 形成线路参数矩阵
 ground = data(zeroRow(2)+1:zeroRow(3)-1,:);         % 形成对地支路参数矩阵
 tran = data(zeroRow(3)+1:zeroRow(4)-1,:);              % 形成变压器参数矩阵