回复:求平均值?

天枰

  • 帖子

    315
  • 精华

    10
  • 被关注

    15

论坛等级:侠士

注册时间:2007-08-09

普通 普通 如何晋级?

发布于 2008-05-13 15:10:54

0楼

FUNCTION_BLOCK FB 2
TITLE =
//计算100个数据的平均值
VERSION : 0.1

VAR_INPUT
init : BOOL ; //初始化脉冲,填第一个数时用到
In : INT ; //输入的采样数据
END_VAR
VAR_OUTPUT
Out : INT ; //平均值
END_VAR
VAR
index : INT ; //采样标识
Totale : DINT ;
Data : ARRAY [1 .. 100 ] OF INT ;
END_VAR
BEGIN
NETWORK
TITLE =
//初始化
A #init;
JCN _002;

L 100;
_001: T #index;
L 16;
*I ;
L P##Data;
+D ;
LAR1 ;
L #In;
T DIW [AR1,P#0.0];
L #index;
LOOP _001;
L 1;
T #index;
L #In;
T #Out;
L 100;
*I ;
T #Totale;
_002: NOP 0;


NETWORK
TITLE =
//计算平均值
L #index;
L 16;
*I ;
L P##Data;
+D ;
LAR1 ;
L DIW [AR1,P#0.0];
ITD ;
L #Totale;
TAK ;
-D ;
L #In;
ITD ;
+D ;
T DIW [AR1,P#0.0];
L 100;
/D ;
T #Out;
L #index;
INC 1;
L 100;
<=I ;
BEC ;
L 1;
T #index;


END_FUNCTION_BLOCK


评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC S7-300/400

共有54766条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

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

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

  • 分享

  • 只看
    楼主

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