马上加入，结交更多好友，共享更多资料，让你轻松玩转电力研学社区！
您需要 登录 才可以下载或查看，没有账号？立即加入
×
本帖最后由 pursue2000 于 2023-2-7 17:14 编辑 0 |3 P9 g7 `5 [$ \0 ^9 p
3 [- M- \1 ~# P+ f
初学，按照pscad的help里电感的定义写的代码，运行不了，有没有大佬教教怎么写啊？
* S$ e* q3 R d0 _0 A9 ^ #LOCAL REAL U
0 J; A$ m, h+ x #LOCAL REAL I
/ |% J/ s I1 H. b #LOCAL REAL IT$ c+ ?# I; K& S) y D
#LOCAL REAL L
A: F7 o: f" p. i #LOCAL REAL G
* [+ A/ V o' W; h) | n #STORAGE REAL:1 INTEGER:1
( `* f) V" b4 V4 Y, ]/ N- d! F L=1.0
/ S8 K: h$ Z# E# c G=DELT/L, q6 i! q- f7 @# }! Z' [. P* E
IF (TIMEZERO) THEN) v% w+ P# | n6 u, A
ENABCCIN($NA,$SS)=.TRUE.
4 a, t* Y. ~& K6 C* H6 D ENABCCIN($NB,$SS)=.TRUE.
, C" j: }( W2 W2 \! a, \ STORF(NSTORF)=0.0
3 G$ w2 S) Y; {: i5 @6 m ENDIF
6 M7 k C+ D6 v" I& {1 T- S IT=STORF(NSTORF)
. B" b+ v& A4 {$ i5 v8 W1 o NSTORF=NSTORF+1
! J& ], B% y: J C
6 P/ m/ X7 D: Q! v% H a. d U=VDC($NA,$SS)-VDC($NB,$SS)7 M. s5 t6 Y! J/ t: w4 P: i k. Q
I=U*G+IT& i" U Q u! u+ ?% N
STORF(NSTORF)=I
! `% J+ F& T& S# y! x0 w J( K1 r, x CCIN($NA,$SS)=CCIN($NA,$SS)-IT
; H2 }1 B$ ^. x5 n CCIN($NB,$SS)=CCIN($NB,$SS)+IT
2 K! W( B6 u% a! Y" p4 m GGIN($NA,$SS)=GGIN($NA,$SS)+G
/ g3 R4 @# d# N% ]2 p" P% y GGIN($NB,$SS)=GGIN($NB,$SS)+G4 w6 I7 Y' h5 e9 M4 V
8 A& [( c; W& Q; p, }( E5 m
|
赣公网安备36040302000210号 )|网站地图
狗仔卡
发表于 2023-2-4 15:32:42
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡