回复:【分享】编写一个仿真变频器控制块,方便程序测试

牧歌2050

  • 帖子

    24
  • 精华

    1
  • 被关注

    2

论坛等级:游士

注册时间:2014-03-16

普通 普通 如何晋级?

发布于 2015-08-10 23:21:38

2楼

BEGIN

NETWORK

TITLE =

// ----输入接口中int型换成real型,

      L     10; 

      L     #MaxSpd; 

      <=I   ; 

      JC    lt1; 

      POP   ; 

      T     #MaxSpd; 

lt1:  ITD   ; 

      DTR   ; 

      T     #MaxSpd_real; 

//-------

      L     #SetSpd; 

      L     #MaxSpd; 

      >=I   ; 

      JC    lt2; 

      POP   ; 

      L     0; 

      <=I   ; 

      JC    lt2; 

      POP   ; 

lt2:  T     #SetSpd; 

      ITD   ; 

      DTR   ; 

      T     #SetSpd_real; 

//---------  

      L     1; 

      L     #AccT; 

      <=I   ; 

      JC    lt3; 

      POP   ; 

      T     #AccT; 

lt3:  ITD   ; 

      DTR   ; 

      L     1.000000e+001; 

      /R    ; 

      T     #AccT_real; 

//----

      L     1; 

      L     #DecT; 

      <=I   ; 

      JC    lt4; 

      POP   ; 

      T     #DecT; 

lt4:  NOP   0; 

      ITD   ; 

      DTR   ; 

      L     1.000000e+001; 

      /R    ; 

      T     #DecT_real; 

//-----------------

      L     1; 

      L     #RunDlyT; 

      <=I   ; 

      JC    lt5; 

      POP   ; 

      T     #RunDlyT; 

lt5:  NOP   0; 

NETWORK

TITLE =

//================

      SET   ; 

      SAVE  ; 


      A     #RstFB; 

      JCN   rn0; 

      L     0; 

      T     #tmpDelayAct; 

      R     #Run; 

      JU    ini; 

rn0:  NOP   0; 

NETWORK

TITLE =20150429更改

//----停止时清理

      AN    #Run; 

      R     #Reving; 

      R     #Fwding; 

      R     #revok; 

      R     #fwdok; 

//----正转指令有效

      A     #Fwd; 

      AN    #Run; 

      AN    #Reving; 

      S     #Fwding; 


      A     #Fwding; 

      S     #fwdok; 


      AN    #Fwd; 

      R     #fwdok; 


      AN    #Fwd; 

      AN    #Run; 

      R     #Fwding; 


//----反转指令有效

      A     #Rev; 

      AN    #Run; 

      AN    #Fwding; 

      S     #Reving; 


      A     #Reving; 

      S     #revok; 


      AN    #Rev; 

      R     #revok; 


      AN    #Rev; 

      AN    #Run; 

      R     #Reving; 

//-----------    


评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC S7-300/400

共有54715条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
X 图片
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。