Page 72 - 4352

--------------------------------------------------------------------------------------------------------

lcomp# [lcomp_#, _lcomp#]
Тип
перечислимий: LCOMP_OFF#, LCOMP_UP#, LCOMP_DOWN#
Умовчання
LCOMP OFF#
Опис
Приймає значення перечислимого типу, що мають наступний зміст
LCOMP_OFF# - аналізована [попередня, наступна] команда вихідної
програми є або командою переміщення при виключеній корекції на довжину
інструмента відповідно, або командою переміщення, на якій відбувається
вимикання корекції довжини інструмента;
LCOMP_UP#, LCOMP_DOWN# - аналізована [попередня, наступна]
команда вихідної програми є або командою переміщення при включеній
позитивній або негативній корекції на довжину інструмента відповідно, або
командою переміщення, на якій відбувається включення відповідного режиму
корекції довжини інструмента.
В інших випадках значення параметра не визначено.
--------------------------------------------------------------------------------------------------------
cutter_l_crtr# [cutter_l_crtr_#, _cutter_l_crtr#l
Тип
цілий
Умовчання
номер інструмента, заданого у вихідній програмі
Опис
Номер заданого у вихідній програмі коректора довжини інструмента, якщо
аналізована [попередня, наступна] команда вихідної програми повинна
виконуватися при включеній корекції на довжину інструмента. При аналізі
команди зміни інструмента значення параметра стає рівним номеру інструмента,
що задається цією командою. Значення зберігається незмінним доти, поки не
буде перевизначено новою командою переміщення із включенням корекції на
довжину інструмента або зміни інструмента.
Приклад
Якщо на аналізованому переміщенні змінився режим корекції довжини
інструмента (тобто параметр lcomp аналізованої команди не дорівнює
аналогічному параметру попередньої команди lcomp_#):
if (lcomp<>lcomp_#) then
' Для включення позитивної корекції вивід G43
' з коректором за адресою D :
if lcomp=LCOMP_UP# then
write id1# using "G43D%.2d", cutter_l_crtr#
' Інакше, для включення негативної корекції
' вивід G44 з коректором за адресою D :
elseif lcomp=LCOMP_DOWN# then
write id1# using "G44D%.2d", cutter_l_crtr#
' Інакше, для вимикання корекції на довжину інструмента
71