回复:S7-300程序求助

ktissot

西门子1847工业学习平台

  • 帖子

    276
  • 精华

    1
  • 被关注

    3

论坛等级:侠士

注册时间:2009-10-25

普通 普通 如何晋级?

发布于 2014-05-28 16:14:22

4楼

变量声明
in参数
run_motor any
start bool
fault_01到fault_10 bool
t1 timer
run_time s5time

inout 参数
control_word word
serial_number word
local_d dword


L P##run_motor
LAR1
L D [AR1,P#0.0]
T LD 0
L D [AR1,P#4.0]
T LD 4
L W [AR1,P#8.0]
T LW 8
L #control_word
T LW 10
A #fault_01
= L 13.0
A #fault_02
= L 13.1
A #fault_03
= L 13.2
A #fault_04
= L 13.3
A #fault_05
= L 13.4
A #fault_06
= L 13.5
A #fault_07
= L 13.6
A #fault_08
= L 13.7
A #fault_09
= L 12.0
A #fault_10
= L 12.1
A #start
JCN _200
L LW 12
L W#16#3FF
==I
JC _200
_101: L #local_d
LAR1
L #serial_number
L LW 12
AW
L 0
==I
FR #t1
L #run_time
SP #t1
A #t1
= Q [AR1,P#0.0]
FR #t1
JCN _103
JC end
_103: L #serial_number
SLD 1
T #serial_number
+AR1 P#0.1
TAR1
T #local_d
L #serial_number
L 1024
==I
JCN _104
L 1
T #serial_number
L LD 6
T #local_d
_104: JU _101
_200: CLR
FR #t1
L 1
T #serial_number
L LD 6
T #local_d
LAR1
L LW 2
nex1: T LW 14
CLR
= [AR1,P#0.0]
+AR1 P#0.1
L LW 14
LOOP nex1
end: L LW 10
T #control_word
SET
SAVE


在ob1中调用


评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC S7-300/400

共有54616条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

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

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

  • 分享

  • 只看
    楼主

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