'Macro M1001.m1s increment part count macro at end of G code, before M30.

'RESOURCES:*******************************
'**********UserLED's**********************
ManualPartcntOVR = GetUserLED(1500) 	'Over ride Part program with user selected number of parts.
'*****************************************
'*********UserDRO's***********************
Total = GetUserDRO(1500)				'Set Total parts from program
Completed = GetUserDRO(1501)  			'Part count How many parts completed DRO
'*****************************************
Completed = Completed + 1
SetUserDRO(1501,Completed)

Remainder = (Total-Completed)

If Remainder = 0 Then
SetVar(101,1)
End If