Здравствуйте! Помогите пожалуйста! Стойка Siemens 808d, токарная. Как составить подпрограмму, чтобы выполнить 250 канавок на валу?
Канавки прямые. Ширина канавки 0.5 мм. Глубина канавки 0.5 мм. Шаг 1 мм. То есть 250 одинаковых врезаний. Спасибо!
Подпрограмма для канавок Siemens 808d
-
- Кандидат
- Сообщения: 48
- Зарегистрирован: 04 авг 2019, 18:27
- Репутация: 2
- Настоящее имя: Юрий
- Контактная информация:
- RNDL
- Опытный
- Сообщения: 176
- Зарегистрирован: 06 июн 2018, 18:29
- Репутация: 66
- Контактная информация:
Re: Подпрограмма для канавок
R1=0 ; переменная, считающая канавки
Шапка программы
G0 X60 Z5 ;подвод к торцу
KANAVKA: ;начало метки
G0 X60 Z-1 ;подвод к первой канавке по Z
G0 X51 ; подвод к диаметру. Допустим 50мм диаметр вала
G1 X49 F0.02 ; прорезание первой канавки
G0 X60 ; отвод от диаметра, первая канавка готова
R1=(R1+1) ; добавление к счётчику
ATRANS Z-1 ; смещение влево на 1мм для следующей канавки
ENDLABEL: ; конец метки
IF R1<=250 GOTO KANAVKA; если R1 меньше либо равно 250, выполняется кусок программы между началом и концом метки.
TRANS ; отмена всех смещений
G0 X60
G0 Z5
M5 M9
M30
Шапка программы
G0 X60 Z5 ;подвод к торцу
KANAVKA: ;начало метки
G0 X60 Z-1 ;подвод к первой канавке по Z
G0 X51 ; подвод к диаметру. Допустим 50мм диаметр вала
G1 X49 F0.02 ; прорезание первой канавки
G0 X60 ; отвод от диаметра, первая канавка готова
R1=(R1+1) ; добавление к счётчику
ATRANS Z-1 ; смещение влево на 1мм для следующей канавки
ENDLABEL: ; конец метки
IF R1<=250 GOTO KANAVKA; если R1 меньше либо равно 250, выполняется кусок программы между началом и концом метки.
TRANS ; отмена всех смещений
G0 X60
G0 Z5
M5 M9
M30
-
- Кандидат
- Сообщения: 48
- Зарегистрирован: 04 авг 2019, 18:27
- Репутация: 2
- Настоящее имя: Юрий
- Контактная информация:
Re: Подпрограмма для канавок Siemens 808d
Спасибо! попробую
-
- Кандидат
- Сообщения: 48
- Зарегистрирован: 04 авг 2019, 18:27
- Репутация: 2
- Настоящее имя: Юрий
- Контактная информация:
Re: Подпрограмма для канавок Siemens 808d
Попробовал. Делает одну канавку. И на исходную. Может попробовать с подпрограммой L ? В руководстве есть варианты.
- RNDL
- Опытный
- Сообщения: 176
- Зарегистрирован: 06 июн 2018, 18:29
- Репутация: 66
- Контактная информация:
Re: Подпрограмма для канавок Siemens 808d
Ошибка в синтаксисе.
Начало метки это KANAVKA:
Конец метки это ENDLABEL:
В конце ставится двоеточие. У вас стоит перед именем метки точка с запятой, т.е. вы их закомментировали, соответственно стойка их не видит
И в начале программы обязательно поставьте R1=0
Начало метки это KANAVKA:
Конец метки это ENDLABEL:
В конце ставится двоеточие. У вас стоит перед именем метки точка с запятой, т.е. вы их закомментировали, соответственно стойка их не видит
И в начале программы обязательно поставьте R1=0
- RNDL
- Опытный
- Сообщения: 176
- Зарегистрирован: 06 июн 2018, 18:29
- Репутация: 66
- Контактная информация:
Re: Подпрограмма для канавок Siemens 808d
Через подпрограмму конечно тоже можно, но по своему опыту скажу, что по меткам удобнее. Не нужно постоянно прыгать из основной программы в подпрограмму. Меньше шансов допустить ошибку
-
- Кандидат
- Сообщения: 48
- Зарегистрирован: 04 авг 2019, 18:27
- Репутация: 2
- Настоящее имя: Юрий
- Контактная информация:
Re: Подпрограмма для канавок Siemens 808d
Спасибо! Получилось)