*MeasureProc
Execute measure processing
Calling processing when relevant Macro unit measuring and processing.
We can define data, calculation and output result that other processing units achieved.
Example of Eode
*MEASUREPROC
GetUnitData ECMSEARCHUNITNO&, "X", POSITIONX#(COUNT&)
GetUnitData ECMSEARCHUNITNO&, "Y", POSITIONY#(COUNT&)
AVERAGEXCNT# = AVERAGEXCNT# + POSITIONX#(COUNT&)
AVERAGEYCNT# = AVERAGEYCNT# + POSITIONY#(COUNT&)
AVERAGEX# = AVERAGEXCNT# / (COUNT& + 1)
AVERAGEY# = AVERAGEYCNT# / (COUNT& + 1)
For CNT& = 0 To COUNT& Step 1
VARIANCEX# = VARIANCEX# + ((POSITIONX#(CNT&) - AVERAGEX#) * (POSITIONX#(CNT&) - AVERAGEX#))
VARIANCEY# = VARIANCEY# + ((POSITIONY#(CNT&) - AVERAGEY#) * (POSITIONY#(CNT&) - AVERAGEY#))
Next
VARIANCEX# = VARIANCEX# / (COUNT& + 1)
VARIANCEY# = VARIANCEY# / (COUNT& + 1)
SDEVX# = Sqr(Abs(VARIANCEX#))
SDEVY# = Sqr(Abs(VARIANCEY#))
COUNT& = COUNT& + 1
Return