设为首页收藏本站|繁體中文 快速切换版块

 找回密码
 立即加入
搜索
查看: 23002|回复: 91

由一个实例说明PSCAD与C语言接口方法

   火... [复制链接]
  • TA的每日心情
    无聊
    2020-11-4 11:03
  • 签到天数: 3 天

    连续签到: 1 天

    [LV.2]偶尔看看I

    累计签到:3 天
    连续签到:1 天
    发表于 2011-6-1 20:19:02 | 显示全部楼层 |阅读模式

    马上加入,结交更多好友,共享更多资料,让你轻松玩转电力研学社区!

    您需要 登录 才可以下载或查看,没有账号?立即加入

    ×
    本帖最后由 yuanzhch 于 2011-6-1 20:23 编辑 # T/ O* M: R0 D5 t* q; j

    - G4 f6 F/ Y$ Qpscad中要实现新的算法,首先要建立一个自定义元件。自定义元件分为两种,一种是电气元件,一种是信号处理元件。本帖实现的内容是一个非线性电感,其电感值随着电流大小而变化,属于电气元件。写控制算法的同学可能主要用到后者,将输入信号经过一系列的处理计算得到一个输出信号。   
    ' _: F1 R0 L0 ?. U问题1:将程序写在哪里?, L$ y- t* _5 j  B' h0 @% J3 A
        首先要将算法程序分成两个部分:
    4 R8 w5 }# r4 H1 s    一部分是PSCAD可以实现的,如处理仿真参数、读入仿真数据、输出仿真结果以及积分、微分等简单函数。这部分内容写在自定义元件definition的Script中。可以写在Fortran中也可以写在DSDYN中,两者略有不同但不会影响简单应用,具体内容请参阅帮助文件。
      ]2 {. O7 V1 R. H9 k$ |/ T" D( s    另一部分是我们自己的C语言算法,要将C算法总结成y=f(x,p)的输入输出形式的形式写在一个*.c文件中。并添加到PSCAD的File Reference中。 C函数的命名形式一定是 void XX_XXX__()的形式,注意名字中的下划线,本人的试验结果是必须有这三个下划线,哪位同学有其他发现可以一起探讨一下。4 G" Z8 t0 V: p6 S, q' L
    问题2:如何传数据?
    $ L9 B# r  h. t/ U    由于PSCAD和C函数是互相传递指针,因此就需要将C函数写成f(y,x,p)的形式,例如:void ja_model__(real *h,real *ht,real *mt,real *ms,real *a,real *alpha,real *c,real *k,real *b,real *m)。其中h是输出,ht,mt是输入,后面的都是参数。在PSCAD中用call语句调用,例如:CALL JA_MODEL(H,HT,MT,$MS,$A,$ALPHA,$C,$K,B,M) 。注意函数名中的下划线,这里只有一个!其中H,HT,MT都是Fortran程序中的变量,后面参数前面加“$”是引用参数的意思,具体内容请参阅帮助文件。
    ' P8 E+ M4 {4 X& b( _问题3:如何保存前一时刻的变量并在本时刻调用?
      S2 |* J0 R3 m& F  r    在时域仿真的时候我们不可避免的要用到上一时刻的某些计算结果。而PSCAD中的Fortran程序和C程序每一时刻都重新执行一次,变量都要清零,所以就要单独存放需要的数据。PSCAD提供了一个STORF数组,这里直接给出例子:
    6 T3 y6 J' i0 k, L#STORAGE REAL:4& p, o5 t0 F) z$ N
          MY_NSTORF=NSTORF" C4 f0 {- D5 n( T! p0 v4 X$ ~
          NSTORF=NSTORF+4
    % Q5 g, T) y/ W/ F# _. y6 B     BT=STORF(MY_NSTORF)
    ( a. v5 _* r% p+ F% `      HT=STORF(MY_NSTORF+1)# t' @' Q1 ~# T6 S3 D
          MT=STORF(MY_NSTORF+2)
    1 E( q9 G+ y+ O& e      H=STORF(MY_NSTORF+3)*$N/$L6 g0 e1 H, U0 n
    这是读上一时刻值。
    $ g& g$ K2 C1 ~      STORF(MY_NSTORF)=B1 T$ j: U3 b( R2 v8 x2 m( b( o$ {
          STORF(MY_NSTORF+2)=M: R) i, O6 @5 v5 Q/ I
    这是保存存本时刻值。/ x' G4 g. A- _) G
    解决了上面3个问题就可以完成信号处理元件的建模。& D) Z  A3 h* h8 }; d) s
    问题4:如何建立电气元件?
    0 D* V, A) t$ u/ J; u! M6 N    我们对一个电气元件建模就是要描述其伏安特性。如一个双端口元件,测它两个结点电压,然后计算出支路电流就可以了。PSCAD提供了一个基于结点的电气接口函数,说白了就是一个受控电流源叫GGIN和CCIN。帮助里可以搜到,下面给出例子:
    / m% A. F: n6 O      CCIN($NA,$SS)=CCIN($NA,$SS)-STORF(MY_NSTORF+3)/1000.08 s6 j) y! E' G+ X- M. g$ \
          CCIN($NB,$SS)=CCIN($NB,$SS)+STORF(MY_NSTORF+3)/1000.0
    9 @/ u- [- M( ]5 c      GGIN($NA,$SS)=GGIN($NA,$SS)+G" C! C9 d3 `$ B4 t
          GGIN($NB,$SS)=GGIN($NB,$SS)+G
    & z6 x. w  I  ~" e) S7 O$ e我觉得解决以上4个问题就能满足一般应用了。这里只是给大家提供一个思路,还有一些细节没有说到还需要看帮助文件,希望能帮到大家!附件中是个非线性电感,J-A模型是个微分方程在C函数中用龙格库塔法解之。
    7 v" j, |' R! E- x# s( e* Y0 v 基于JA理论的非线性电感.rar (1.03 KB, 下载次数: 241)

    评分

    参与人数 4威望 +11 学分 +12 收起 理由
    pursue2000 + 5 + 5 很给力!
    hyxzl123 + 1 好贴!
    XIAOJIUWEI + 2 对我很有帮助!
    mingyu + 5 + 5 很有用!

    查看全部评分

    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    楼主热帖
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
  • TA的每日心情
    奋斗
    2019-5-24 09:31
  • 签到天数: 5 天

    连续签到: 1 天

    [LV.2]偶尔看看I

    累计签到:5 天
    连续签到:1 天
    发表于 2019-5-5 16:32:36 | 显示全部楼层
    刚刚接触这一块,一脸懵逼状态,专家分不够,云里雾里的,这个pscad的help里面好像没有特别多的介绍,楼主用的是哪个版本的呀,是不是我看帮助的方式不对,呜呜呜
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
    回复 推荐 踩下

    使用道具 举报

  • TA的每日心情
    奋斗
    2019-5-24 09:31
  • 签到天数: 5 天

    连续签到: 1 天

    [LV.2]偶尔看看I

    累计签到:5 天
    连续签到:1 天
    发表于 2019-5-7 09:28:10 | 显示全部楼层
    这个里面的三种引脚类型:数据输入、数据输出以及电气引脚有什么区别呀
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
    回复 推荐 踩下

    使用道具 举报

    该用户从未签到

    累计签到:4 天
    连续签到:1 天
    发表于 2024-9-18 11:48:06 | 显示全部楼层
    受用,思路好,期待探索拓展代码封装的功能,类似于黑盒功能
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
    回复 推荐 踩下

    使用道具 举报

  • TA的每日心情
    愤怒
    2020-12-8 11:59
  • 签到天数: 105 天

    连续签到: 1 天

    [LV.6]常住居民II

    累计签到:223 天
    连续签到:1 天
    发表于 2011-6-1 20:28:05 | 显示全部楼层
    虽然不太懂fortran,但是觉得你的思路很好!
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
  • TA的每日心情
    无聊
    2020-11-4 11:03
  • 签到天数: 3 天

    连续签到: 1 天

    [LV.2]偶尔看看I

    累计签到:3 天
    连续签到:1 天
     楼主| 发表于 2011-6-1 20:28:43 | 显示全部楼层
    回复 2# mingyu
    ( P8 ^9 `$ L( U: U2 Q' ?! }7 e6 W/ L: }. f

    3 G: R( v* N* |' l1 e- m$ s; `    怎么转成普通贴?
    . f  l) u# z: C1 F( C6 C% p
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
  • TA的每日心情
    愤怒
    2020-12-8 11:59
  • 签到天数: 105 天

    连续签到: 1 天

    [LV.6]常住居民II

    累计签到:223 天
    连续签到:1 天
    发表于 2011-6-1 21:29:23 | 显示全部楼层
    回复 3# yuanzhch ! c  ^/ }( n0 D8 t% E1 x/ M8 \

    9 O0 |9 f# U# q5 `; N$ }% N0 V& L, L5 f8 b7 Y5 }
        自己可以结贴,返还部分学分。
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
  • TA的每日心情
    开心
    2020-10-7 17:12
  • 签到天数: 9 天

    连续签到: 1 天

    [LV.3]偶尔看看II

    累计签到:9 天
    连续签到:1 天
    发表于 2011-6-1 21:40:02 | 显示全部楼层
    楼主强人啊,谢谢分享!!!
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
  • TA的每日心情
    开心
    2017-8-30 23:34
  • 签到天数: 3 天

    连续签到: 1 天

    [LV.2]偶尔看看I

    累计签到:3 天
    连续签到:1 天
    发表于 2011-6-2 01:41:43 | 显示全部楼层
    我也在做PSCAD和C的接口,发现一些细节:
    , ?. S" [  ~' B: l* [/ A1.fortran 接口子函数的文件名必须是xxx_df90.f ,C程序文件名必须是xxx_msc.c。当大家编译通过但连接出现问题的时候,可以试试修改调用的这两个文件的文件名。
    4 w0 s5 x- [. Q* l+ B2.PSCAD3.0以前的版本连接外部文件采用的是File reference;4.0以后的版本发生了一些变化,在以前的基础上,在project setting的fortran标签页里,也要添加接口子程序(.f)文件的文件路径。- P# C% ~# U! v/ _2 ]
    3.楼主提到了PSCAD存放数据的数组,其实有4个,数组指针名分别是STORF(实数量) STORI(整数量) STORL(逻辑量) STORC(复数量),对应类型的量应该存到对应的数组里。
    * ~! G8 i* ^" }6 k  _1 P: G. o7 x' Y: w* I$ x& d7 {
    楼主说的C函数命名时要加下划线的奇怪规则我也发现了。但想不明白原因。
    0 r! o3 J, p* {( O" X2 Y
    ' o- j7 g0 v& \$ C9 d% D5 `以上是做毕设过程中总结的一些小经验,不一定正确,但如果你想我一样2天无法连接文件实现接口的时候,不妨来这里看看。用这里的方法试试
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】

    该用户从未签到

    尚未签到

    发表于 2011-6-2 11:13:50 | 显示全部楼层
    回复 1# yuanzhch
    / |; D% D; ?: p1 Z
    , M# x' C( o) r2 z" c, X* b8 n) Q; V8 q  a  W
       我也尝试过调用C,但是遇到了问题,PSCAD每一步长CALL一下C程序。想给C的变量赋一个初值,由于循环调用,每CALL一下,变量又都成初值了,请问楼主怎么解决啊?
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
  • TA的每日心情
    无聊
    2020-11-4 11:03
  • 签到天数: 3 天

    连续签到: 1 天

    [LV.2]偶尔看看I

    累计签到:3 天
    连续签到:1 天
     楼主| 发表于 2011-6-2 12:41:22 | 显示全部楼层
    回复 7# caunow 8 R0 T* H4 S0 x

    # ?  C( C# m. \' O0 U8 O$ `2 w1 O/ g0 Q/ ~
        这就是我说的问题4,用STORF,STORC等数组。
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
  • TA的每日心情
    慵懒
    2018-10-31 22:06
  • 签到天数: 12 天

    连续签到: 1 天

    [LV.3]偶尔看看II

    累计签到:12 天
    连续签到:1 天
    发表于 2011-6-2 13:35:25 | 显示全部楼层
    楼主,思路很好很强大
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】

    该用户从未签到

    尚未签到

    发表于 2011-6-2 20:12:35 | 显示全部楼层
    楼主强人啊,谢谢分享!!!
    "真诚赞赏,手留余香"
    还没有人打赏,支持一下
    帖文化:【文明发帖 和谐互动】 社区精神:【创新、交流、互助、共享】
    您需要登录后才可以回帖 登录 | 立即加入

    本版积分规则

    招聘斑竹

    小黑屋|手机版|APP下载(beta)|Archiver|电力研学网 ( 赣ICP备12000811号-1|赣公网安备36040302000210号 )|网站地图

    GMT+8, 2026-3-16 20:37

    Powered by Discuz! X3.5 Licensed

    © 2001-2025 Discuz! Team.

    快速回复 返回顶部 返回列表