ПЕРВЫЙ ВАРИАНТ СКРИПТА ДЛЯ МАЧ 3 в одно касание
(второй вариант скрипта ютуб не даёт загрузить угловые скобкив лишь в одной строке,но и не страшно. в комментарии под видео рабочая версия скрипта  )
😉👇

Message( "Auto Zeroing..." )
If IsSuchSignal (22) Then
code "G31 Z-15 F150"
While IsMoving()
Wend
Call SetDRO( 2,19.1 )
code "G1 Z25"
End If
---------------‐---
(уточняю Call SetDRO( 2,19.1 ) 19.1 толщина таблетки моей)
------------------------
ВТОРОЙ ВАРИАНТ СКРИПТА В 2 КОСАНИЯ ФРЕЗОЙ ДАТЧИКА
PlateOffset=20.12 'толщина платы мм.
Zup=5 'Расстояние на которое отойдет фреза после коррекции
MaxZPlus=100 'максимальный ход станка по оси Z мм.

Sleep 100 'Пауза 0,1 сек.
CurrentFeed = GetOemDRO(818) 'Запомнить текущюю скорость, для того чтобы восстановить после коррекции.

Code "F300" 'Задать скорость подачи до касания инструментом

ZNew = GetDro(2) - MaxZPlus 'опустить инструмент до касания
Code "G31Z" &ZNew
While IsMoving() 'Подождать пока произойдет касание платы.
Wend

ZNew = GetVar(2002) 'читать точку касания
Code "G0 Z" &ZNew + 3 'отьехать вверх на 3мм от точки касания
While IsMoving ()
Wend

Code "F50" 'замедлить подачу до 50мм\мин
ZNew = GetDro(2) - 6
Code "G31Z" &ZNew 'опустить инструмент до касания
While IsMoving() 'Подождать пока произойдет касание платы.
Wend

If PlateOffset 0 Then (ребята тут должны стоять угловые скобки но ютуб не разрешает)
Call SetDro (2, PlateOffset) 'записать в окно Z толщину платы, тем самым откорректировав позицию по Z
Code "G4 P0.25" 'пауза для успешной записи значения в DRO
ZNew = PlateOffset + Zup 'вычислени точки подьема
Code "G0 Z" &ZNew 'поднять на высоту отхода после коррекции
While IsMoving ()
Wend
Code "(Z axis is now zero !)" 'послать сообщение в статус

End If

Code "F" &CurrentFeed 'Возвращаем установленное значение подачи
Sleep 100

свернуть