This will give the total amount of time (in minutes) for any number of features to run on the CMM.
ASSIGN/TIME1=SYSTEMTIME("HH':'mm':'ss")
ASSIGN/SEC1=RIGHT(TIME1,2)
ASSIGN/MIN1=MID(TIME1,3,2)
ASSIGN/HOUR1=LEFT(TIME1,2)
ASSIGN/HOUR_TO_SEC_1=(HOUR1)*3600
ASSIGN/MIN_TO_SEC_1=(MIN1)*60
ASSIGN/TOTAL_SEC_1=(HOUR_TO_SEC_1)+(MIN_TO_SEC_1)+(SEC1)
$$ NO,add features here
MOVE/INCREMENT,<0,0,500>
PNT1 =FEAT/CONTACT/VECTOR POINT,CARTESIAN
THEO/<0,0,0>,<0,0,1>
ACTL/<0,0,0>,<0,0,1>
TARG/<0,0,0>,<0,0,1>
SHOW FEATURE PARAMETERS=NO
SHOW CONTACT PARAMETERS=NO
MOVE/INCREMENT,<0,0,500>
PNT2 =FEAT/CONTACT/VECTOR POINT,CARTESIAN
THEO/<10,0,0>,<0,0,1>
ACTL/<10,0,0>,<0,0,1>
TARG/<10,0,0>,<0,0,1>
SHOW FEATURE PARAMETERS=NO
SHOW CONTACT PARAMETERS=NO
MOVE/INCREMENT,<0,0,500>
PNT3 =FEAT/CONTACT/VECTOR POINT,CARTESIAN
THEO/<20,0,0>,<0,0,1>
ACTL/<20,0,0>,<0,0,1>
TARG/<20,0,0>,<0,0,1>
SHOW FEATURE PARAMETERS=NO
SHOW CONTACT PARAMETERS=NO
MOVE/INCREMENT,<0,0,500>
$$ NO,Add dimension of last feature to force PC-DMIS
,to "catch up" before reporting end time.
,Set output to NONE
DIM LOCTIME1= LOCATION OF POINT PNT1 UNITS=MM ,$
GRAPH=OFF TEXT=OFF MULT=10.00 OUTPUT=NONE
AX MEAS NOMINAL +TOL -TOL DEV OUTTOL
X 0.000 0.000 0.800 0.800 0.000 0.000 --#---
END OF DIMENSION LOCTIME1
ASSIGN/TIME2=SYSTEMTIME("HH':'mm':'ss")
ASSIGN/SEC2=RIGHT(TIME2,2)
ASSIGN/MIN2=MID(TIME2,3,2)
ASSIGN/HOUR2=LEFT(TIME2,2)
ASSIGN/HOUR_TO_SEC_2=(HOUR2)*3600
ASSIGN/MIN_TO_SEC_2=(MIN2)*60
ASSIGN/TOTAL_SEC_2=(HOUR_TO_SEC_2)+(MIN_TO_SEC_2)+(SEC2)
ASSIGN/ELAPSED_SEC=(TOTAL_SEC_2)-(TOTAL_SEC_1)
ASSIGN/ELAPSED_MIN=(ELAPSED_SEC)/60
COMMENT/OPER,YES,"The elasped time to run the feature(s) was " + ELAPSED_MIN + " minutes."
