17.02.2013 Views

Kuhnke Electronics Instruction Manual

Kuhnke Electronics Instruction Manual

Kuhnke Electronics Instruction Manual

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Remanent Data<br />

PROGRAM operating time<br />

� Operating hour counter:<br />

This program compiles a count of the operating time<br />

using elements from SystemData.<br />

xrdata.SysVars.secs := xrdata.SysVars.secs +1 ;<br />

IF xrdata.SysVars.secs >= 60 THEN<br />

END_IF<br />

xrdata.SysVars.secs := 0;<br />

xrdata.SysVars.mins := xrdata.SysVars.mins +1 ;<br />

IF xrdata.SysVars.mins >= 60 THEN<br />

END_IF<br />

xrdata.SysVars.mins := 0;<br />

xrdata.SysVars.hors := xrdata.SysVars.hors + 1 ;<br />

IF xrdata.SysVars.hors >= 24 THEN<br />

END_IF<br />

PROGRAM PLC_PRG<br />

VAR<br />

END_VAR<br />

VAR RETAIN<br />

END_VAR<br />

xrdata.SysVars.hors := 0;<br />

xrdata.SysVars.days := xrdata.SysVars.days + 1 ;<br />

PLC_PRG<br />

Checks if the extraremanent data are OK. Run "Clear" to<br />

remove the data if they are not OK.<br />

noof_SystemStarts counts the number of system starts.<br />

Rema1 is a Retain variable. Use it to check the difference<br />

to the extraremanent data.<br />

flag: BOOL := TRUE ;<br />

running: UDINT;<br />

Start_OK: BOOL;<br />

Clear: BOOL;<br />

Rema1: UDINT;<br />

122 E 700 GB

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!