INT _i
REAL _result
FOR _i=1 TO 2 DO_LOOP
_result := %PerfCounter("\Processor(_Total)\% User Time")
IF _result\VLD THEN
IF _result=0 & _i=1 THEN ; workaround - at first calling (e.g. it returns 0 on \Processor (_Total)\% User Time)
DELAY 0.1 [s]
ELSE
EXIT_LOOP
ENDIF
ELSE
EXIT_LOOP
ENDIF
END_LOOP
Pridať komentár