📄 graphics2.m
字号:
function t=graphics2(varargin)
%This function is designed to reduce the load on the programme (to avoid repitition)
%This programme runs with and without "ac_controller.m"
if (nargin == 0)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('Vdc=sqrt(2)*Vs*(1 + cos(c))/3.14','Equation','custom',Data,flag(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,cool(64))
pause(1)
closereq
%************************************************************************
elseif (nargin ==1)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('Idc=Vdc/R','Equation','custom',Data,flag(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,hsv(64))
pause(1)
closereq
%*********************************************************************
elseif (nargin ==2)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('Vo=Vs*sqrt(1/3.14*(3.14-a+sin(2*a)/2))','Equation','custom',Data,cool(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,spring(64))
pause(1)
closereq
%*********************************************************************
elseif (nargin == 3)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('Io=(Vs*sqrt(1/3.14*(3.14+b)))/R','Equation','custom',Data,jet(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,winter(64))
pause(1)
closereq
%*********************************************************************
elseif (nargin == 4)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('Po=Vo*Io','Equation','custom',Data,autumn(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,gray(64))
pause(1)
closereq
%*********************************************************************
elseif (nargin == 5)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('VA=Vs*Is','Equation','custom',Data,white(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,colorcube(64))
pause(1)
closereq
%*********************************************************************
elseif (nargin == 6)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('PF=Po/VA','Equation','custom',Data,prism(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,copper(64))
pause(1)
closereq
%*********************************************************************
elseif (nargin == 7)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('Ia=sqrt(2)*Vs*b/(2*pi*R)','Equation','custom',Data,colorcube(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,spring(64))
pause(1)
closereq
%*********************************************************************
elseif (nargin == 8)
Data=1:64;Data=(Data'*Data)/64;
CreateStruct.WindowStyle='replace';
CreateStruct.Interpreter='tex';
h=msgbox('Irms=Vs/(R*sqrt(2))*sqrt(1/pi*(pi-a+sin(2*a)/2))','Equation','custom',Data,flag(64),CreateStruct);
pause(1)
closereq
msgbox('Thanx For Using My Programme ','','custom',Data,hsv(64))
pause(1)
closereq
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -