function t=graphics1(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*(cos(a)-1)/6.28','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/6.28*(6.28-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/6.28*(6.28+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
   
 end