|
|
马上加入，结交更多好友，共享更多资料，让你轻松玩转电力研学社区！
您需要 登录 才可以下载或查看，没有账号？立即加入
×
pscad自带的例子中，和MATLAB互联仿真画磁滞回线的那个例子。matlab的程序能否解读一下，想把它做成c语言编的程序。
# c' s D& S. Bfunction [out_IF] = hyst_plot(I_F)9 f1 A1 e* L1 [- t6 g1 `
%/ P) g5 r9 w) P& c6 J
% This function is generated by MATLAB-PSCAD component generator V1.04 d. N+ w5 t! u- t
%
9 ?! H- Y+ b" {; K5 D% Input:
y8 A1 |4 K# m' j% I_F of dimension 2 1) c6 Z9 F0 p q
%8 V+ |) v$ o$ s. g$ b% V, w
%! N5 o9 R! r1 I9 Q
% Output:
$ h5 t: h3 Q3 C1 v( |% out_IF of dimension 1 1
; `$ W8 ?' O& j5 ]* o X6 P% E' m1 _
global Ia flux my_nom
. x" e9 J6 b0 |! [& ` [* `4 i
0 ^4 L6 s( o8 z" m; P$ |n2=15; % points number
6 p: `& e. G. r1 Z$ DFlim=2.5; % Flux limit
. ?0 |9 P8 N" t9 S4 pIlim=0.1; % Current limit
7 u1 I7 K3 Q6 T- k1 P( J! T' K! H0 H: z' ~$ L7 O
%if ~exist('my_nom')
+ D/ I" l, y; J my_nom=1;, [3 o9 ]0 d* H' v6 ]# i6 ^) A8 w
Ia(n2)=0;' _7 H8 |/ a0 O0 B2 R1 p
flux(n2)=0;
; w+ n" M5 r. r! S/ I%end% a2 D# V& [; ~, }4 M; G" {- u! i1 `
figure(1);
0 h3 [/ J t5 k" j; Q1 N0 R) h. Mfor i=n2-1:-1:10 q8 @" D4 S: X1 w" ]
Ia(i+1)=Ia(i);
, |3 n, i n: e g flux(i+1)=flux(i);+ f, |: ^: e" a
end
" ^" f3 h, G7 y' {. e0 \! j' x% z Ia(1)=I_F(1);$ P6 W# Y7 ~" M& X
flux(1)=I_F(2);
: K# j4 W! u2 ^( n$ i$ r5 d( \% line(Ia,flux);
8 _! {" r+ a* e& S6 q3 K* F! a; v plot(Ia,flux);9 e$ b4 v1 C; w( K f# c R3 {' e" Q
set (gca,'XLim',[-Ilim Ilim],'YLim',[-Flim Flim]);
/ g4 Q! P! }! N( S pause(realmin);, D/ R G1 u' v1 P/ B
6 E3 d* s$ ^: z5 R4 M0 S
out_IF=0.0; |
|
赣公网安备36040302000210号 )|网站地图
狗仔卡
发表于 2011-12-8 21:28:42
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡