Чудит станок с Z
Добавлено: 18 мар 2018, 18:41
Господа,
Пытаюсь завести следующую конфигурацию Aman 2030 800W подключен через PureLogic USb-LPT адаптер к MAch3 (стоит на вин10).
Ручное управление движением по осям работает нормально. Записываю скрипт для поиска 0 через пробник.
Первый раз вроде работает. Следом запускаю Мач с начала. Вызываю скрипт - коретка движется не в том направлении (например должна сначала опускаться, а она поднимается, или после первого касания должен подняться вверх и опускаться медленней, а он наоборот вниз еще дает).
Совсем отчаялся. Пробовал в разных скринсетах (в обычном и в русском). В русском вообще беда, даже в 0 по Х и Y возвращаться не хочет и скрипт поиска 0 работает произвольно.
Сккрипт поиска 0 такой :
PlateOffset=8.3
Zup=10
MaxZPlus=25
Sleep 100
CurrentFeed = GetOemDRO(818)
Code "F100"
ZNew = GetDro(2) - MaxZPlus
Code "G31Z" &ZNew
While IsMoving()
Wend
ZNew = GetVar(2002)
Code "G0 Z" &ZNew + 3
While IsMoving ()
Wend
Code "F30"
ZNew = GetDro(2) - 6
Code "G31Z" &ZNew
While IsMoving()
Wend
If PlateOffset <> 0 Then
Call SetDro (2, PlateOffset)
Code "G4 P0.25"
ZNew = PlateOffset + Zup
Code "G0 Z" &ZNew
While IsMoving ()
Wend
Code "(Z zeroed)"
End If
Code "F" &CurrentFeed
Sleep 100
Пытаюсь завести следующую конфигурацию Aman 2030 800W подключен через PureLogic USb-LPT адаптер к MAch3 (стоит на вин10).
Ручное управление движением по осям работает нормально. Записываю скрипт для поиска 0 через пробник.
Первый раз вроде работает. Следом запускаю Мач с начала. Вызываю скрипт - коретка движется не в том направлении (например должна сначала опускаться, а она поднимается, или после первого касания должен подняться вверх и опускаться медленней, а он наоборот вниз еще дает).
Совсем отчаялся. Пробовал в разных скринсетах (в обычном и в русском). В русском вообще беда, даже в 0 по Х и Y возвращаться не хочет и скрипт поиска 0 работает произвольно.
Сккрипт поиска 0 такой :
PlateOffset=8.3
Zup=10
MaxZPlus=25
Sleep 100
CurrentFeed = GetOemDRO(818)
Code "F100"
ZNew = GetDro(2) - MaxZPlus
Code "G31Z" &ZNew
While IsMoving()
Wend
ZNew = GetVar(2002)
Code "G0 Z" &ZNew + 3
While IsMoving ()
Wend
Code "F30"
ZNew = GetDro(2) - 6
Code "G31Z" &ZNew
While IsMoving()
Wend
If PlateOffset <> 0 Then
Call SetDro (2, PlateOffset)
Code "G4 P0.25"
ZNew = PlateOffset + Zup
Code "G0 Z" &ZNew
While IsMoving ()
Wend
Code "(Z zeroed)"
End If
Code "F" &CurrentFeed
Sleep 100