pscad 自定义模块

zlw

pscad自带的例子中，和matlab互联仿真画磁滞回线的那个例子。matlab的程序能否解读一下，想把它做成c语言编的程序。
2 v; k8 j& c( I+ qfunction [out_IF] = hyst_plot(I_F)
6 w+ K* Y* ^" k# r9 T( y+ U8 O/ r: ]%
, D8 j+ _5 `/ \; ]9 L3 Q6 e, ]% This function is generated by MATLAB-PSCAD component generator V1.0
" o8 }  J  h5 Q4 p; t' G%
: H) g7 Z9 I% d. p# I% Input:
%        I_F of dimension 2 1
. ?# ~6 `7 n( r4 f9 w, K%
6 N0 `( v7 S: {/ R  C5 S%
- H/ u% E) J4 n' V% i6 V% Output:
%        out_IF of dimension 1 1

global Ia flux my_nom
3 @( I0 P7 C# M& r) d
8 B8 h* s' l3 t0 E2 C, qn2=15;                % points number
# R7 q! Y- B) w# W' l  GFlim=2.5;                % Flux limit
: B! Y7 K- Q' L, dIlim=0.1;                % Current limit

; c( v" o* W3 g/ a; S% K%if ~exist('my_nom')
! j' `+ y& ?$ t- ~  my_nom=1;
1 Y, b/ x6 C6 u8 M% \3 h. U3 h! _  Ia(n2)=0;
* e# P; d) V7 P4 u  x  flux(n2)=0;
8 c. @' O2 I" W4 @& L2 i7 \5 ?%end
figure(1);
; B& E. Z" G) {7 Sfor i=n2-1:-1:1
Ia(i+1)=Ia(i);
flux(i+1)=flux(i);
end
" g2 N0 A6 _# g6 E Ia(1)=I_F(1);
( [8 Q1 |' M( H, G# `( j flux(1)=I_F(2);
% line(Ia,flux);
9 I& h) Q( |$ s% y& Z/ I plot(Ia,flux);
% |2 b4 H6 s5 G" }$ F" E9 o set (gca,'XLim',[-Ilim Ilim],'YLim',[-Flim Flim]);
: i, B8 ?+ G, L8 D. x: p; | pause(realmin);

4 q, a; z& d. f  qout_IF=0.0;