数据接口

名称

数据类型

地址

IN

In_Data

ANY

OUT

OUT_VAL

REAL

TEMP

DATA_LEN

INT

0.0

TEMP

BLOCK_NO

INT

2.0

TEMP

ADD_TEMP

REAL

4.0

TEMP

DATA_NO

INT

8.0

      L     0              //初始化临时变量#ADD_TEMP。

      T     #ADD_TEMP

      L     P##In_Date     //指向存储地址指针In_Date首地址，并

      LAR1                     装载到地址寄存器AR1中。

      L     B [AR1,P#1.0]    //如果数据类型不是REAL，跳转到END。

      L     B#16#8

      <>D 

      JC    END

      L     0

      L     W [AR1,P#4.0]    //判断OB1中赋值的地址指针是否为数据

      ==I                      块（参考 ANY的数据格式）。

      JC    M1

      T     #BLOCK_NO

      OPN   DB [#BLOCK_NO]   //如果是DB块，打开指定的DB块。

M1:   L     W [AR1,P#2.0]    //判断ANY指针中数据长度，本例中为        

      T     #DATA_LEN          REAL变量的个数。

      L     D [AR1,P#6.0]   //找出需要计算数据区的开始地址，本例

                              中为DB1.DBX0.0。   

      LAR1

      L     #DATA_LEN

NO:   T     #DATA_NO          //循环执行加运算，本例中循环执行的次

                                数为8。

      L     D [AR1,P#0.0]     //装载DB1.DBD0到累加器1中。

      L     #ADD_TEMP         //与临时变量#ADD_TEMP相加后将计算结果

      +R                           再存储 #ADD_TEMP中。

      T     #ADD_TEMP

      +AR1  P#4.0             //地址寄存器加4，地址偏移量。

      L     #DATA_NO          //LOOP 指令固定格式。        

      LOOP  NO                //跳回“NO”循环执行，执行完定义在变

                                量#NO_TEMP的次数后自动跳出循环程序。

      L     #ADD_TEMP         //求平均值，装载运算结果到累加器1中。

      L     #DATA_LEN         

      DTR                     //将变量个数转变为浮点值便于运算。  

      /R   

      T     #OUT_VAL          //输出运算结果。

END:  NOP   0