GS написал(а):Где текст скрипта? Кино неинтересно.
У меня на красной плате свободный контакт был 13й.
На него и повесил таблетку(датчик нуля)
идём в Operator-Edit button script. Кнопки которые можно редактировать будут моргать. Я взял Auto tool zero. Тыкаем в моргающую кнопку. Текст который выскочит надо заменить на это:
Rem VBScript To probe In the z axis
If GetOemLed (825) <> 0 Then 'Проверка на касание вручную(тут не пашет)
Code "(Z-Plate is grounded, check connection and try again)" '
Else
Code "G4 P1" 'Пауза 1 секунда
PlateOffset = 2 'Толщина платы(указать своё)
CurrentFeed = GetOemDRO(818) 'Получить текущую скорость подачи
Code "F100" 'опускаем на скорости100мм/мин
Rem Probe In the z direction
ZNew = GetDro(2) - 50 'Ищем на протяжении 50мм
Code "G31Z" &ZNew
While IsMoving()
Wend
ZNew = GetVar(2002)
Code "G0 Z" &ZNew
While IsMoving ()
Wend
If PlateOffset <> 0 Then
Call SetDro (2, PlateOffset)
Code "G4 P0.25"
ZNew = PlateOffset + 10 'Высота подскока после касания
Code "G0 Z" &ZNew
Code "(Z axis is now zeroed)"
End If
Code "F" &CurrentFeed
End If
Подробности уже не помню. Поставил в маче нужные галки и всё чудесно работает.
В самом скрипте поменял толщину пластины(помоему 20мм), а всё остальное, как здесь написано
Отредактировано Alex2x (28-11-2017 20:49:04)