Modelluntersuchungen betreffend die Stabilität - Institut für ...

Anhang
8.1.5 Simulation des Arbeitsbereiches eines TCSC
%Programm zur Simulation des Arbeitsbereiches des Labor-TCSC
format long e ;
%Berechnung der Kreisfrequenz Omega
w=2*pi*50;
%Vorgabe der KapazitätC=40e-006 F
l=127e-003;
c=40e-006;
s=1.5;
thetag=90;
% Initialisierung des Arrays der Impedanzwerte des TCSC und des Zündwinkels
xtcsc_m=[];
xbez_m=[];
xtcr_m=[];
thetag_m=[];
u_m=[];
il_m=[];
ic_m=[];
hlx_m=[];
hlu_m=[];
hla_m=[];
hlw_m=[];
hlil_m=[];
hlic_m=[];
% Begin der while Schleife zur Berechnung von Xtcsc als Fkt. des Zündwinkels
while thetag < 180
thetag = thetag +1;
thetar=thetag*pi/180;
k=((2*pi)-(2*thetar)+sin(2*thetar))/(pi*w*l);
btcsc=(w*c)-k;
btcr=-k;
xtcr=-1/btcr;
bc=btcsc-btcr;
xtcsc=-1/(btcsc);
xbez=xtcsc/(-1/(w*c));
u=xtcsc*s;
xc=-1/bc;
xl=-1/btcr;
il=u/xl;
ic=u/xc;
hlx=-100;
hlu=-150;
hla=1.25;
hlw=143.4;
hlil=-0.38;
hlic=1.89;
xtcsc_m=[xtcsc_m xtcsc];
xbez_m=[xbez_m xbez];
xtcr_m=[xtcr_m xtcr];
u_m=[u_m u];
il_m=[il_m il];
ic_m=[ic_m ic];
thetag_m=[thetag_m thetag];
hlx_m=[hlx_m hlx];
hlu_m=[hlu_m hlu];
hla_m=[hla_m hla];
hlw_m=[hlw_m hlw];
hlil_m=[hlil_m hlil];
hlic_m=[hlic_m hlic];
end
%Ende der while Schleife
% Achsenbeschriftung und Plotkonfiguration
%hohe Aufloesssung
subplot(2,1,1)
plot(thetag_m,xbez_m,'-',thetag_m,il_m,'-',thetag_m,ic_m,'-.',thetag_m,hla_m,'k-',hlw_m,u_m,'k-',thetag_m,hlil_m,'k-
',thetag_m,hlic_m,'k-')
Diplomarbeit
96