施耐德citect使用cicode脚本在运行时时过程分析器样本按照每秒一个动态设置

前面几天做练习，测试分析了一下施耐德过程分析器不同时间跨度，同一时刻数值不同的原因，今天这个练习试着通过写cicode脚本，在运行时选择过程分析器对象视图工具栏上不同的时间跨度，自动设置成每秒一个样本，这个练习实际意义不大，只是做一个cicode编程练习。这个练习只是做了1分钟、3分钟、5分钟、10分钟的情况，其他时间跨度按照同样思路写脚本就是了，同时考虑修改[TREND] MaxRequestLength数量

写下面的cicode脚本

FUNCTION mypage_AN5_CommandExecuted(OBJECT processAnalyst,STRING commandId)
STRING duration;
OBJECT pa;
OBJECT hpanes;
OBJECT hpane;
OBJECT hpens;
OBJECT hpen;
pa=ObjectByName("AN5");
//趋势板1
hpanes=_OBJECTGetProperty(pa,"Panes");
hpane=_OBJECTCallMethod(hpanes,"get_item",1);
//在板1下面趋势笔1
hpens=_OBJECTGetproperty(hpane,"Pens");
hpen=_OBJECTCallMethod(hPens,"get_item",1);
duration = _ObjectCallMethod(hPen, "GetInformation", "Duration");
IF commandId="Citect_Command_ToggleAutoScroll" THEN
IF duration ="00:01:00" THEN
_ObjectSetProperty(pa, "NumberofSamples", 60)
END
IF duration ="00:02:00" THEN
_ObjectSetProperty(pa, "NumberofSamples", 120)
END
IF duration ="00:03:00" THEN
_ObjectSetProperty(pa, "NumberofSamples", 180)
END
IF duration ="00:05:00" THEN
_ObjectSetProperty(pa, "NumberofSamples", 300)
END
IF duration ="00:10:00" THEN
_ObjectSetProperty(pa, "NumberofSamples", 600)
END
END
END

 

保存、编译、运行，在过程分析器的对象视图选择时间跨度后，点击更新按钮（那个绿色圆按钮），就会自动把去世的采样样本按照1秒一个来设定。