电力系统下课程设计

GuangzhouCollegeofSouthChinaUniversityofTechnology《电力系统分析》课程设计报告题目：3G9bus短路电流计算电气工程学院10电气工程学院10级电气四班专业班级学生姓名学号指导教师 提交日期2012年12月10日目录、设计目的 TOC\o"1-5"\h\z\o"CurrentDocument"、短路电流计算的基本原理和方法 3电力系统节点方程的建立 3利用节点阻抗矩阵计算短路电流 4\o"CurrentDocument"三、3G9bus短路电流在计算机的编程 6、三机九节点系统 6输出并计算结果 13四．总结 15、设计目的.掌握电力系统短路计算的基本原理；.掌握并能熟练运用一门计算机语言（MATLAB语言或FORTRAN或C语言或C++语言）；.采用计算机语言对短路计算进行计算机编程计算。、短路电流计算的基本原理和方法电力系统节点方程的建立利用节点方程作故障计算，需要形成系统的节点导纳（或阻抗）矩阵。一般短路电流计算以前要作电力系统的潮流计算，假定潮流计算的节点导纳矩阵已经形成，在此基础上通过追加支路的方式形成电力短路电流计算的节点导纳矩阵YN。1）对发电机节点EZ二RjX在每一发电机节点增加接地有源支路 i与「ii串联求短路稳态解：Ei"QiZ"R'jXiiqi求短路起始次暂态电流解：Ei二iEZi=Ri'ijX一般情况下发电机定子绕组电阻忽略掉，并将一一般情况下发电机定子绕组电阻忽略掉，并将一■jX一、一 E.与Z一,R」的有源支路转化成电流源i▼i i iYi=iGBi=^-Ii=iEZ与导纳 RjXi并联的形式2）负荷节点的处理1 1负荷节点在短路计一算中一般作为节点的接地支路，并用恒定阻抗表示，其数值由短路前瞬间的负荷功率和节点实际电压算出，即首先根据给定的电力系统运行方式制订系统的等值电路，并进行各元件标么值参数的计算，然后利用变压器和线路的参数形成不含发电机和负荷的节点导纳矩阵YN。2ZLDk二2ZLDk二 LdR- 12?kSLDkYLDk二浪一滁SLDk2Vk图fi-1发电机和负荷等值俎路ra（S3对称歧躇外圻3）如果短路故障发生在输电线路内，在短路点要增加新节点，将一条输电线分成两段，并形成短路电流计算的节点导纳矩阵 Y，最后形成包括所有发电机支路和负荷支路的节点方程如下：二 YVI一般，节点导纳矩阵Y阵与YN阶次相同。其差别只在于YN阵不含发电机和负荷的阻抗；节点注入电流向量I中只有发电机端节点的电流不为零。有非零电流源注人的节点称为有源节点。系统中的同步调相机可按发电机处理。任进行起始次暂态电流计算时，大型同步电动机、感应电动机以及以电动机为主要成分的综合负荷，特别是在短路点近处的这些负荷，必要时也可以用有源支路表示，并仿照发电机进行处理。必须指出，在计算机已普遍应用的情况下，如果有必要的话，只要能提供短路计算所需的准确的原始数据，对短路进行更精确的计算并不存在什么障碍。利用节点阻抗矩阵计算短路电流假定系统中的节点f经过渡阻抗zf发生短路。过渡阻抗渡阻抗zf，不参与形成网络的节点导纳（或阻抗）矩阵。图6-3中方框内的有源网络代表系统正常状态的单相等值网络。现在我们保持故障处的边界条件不变， 把网络的原有部分同故障支路分开（见图6-3）。容易看出，对于正常状态的网络而言，发生短路相当于在故障节点 f增加了一个注人电流一If（短路电流以流出故障点为正，节点电流则以注入为正） 。因此，网络中任一节点Vi二、Z"一ifZf（i=1,2,..,f,.,n）的电压可表示为： j。 （6-3）由式（6-3）可见，任一节点i的电压郁由两项叠加而成。第一项表示当 If=0时由网络内所有电源在节点i产生的电压，也就是短路前瞬间正常运行状态一F 的节点电压，,V这是节点电压的正常分量，记为i（0）是电网的潮流解。第二项是当网络中所有电流源都断开，

仅仅由短路电流If在节点产生的电压，仅仅由短路电流If在节点产生的电压，这就是节点电压的故障分童。上述两个分量的叠加，就等于发生短路后节点，的实际电压，即v!=v'i⑹一iflf（i1,2，..，f，.f（0n）V1-iflf （6-4）式中，Vi⑹是短路前故障点的正常电压；当i=f时，Zff是故障节点f的自阻抗，也称输入阻抗。V Vi输入阻抗。V Vi【ZfIf（边界条件方程）带入ff(jZi!f可得:ffzfzVi=VVi=Vi(o)-Zif1,2,..,f,.,n)ffZf■工存源的端网格pqZ存源的端网格pq对于非变压器支路，令k=1。从计算公式（6-7）和（6-8）可以看到，式中所用到的阻抗矩阵元素都带有列标f。这就是说，如果网络在正常状态下的节点电压为已知，为了进行短路计算，只须利用节点阻抗矩阵中与故障点f对应的一列元素。因此，尽管是采用了阻抗型的节点方程，但是并不需要作出全部阻抗矩阵。在短路的实际计一算中，一般只需形成网络的节点导纳矩阵.并根据具体要求，用第四章所讲的方法求出阻抗矩阵的某一列或某几列元素即可。在应用节点阻抗矩阵进行短路计算时，我们都将采用这种算法。1)解潮流计算， Vi(0)(i=1,2,..,f,.,n)2）修正解潮流的YN形成Y3）指定短路点fY11Y21Y12丫22Y■n1Yn2illillHI1nY2nYnn2k第元素,( ,,,)Lfk=1,2,,,nZk-nkL0JL0JV，.f（0）If= 5）计算短路电流： Z-ffzf6）计算节点电压：Vi=iV⑻-ZifIf （iI2,..,f,.,n）pq7）计算支路电流:8pq7）计算支路电流:8）输出计算结果pq三、3G9bus短路电流在计算机的编程、三机九节点系统图1图1三机九节点系统表1九节点系统支路参数支路R（p.u.）X（p.u）B/2（p.u.）1~400.05761.02~700.06251.03~900.05861.04~50.010.0850.0884~60.0170.0920.0795~70.0320.1610.1536〜90.0390.170.1797〜80.00850.0720.07458~90.01190.10080.1045表2九节点系统发电机参数发电机编号节点类型Pg(p.u.)Vg(p.u.)X：(p.u)E『(p.u.)1V&1.040.31.1372PV1.631.0250.31.2113PV0.851.0250.31.043表3九节点系统负荷参数节点编号节点类型Pi(p.u.)Qi(p.u)4pq005pq1.250.56pq0.90.37pq008pq10.359pq00主程序程序设计主函数Sbase_MVA=100.fid=fopen('Nodedata.txt');N=textscan(fid,'%s%u%d%f%f%f%f%f%f')fclose(fid);busnumber=size(N{1},1)fori=1:busnumberBus(i).name=N{1}(i);Bus(i).type=N{2}(i);Bus(i).no=i;Bus(i).Base_KV=N{3}(i);Bus(i).PG=N{4}(i);Bus(i).QG=N{5}(i);Bus(i).PL=N{6}(i);Bus(i).QL=N{7}(i);Bus(i).pb=N{8}(i);Bus(i).V=1.0;Bus(i).angle=0;endfid=fopen('Aclinedata.txt');A=textscan(fid,'%s%s%f%f%f%f')fclose(fid);aclinenumber=size(A{1},1)fori=1:aclinenumberAcline(i).fbname=A{1}(i);Acline(i).tbname=A{2}(i);Acline(i).Base_KV=A{3}(i);Acline(i).R=A{4}(i);Acline(i).X=A{5}(i);Acline(i).hB=A{6}(i);fork=1:busnumberifstrcmp(Acline(i).fbname,Bus(k).name)Acline(i).fbno=Bus(k).no;endifstrcmp(Acline(i).tbname,Bus(k).name)Acline(i).tbno=Bus(k).no;endendendfid=fopen('Transdata.txt');T=textscan(fid,'%s%f%f%s%f%f%f%f')fclose(fid);tansnumber=size(T{1},1)fori=1:tansnumberTrans(i).fbname=T{1}(i);Trans(i).fbBase_KV=T{2}(i);Trans(i).fbrated_KV=T{3}(i);Trans(i).tbname=T{4}(i);Trans(i).tbBase_KV=T{5}(i);Trans(i).tbrated_KV=T{6}(i);Trans(i).R=T{7}(i);Trans(i).X=T{8}(i);fork=1:busnumberifstrcmp(Trans(i).fbname,Bus(k).name)Trans(i).fbno=Bus(k).no;endifstrcmp(Trans(i).tbname,Bus(k).name)Trans(i).tbno=Bus(k).no;endendTrans(i).k=Trans(i).tbrated_KV*Trans(i).fbBase_KV/Trans(i).fbrated_KV/Trans(i).tbBase_KV;tempx=Trans(i).fbrated_KV八2/Trans(i).fbBase_KV八2;Trans(i).X=tempx*Trans(i).X;Trans(i).R=tempx*Trans(i).R;end%N=0%Trans(1)%Trans(2)%forY=G+jBmatrix[G,B,B2]=FormYmatrix(Bus,busnumber,Acline,aclinenumber,Trans,tansnumber);%B:=B';B2:=B"dlmwrite('Gmatrix.txt',G,'delimiter','\t','precision',6);dlmwrite('Bmatrix.txt',B,'delimiter','\t','precision',6);GBB2pause[JP,JQ]=FormJPQmatrix(Bus,B,B2,busnumber);JPiJP=-inv(JP)JQiJQ=-inv(JQ)pause%maxiteration=0fori=1:busnumberNodeV(i)=Bus(i).V;Nodea(i)=Bus(i).angle;VX(i)=Bus(i).V*cos(Bus(i).angle);VY(i)=Bus(i).V*sin(Bus(i).angle);dQGQL(i)=Bus(i).QG-Bus(i).QL;dPGPL(i)=Bus(i).PG-Bus(i).PL;endNodeV=NodeV'Nodea=Nodea'%VX=VX'%VY=VY'dQGQL=dQGQL'dPGPL=dPGPL'pause%fornointer=1:10maxdP=1.;maxdQ=1.;epsilon=0.000001;noiteration=0;while(maxdP>epsilon)&(maxdP>epsilon)[deltaP,deltaQ,maxdP,maxdQ]=FormdPQvector(Bus,NodeV,Nodea,dQGQL,dPGPL,B,G,busnumber);deltaP;deltaQ;maxdP;maxdQ;da=iJP*deltaP;dV=iJQ*deltaQ;Nodea=Nodea+da;NodeV=NodeV+dV;noiteration=noiteration+1;ifnoiteration>20breakendendfori=1:busnumberBus(i).V=NodeV(i);NodeV(i)=NodeV(i)*Bus(i).Base_KV;Bus(i).angle=Nodea(i);Nodea(i)=Nodea(i)*180/pi;endnoiterationNodea=Nodea'NodeV=NodeV'Clear子函数%生成G、B矩阵function[G,B,X]=FormYmatrix(Bus,busnumber,Acline,aclinenumber,Trans,tansnumber)Y=zeros(busnumber);X=zeros(busnumber);fori=1:busnumberY(i,i)=Y(i,i)+Bus(i).pb*j;endfori=1:aclinenumberf=Acline(i).fbno;t=Acline(i).tbno;Y(f,f)=Y(f,f)+Acline(i).hB*j+1/(Acline(i).R+Acline(i).X*j);Y(t,t)=Y(t,t)+Acline(i).hB*j+1/(Acline(i).R+Acline(i).X*j);Y(f,t)=Y(f,t)-1/(Acline(i).R+Acline(i).X*j);Y(t,f)=Y(t,f)-1/(Acline(i).R+Acline(i).X*j);X(f,f)=X(f,f)-1/Acline(i).X;X(t,t)=X(t,t)-1/Acline(i).X;X(f,t)=1/Acline(i).X;X(t,f)=1/Acline(i).X;endfori=1:tansnumberf=Trans(i).fbno;t=Trans(i).tbno;Y(f,f)=Y(f,f)+1/(Trans(i).R+Trans(i).X*j);Y(t,t)=Y(t,t)+1/(Trans(i).R+Trans(i).X*j)/Trans(i).k八2;Y(f,t)=Y(f,t)-1/(Trans(i).R+Trans(i).X*j)/Trans(i).k;Y(t,f)=Y(t,f)-1/(Trans(i).R+Trans(i).X*j)/Trans(i).k;X(f,f)=X(f,f)-1/Trans(i).X;X(t,t)=X(t,t)-1/Trans(i).X;X(f,t)=1/Trans(i).X;X(t,f)=1/Trans(i).X;endG=real(Y);B=imag(Y);end%生成JP、JQ矩阵function[JP,JQ]=FormJPQmatrix(Bus,B,B2,busnumber)JP=B;JQ=B2;fori=1:busnumberifBus(i).type==1fork=1:busnumberJQ(i,k)=0.;JQ(k,i)=0.;JP(i,k)=0.;JP(k,i)=0.;endJQ(i,i)=1.;JP(i,i)=1.;endifBus(i).type==3fork=1:busnumberJQ(i,k)=0.;JQ(k,i)=0.;endJQ(i,i)=1.;endendend%计算偏节点PQ差量function[deltaP,deltaQ,maxdP,maxdQ]=FormdPQvector(Bus,NodeV,Nodea,dQGQL,dPGPL,B,G,busnumber)deltaQ=dQGQL;deltaP=dPGPL;maxdP=0.;maxdQ=0.;fori=1:busnumberifBus(i).type==1deltaQ(i)=0.;deltaP(i)=0.;endifBus(i).type==3deltaQ(i)=0.;%y1=0;%y2=0;y3=0;fork=1:busnumberif(B(i,k)~=0|G(i,k)~=0)%y1=y1+(G(i,k)*VX(k)-B(i,k)*VY(k));%y2=y2+(G(i,k)*VY(k)+B(i,k)*VX(k));y3=y3+NodeV(k)*(G(i,k)*cos(Nodea(i)-Nodea(k))+B(i,k)*sin(Nodea(i)-Nodea(k)));endenddeltaP(i)=deltaP(i)-y3*NodeV(i);%deltaP2(i)=(deltaP2(i)-(y1*VX(i)+y2*VY(i)))/Bus(i).V;endifBus(i).type==2%y1=0;%y2=0;y3=0;y4=0;fork=1:busnumberif(B(i,k)~=0|G(i,k)~=0)%y1=y1+(G(i,k)*VX(k)-B(i,k)*VY(k));%y2=y2+(G(i,k)*VY(k)+B(i,k)*VX(k));y3=y3+NodeV(k)*(G(i,k)*cos(Nodea(i)-Nodea(k))+B(i,k)*sin(Nodea(i)-Nodea(k)));y4=y4+NodeV(k)*(G(i,k)*sin(Nodea(i)-Nodea(k))-B(i,k)*cos(Nodea(i)-Nodea(k)));endenddeltaP(i)=deltaP(i)-y3*NodeV(i);%deltaP2(i)=(deltaP2(i)-(y1*VX(i)+y2*VY(i)))/Bus(i).V;deltaQ(i)=deltaQ(i)-y4*NodeV(i);%deltaQ2(i)=(deltaQ2(i)-(y1*VY(i)-y2*VX(i)))/Bus(i).V;endifmaxdP<abs(deltaP(i));maxdP=abs(deltaP(i));endifmaxdQ<abs(deltaQ(i));maxdQ=abs(deltaQ(i));enddeltaP(i)=deltaP(i)/NodeV(i);deltaQ(i)=deltaQ(i)/NodeV(i);endend输出并计算结果由以上程序可以得出：(1)进行系统正常运行状态的潮流计算，求得vi(0)：己知公式可⑹=1-(Zif/(ff+Zf))因为金属性短路时f0公式为V(0)=1-(2]"立)再根据公式可得，iv1&(0)=0.2774；v2&(0)=0.6770；v3&(0)=0.6770；v4&(0)=0；v5&(0)=0.1870；v6&(0)=0.1934；v7&(0)=0.54197；v8&(0)=0.5456；v&(0)=0.551