%?Particle?Swarm?Optimization%
clear
clc
input33;
%?input33;
%?Finding?Optimal?Size?of?the?SVC?When?SVC?supply?Real?Power?Only
Rik=real（zbus）;?%?finding?R?bus
Xik=imag（zbus）;?%?finding?X?bus
for?i=1:N
	Pi（i）=（Pg（i）-Pl（i））;
	Qi（i）=（Qg（i）-Ql（i））;
end
Vm=abs（V）;
Delta=angle（V）;
for?i=1:N
	for?k=1:N
		alpha（ik）=Rik（ik）*cos（Delta（i）-Delta（k））/（Vm（i）*Vm（k））;
		beta（ik）=Rik（ik）*sin（Delta（i）-Delta（k））/（Vm（i）*Vm（k））;
		gama（ik）=Xik（ik）*cos（Delta（i）-Delta（k））/（Vm（i）*Vm（k））;
		geta（ik）=Xik（ik）*sin（Delta（i）-Delta（k））/（Vm（i）*Vm（k））;
	end
end
Vm=abs（V）;%*baseKV;
Delta=angle（V）;
XC=1.1708;
XL=0.4925;
alphaSVC=90*pi/180;
if?alphaSVC==90*pi/180
	Be=（2*alphaSVC-sin（2*alphaSVC）-pi*（2-XL/XC））/pi*XL;
	ISVC=V（aa）*Be;
	Q=V（aa）^2*Be;
end
for?hh=1:N
	for?ii=1:N
		alpha（hh

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????文件????????3536??2012-11-14?01:12??SVC_PSOGSA.m