%《MATLAB在電子信息課程中的應用》第五章例5.8程序q508
% 交流電路的穩態計算：簡單電路
% 電子工業出版社出版  陳懷琛 吳大正 高西全合著  2001年10月

z1=3*j;z2=5;z3=-2j;uc=10*exp(30j*pi/180);   % 輸入參數
z23=z2*z3/(z2+z3);z=z1+z23;                 % 交流電路方程
Ir=uc/z2,Ic=uc/z3,I=Ic+Ir,uL=I*z1,us=I*z
disp(' uc		Ir        Ic         I         uL         us  ')
disp('幅值'),disp(abs([uc,Ir,Ic,I,uL,us]))
disp('相角'),disp(angle([uc,Ir,Ic,I,uL,us])*180/pi)
% compass是MATLAB中繪制復數相量圖的命令，用它畫相量圖特別方便。
ha=compass([uc,Ir,Ic,I,uL,us]);
set(ha,'linewidth',3)