西門子S7-300 PLC與模擬屏串行通信
加入技術交流群
4.2 數據發送
?。?） 將同步字及測量值db36.dbw21開始的數據送到db42.dbw12開始的數據區去，為向串口發送做準備。程序如下：
遙測第一幀（fc36）
l w#16#eb90
傳送兩次同步字eb90，分別給db42.dbw12和db42.dbw14
t db42.dbw12
l w#16#eb90
t db42.dbw14
l b#16#61
//將報文類型字“61”送給db42.dbb16
t db42.dbb16
l w#16#100
//第一幀將起始地址“0100”送給db42.dbw17
t db42.dbw17
//第二幀將起始地址“0120”送給db42.dbw17
l w#16#40
//將正文字節數“40”（64字節）送給db42.dbw19
t db42.dbw19
l db36.dbw21
//第一幀將db36.dbw21開始的32個字的模擬量
caw 送到db42.dbw21開始的區域
t db42.dbw21
l db36.dbw23
caw
t db42.dbw23
…………………
l db36.dbw83
caw
t db42.dbw83
opn db42 //遙信校驗
l p#17.0 //第二幀與第一幀相同
t md100
l dbw［md100］
t mw10
l 33
t mw16
l mw16
next： t mw12
l md100
l p#2.0
+d
t md100
l dbw［md100］
l mw10
xow
t mw10
l mw12
loop next
l md100
l p#2.0
+d
t md100
l mw10
t mw14
l mw14
slw 8
t dbw［md100］
l mw10
aw w#16#ff00
t mw10
l mw10
l dbw［md100］
xow
t dbw［md100］
l dbw16
t mw18
l mw18
aw w#16#ff00
t mw18
l mw18
l dbw［md100］
xow
t dbw［md100］
（2） 將db42.dbw12開始，長度為95個字的數據送到串行端口，程序如下：
//supply laddr， db_no，dbb_no，len
l 256 // laddr
t db40.dbw2
l 42 // db_no
t db40.dbw4
t db42.dbw4
l 12 // dbb_no
t db40.dbw6
t db42.dbw6
l 95 // len
t db40.dbw8
t db42.dbw8
//send with instance-db
call fb8 ， db21
sf ：=’s’
req ：=db40.dbx0.0
r ：=db40.dbx0.1
laddr ：=db40.dbw2
db_no ：=db40.dbw4
dbb_no ：=db40.dbw6
len ：=db40.dbw8
r_cpu_no：=
r_typ ：=
r_no ：=
r_offset ：=
r_cf_byt ：=
r_cf_bit ：=
done ：=db40.dbx0.4
error ：=db40.dbx0.5
status ：=db40.dbw12
// generate edge p_snd_rk_req
an db40.dbx0.0 // p_snd_rk_req
s db40.dbx0.0
// set p_snd_rk_req
o db40.dbx0.4 // p_snd_rk_done
o db40.dbx0.5 // p_snd_rk_error
r db40.dbx0.0 // p_snd_rk_req
// check “complete without error”
an db40.dbx0.4
// check p_snd_rk_done if p_snd_rk_done equals 0，
jc cher
// jump to cher and check p_snd_rk_error
//”complete without error”
// p_snd_rk_done=1
l db42.dbw0
//“complete without error”
+1 // increment counter
t db42.dbw0
nop //further user function
nop
nop
be
// check “complete with error”
// p_snd_rk_error=1
cher： an db40.dbx0.5
//check p_snd_rk_error
bec //if no error occurred， jump to end
//“complete with error”
l db42.dbw2
//“complete with error”
+1 //increment counter
t db42.dbw2
l db40.dbw12
t db40.dbw14 //save status
nop //error-handling
nop
nop
be
?。?） 數據刷新，程序如下：
an m2.4
l s5t#100ms
sd t0
a t0
jnb _007
l w#16#1
l md4
rrd
t md4
set
save
clr
_007： a br
= l20.0
a l20.0
a（
l md4
l l#0
==d
）
jnb _008
l 1
t md4
_008： nop 0
a l20.0
bld 102
= m2.4
a（
o m5.0
o m6.4
?。?P> jnb _003
call fc36
_003： nop 0
a（
o m4.0
o m5.4
?。?P> jnb _004
call fc38
_004： nop 0
評論