В данном примере идентичные профили на двух перпендикулярных поверхностях детали обрабатываются при помощи подпрограмм.
Установка направления подачи на врезание, рабочая плоскость и нулевая точка в новой системе координат на правой поверхности детали сравнивает с верхней.
Условия, необходимые для выполнения подпрограммы, применяются как и до этого: рабочая плоскость G17, координатная плоскость X/Y, направление подачи на врезание Z.
N10 G17... G54 Рабочая плоскость X/Y, ноль детали
N20 L10 Вызов подпрограммы
N30 TRANS X... Z-... Абсолютный переход
N40 AROT Y90 Поворот системы координат вокруг Y
N50 AROT Z90 Поворот системы координат вокруг Z
N60 L10 Вызов подпрограммы