0  BEGIN PGM M302 MM 
1  * - Compensation of V-Axis
2  FN 17: SYSWRITE ID 2000 NR70 IDX7098 =+302 ; NUMBER NC MACRO ON
3  FN 18: SYSREAD Q0 = ID240 NR8 IDX8
4  FN 32: AXIS1:-Q0
5  FN 17: SYSWRITE ID 2000 NR70 IDX7098 =-1 ; NC MACRO OFF
6  END PGM M302 MM