> Ваше меню
> Интересные темы

Автономный контроллер ЧПУ на ATMega32

Сверление печатных плат из Sprint Layout в Mach3

> Системы ЧПУ
Системы ЧПУ Титан
Системы ЧПУ Титан

Системы ЧПУ БалтСистем
> CAD-CAM
Система геометрического моделирования и программирования обработки для станков с ЧПУ ГеММа-3D
> Разработка управляющего софта для CNC станков

Управляющее П..О. Mach3

Mach3

> Статистика


> Погода

Яндекс Погода
 
Профиль
Фотография
Опции
Опции
О себе
noahi77 не указал(а) ничего о себе.
Личная информация
noahi77
Новичок
Возраст не указан
Пол не указан
Место жительства не указано
День рождения не указан
Интересы
Нет данных
Другая информация
Напишите числами, (один, два, три) плюс десять = результат: 1+10=11
Статистика
Регистрация:
Просмотров профиля: 1,085*
Последнее посещение:
1 сообщений (0 за день)
Контактная информация
AIM Нет данных
Yahoo Нет данных
ICQ Нет данных
MSN Нет данных
* Просмотры профиля обновляются каждый час

noahi77

Пользователи


Темы
Сообщения
Комментарии
Друзья
Содержимое
8 фев 2018
Здравствуйте.
Имеем револьверную голову на 6 инструментов.
Имеем доп контроллер .
Логика его построения-количество миганий (200мс или есчо какое будет подгоняться) равняется номеру инструмента.данная логика работает от ручного задатчика количество импульсов.
Нужна помощь по скрипту в маче.
Выбрали инструмент номер 3(например).
Mach3 (OUTPUT2) дал три импульса и если пришел вход с доп контроллера на (OEMTRIG ,наверно так в маче вход называется)то мач подтвердил данный инструмент.
Вход на мач всех шести инструментов - один.Выход задатчика инструментов один.
Выход с Mach3 (OUTPUT2)
Сам скрипт нашёл на просторах инета. Вообще в скриптах не понимаю.
Буду благодарен за любую помощь.
Так же обратил внимание на то,что мач по какой то причине не может мигать менее 200-250 мс без заметной паузы.Это видно визуально.
Предполагаю,что придёться переделать программу доп контроллера на паузу между двумя импульсами.
Пауза 200 мс это 1 инстр. Пауза 300 мс 3 инстр итд.
Данный скрипт я понимаю с трудом.Он совсем не то ,что надо но хоть ,что то.Просьба к откликнувшимся,более понятно пояснять ,во избежание новых вопросов.
Прошу меня простить сразу.
Так же не понятна функция скрипта м6end.Для чего он.
Спасибо

M6Start


Sub Main()
NewTool = GetSelectedTool()'новый инструмент = получить вновь выбранный инструмент
OldTool = GetCurrentTool()' старый инструмент=загрузить загруженный инструмент

MaxToolNum = 6 'Максимальное число инструментов в магазине
While NewTool > MaxToolNum
NewTool = Question("Введите правильный номер инструмента, в магазине может быть только " & MaxToolNum & " инструментов.")
Wend
If NewTool = OldTool Then 'Если в шпинделе стоит тот же инструмент то ничего менять не надо
Exit Sub
End If
If OldTool <> NewTool Then
ActivateSignal(OUTPUT2) 'Включение вращения револьверной головки по часовой стрелке
While Slot <> NewTool

If OldTool <> NewTool Then
Slot = 1

End If

Wend
End If

Sleep(100)
DeActivateSignal(OUTPUT7) 'остановить вращение револьверной головки.
Sleep(500)
ActivateSignal(OUTPUT8) ' rotating backward
Sleep(500)

While IsActive(OEMTRIG9) ' kol index aktyvus
Wend

SetCurrentTool (NewTool) 'указать номер нового инструмента
Code "G43H" & NewTool 'указать корректор из таблицы (config -> tool table) для текущего инструмента

SetOEMDRO(824,NewTool)
Code "G4 P2"

End Sub
Main
'конец скрипта

Просмотры
noahi77 профиль не имеет просмотров.

Комментарии
Другие пользователи не оставили комментарии для noahi77.

Друзья
Друзей нет.
Текстовая версия Сейчас: