延时关IO

mytimer: Ton;//计时器关D26
tr: TIME;
data: TMP.Data;

 

//获取延时时间
TR:= LREAL_TO_TIME( R26);
mytimer.IN:=data.GetDO(26);//当DO26打开就触发计时器
mytimer.PT:=tr ;//计时值


IF mytimer.Q THEN
data.SetDO(26,0 );
END_IF

mytimer();//启动计时器