Page 36 - 4352

' вивід подачі за адресою F :
if f<>f_ then
write id1# using "F%.15g", f
endif
write id1# using "%s", NL$ ' Завершення кадру -
символ LF
endif
LOOP
' кінець опису й кінець файлу 6V443F3.PSS
'***********************************************************

3.6 Опис постпроцесора для верстата BOSCH CC100M
На цьому прикладі показано, як описати роботу постпроцесора при
наявності підпрограм у вихідній програмі. Для цього необхідно:
• обробляти коди параметра command# зі значеннями PROCEDURE# й
RETURN# (початок підпрограми й повернення з підпрограми);
• обробляти код параметра command# зі значенням CALL# (виклик
підпрограми);
• при аналізі команди переміщення перевіряти, чи належить дана команда
головній програмі або підпрограмі, і залежно від цього задавати вивід координат
інструмента в абсолютах або в приростах.
При цьому необхідно виводити в керуючу програму функції, що
перемикають ПЧПК з абсолютного режиму в інкрементальний і назад.
Докладні коментарі містяться у тексті опису:

REM BOSCH CC100M; абсолютний
'***********************************************************
' CC100M.PSS - файл специфікацій постпроцесора
' Дискретність: 0.001 мм. - декартові переміщення.
' Основний режим абсолютний.
' Функції: 1. контурна обробка з корекцією на довжину й
' радіус інструмента;
' 2. програмована зміна інструмента.
' 3. використання підпрограм
' Розділ ініціалізації містить присвоєння початкових значень
' основним параметрам і визначення імен констант,
' що вводяться користувачем
RDISCR=0.001 ' присвоювання параметру RDISCR значення 0.001
' дискретність по переміщеннях 0.001 мм
NSTART#=1 'Ідентифікатор NSTART# надалі може
' використовуватися для позначення цілої константи й буде
' застосовуватися як початкове значення лічильника кадрів.
NSTEP#=1 ' Ідентифікатор NSTEP# надалі може
' використовуватися для позначення цілої константи й буде
' застосовуватися в якості кроку нумерації кадрів.
Open fileout$ For Output As id1#
DO
CALL NEXT_STEP()

35