📄 voltage2current2.m
字号:
Iopa55=0.03-Ibiasa55; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa55=0.011;
Iopa55=0.03-Ibiasa55; %Las unidades de la resistencia son "Amperes".
end
case '1550'
switch (LR55)
case 'STS-12/STM-4'
Ibiasa55=0.012;
Iopa55=0.02-Ibiasa55; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa55=0.012;
Iopa55=0.035-Ibiasa55; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa55=0.02;
Iopa55=0.065-Ibiasa55; %Las unidades de la resistencia son "Amperes".
end
end
set_param(LB55,'Iopa',num2str(Iopa55));
set_param(LB55,'Ibiasa',num2str(Ibiasa55));
end
if isempty(find_system(gcs,'Name','Regenerator6'))~=1
LB66=([gcs,'/','Regenerator6']);
LR66=get_param(LB66,'sel');
LM66=get_param(LB66,'frec');
[a b]=size(V);
switch (LM66)
case '1310'
switch (LR66)
case 'STS-12/STM-4'
Ibiasa66=0.012;
Iopa66=0.02-Ibiasa66; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa66=0.012;
Iopa66=0.03-Ibiasa66; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa66=0.011;
Iopa66=0.03-Ibiasa66; %Las unidades de la resistencia son "Amperes".
end
case '1550'
switch (LR66)
case 'STS-12/STM-4'
Ibiasa66=0.012;
Iopa66=0.02-Ibiasa66; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa66=0.012;
Iopa66=0.035-Ibiasa66; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa66=0.02;
Iopa66=0.065-Ibiasa66; %Las unidades de la resistencia son "Amperes".
end
end
set_param(LB66,'Iopa',num2str(Iopa66));
set_param(LB66,'Ibiasa',num2str(Ibiasa66));
end
if isempty(find_system(gcs,'Name','Regenerator7'))~=1
LB77=([gcs,'/','Regenerator7']);
LR77=get_param(LB77,'sel');
LM77=get_param(LB77,'frec');
[a b]=size(V);
switch (LM77)
case '1310'
switch (LR77)
case 'STS-12/STM-4'
Ibiasa77=0.012;
Iopa77=0.02-Ibiasa77; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa77=0.012;
Iopa77=0.03-Ibiasa77; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa77=0.011;
Iopa77=0.03-Ibiasa77; %Las unidades de la resistencia son "Amperes".
end
case '1550'
switch (LR77)
case 'STS-12/STM-4'
Ibiasa77=0.012;
Iopa77=0.02-Ibiasa77; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa77=0.012;
Iopa77=0.035-Ibiasa77; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa77=0.02;
Iopa77=0.065-Ibiasa77; %Las unidades de la resistencia son "Amperes".
end
end
set_param(LB77,'Iopa',num2str(Iopa77));
set_param(LB77,'Ibiasa',num2str(Ibiasa77));
end
if isempty(find_system(gcs,'Name','Regenerator8'))~=1
LB88=([gcs,'/','Regenerator8']);
LR88=get_param(LB88,'sel');
LM88=get_param(LB88,'frec');
[a b]=size(V);
switch (LM88)
case '1310'
switch (LR88)
case 'STS-12/STM-4'
Ibiasa88=0.012;
Iopa88=0.02-Ibiasa88; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa88=0.012;
Iopa88=0.03-Ibiasa88; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa88=0.011;
Iopa88=0.03-Ibiasa88; %Las unidades de la resistencia son "Amperes".
end
case '1550'
switch (LR88)
case 'STS-12/STM-4'
Ibiasa88=0.012;
Iopa88=0.02-Ibiasa88; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa88=0.012;
Iopa88=0.035-Ibiasa88; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa88=0.02;
Iopa88=0.065-Ibiasa88; %Las unidades de la resistencia son "Amperes".
end
end
set_param(LB88,'Iop',num2str(Iop88));
set_param(LB88,'Ibias',num2str(Ibias88));
end
if isempty(find_system(gcs,'Name','Regenerator9'))~=1
LB99=([gcs,'/','Regenerator9']);
LR99=get_param(LB99,'sel');
LM99=get_param(LB99,'frec');
[a b]=size(V);
switch (LM99)
case '1310'
switch (LR99)
case 'STS-12/STM-4'
Ibiasa99=0.012;
Iopa99=0.02-Ibiasa99; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa99=0.012;
Iopa99=0.03-Ibiasa99; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa99=0.011;
Iopa99=0.03-Ibiasa99; %Las unidades de la resistencia son "Amperes".
end
case '1550'
switch (LR99)
case 'STS-12/STM-4'
Ibiasa99=0.012;
Iopa99=0.02-Ibiasa99; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa99=0.012;
Iopa99=0.035-Ibiasa99; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa99=0.02;
Iopa99=0.065-Ibiasa99; %Las unidades de la resistencia son "Amperes".
end
end
set_param(LB99,'Iopa',num2str(Iopa99));
set_param(LB99,'Ibiasa',num2str(Ibiasa99));
end
if isempty(find_system(gcs,'Name','Regenerator10'))~=1
LB100=([gcs,'/','Regenerator10']);
LR100=get_param(LB100,'sel');
LM100=get_param(LB100,'frec');
[a b]=size(V);
switch (LM100)
case '1310'
switch (LR100)
case 'STS-12/STM-4'
Ibiasa100=0.012;
Iopa100=0.02-Ibiasa100; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa100=0.012;
Iopa100=0.03-Ibiasa100; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa100=0.011;
Iopa100=0.03-Ibiasa100; %Las unidades de la resistencia son "Amperes".
end
case '1550'
switch (LR100)
case 'STS-12/STM-4'
Ibiasa100=0.012;
Iopa100=0.02-Ibiasa100; %Las unidades de la resistencia son "Amperes".
case 'STS-48/STM-16'
Ibiasa100=0.012;
Iopa100=0.035-Ibiasa100; %Las unidades de la resistencia son "Amperes".
otherwise
Ibiasa100=0.02;
Iopa100=0.065-Ibiasa100; %Las unidades de la resistencia son "Amperes".
end
end
set_param(LB100,'Iopa',num2str(Iopa100));
set_param(LB100,'Ibiasa',num2str(Ibiasa100));
end
I=V;
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -