Редактировал(а) Edgar Allan Poe 2024/11/14 17:01

От версии 3.4
отредактировано abolgov
на 2022/06/10 14:25
Изменить комментарий: Update document after refactoring.
К версии 6.1
отредактировано writer
на 2023/01/26 14:12
Изменить комментарий: К данной версии нет комментариев

Сводка

Подробности

Свойства страницы
Родительский документ
... ... @@ -1,1 +1,1 @@
1 -PUMPUBLIC.Описание M-кодов.Примеры макросов.WebHome
1 +Руководство пользователя.Описание M-кодов.Примеры макросов.WebHome
Автор документа
... ... @@ -1,1 +1,1 @@
1 -XWiki.abolgov
1 +XWiki.Knetyaga
Содержимое
... ... @@ -1,85 +1,83 @@
1 1  Для определённых задач (например, фрезеровки печатных плат) возникает необходимость сканирования поверхности с последующей корректировкой неровностей по Z. Карта высот подготавливается с помощью макроса (пример ниже), и на основе этой карты высот модифицируется G-код. Сформировать G-код с готовыми координатами можно, например, в программе G-Code Ripper.
2 2  
3 -{{code}}
3 +{{code language="lua"}}
4 4  function m155()
5 - local XWidth = 70
6 - local YWidth = 50
7 - local SafeZ = 3
8 - local ProbeZ = -3
9 - local StepX = 15
10 - local StepY = 15
11 - local Feed = 50
12 - local TipHeight = 0
13 - local ProbeFilename = "C:\temp\probe.txt"
14 -
15 - PushCurrentDistanceMode()
16 - PushCurrentMotionMode()
17 -
18 - if (IsProbingPinConfigured()) then
19 - -- open the file
20 - file, msg = io.open(ProbeFilename, "w")
21 -
22 - if (file == nil) then
23 - DisplayMessage("Could not open probe output file ("..msg..")")
24 - Stop()
25 - return
26 - end
27 -
28 - ExecuteMDI("F "..Feed)
29 - ExecuteMDI("G90 G38.2 Z-100")
30 -
31 - -- set the current location to 0,0,0
32 - ExecuteMDI("G92 X0Y0Z0")
33 - ExecuteMDI("G0 Z"..SafeZ)
34 -
35 - local direction = 0
36 - for y = 0, YWidth, StepY do
37 - if (direction == 1) then
38 - direction = 0
39 - else
40 - direction = 1
41 - end
42 -
43 - for x = 0, XWidth, StepX do
44 - if (direction == 1) then
45 - ExecuteMDI("G0 X"..x.." Y"..y.." Z"..SafeZ)
46 - else
47 - ExecuteMDI("G0 X"..(XWidth - x).." Y"..y.." Z"..SafeZ)
48 - end
49 -
50 - ExecuteMDI("G38.2 Z"..ProbeZ)
51 - LogCurrentPos(TipHeight)
52 - ExecuteMDI("G0 Z"..SafeZ)
53 - end
54 - end
55 -
56 - if (direction == 1) then
57 - ExecuteMDI("G0 X"..XWidth.." Y"..YWidth.." Z"..SafeZ)
58 - else
59 - ExecuteMDI("G0 X".."0".." Y"..YWidth.." Z"..SafeZ)
60 - end
61 -
62 - local HighZ = 5
63 - ExecuteMDI("G0 Z"..HighZ)
64 - ExecuteMDI("G0 X0Y0")
65 -
66 - file:close()
67 - else
68 - DisplayMessage("Probe input is not configured")
69 - return
70 - end
5 + local XWidth = 70
6 + local YWidth = 50
7 + local SafeZ = 3
8 + local ProbeZ = -3
9 + local StepX = 15
10 + local StepY = 15
11 + local Feed = 50
12 + local TipHeight = 0
13 + local ProbeFilename = "C:\temp\probe.txt"
14 +
15 + PushCurrentDistanceMode()
16 + PushCurrentMotionMode()
17 +
18 + if (IsProbingPinConfigured()) then
19 + file, msg = io.open(ProbeFilename, "w") -- open the file
20 + else
21 + DisplayMessage("Probe input is not configured")
22 + return
23 + end
24 +
25 + if (file == nil) then
26 + DisplayMessage("Could not open probe output file ("..msg..")")
27 + Stop()
28 + return
29 + end
30 +
31 + ExecuteMDI("F "..Feed)
32 + ExecuteMDI("G90 G38.2 Z-100")
33 +
34 + ExecuteMDI("G92 X0Y0Z0") -- set the current location to 0,0,0
35 + ExecuteMDI("G0 Z"..SafeZ)
36 +
37 + local direction = 0
38 + for y = 0, YWidth, StepY do
39 + if (direction == 1) then
40 + direction = 0
41 + else
42 + direction = 1
43 + end
44 +
45 + for x = 0, XWidth, StepX do
46 + if (direction == 1) then
47 + ExecuteMDI("G0 X"..x.." Y"..y.." Z"..SafeZ)
48 + else
49 + ExecuteMDI("G0 X"..(XWidth - x).." Y"..y.." Z"..SafeZ)
50 + end
51 +
52 + ExecuteMDI("G38.2 Z"..ProbeZ)
53 + LogCurrentPos(TipHeight)
54 + ExecuteMDI("G0 Z"..SafeZ)
55 + end
56 +
57 + end
58 +
59 + if (direction == 1) then
60 + ExecuteMDI("G0 X"..XWidth.." Y"..YWidth.." Z"..SafeZ)
61 + else
62 + ExecuteMDI("G0 X".."0".." Y"..YWidth.." Z"..SafeZ)
63 + end
64 +
65 + local HighZ = 5
66 + ExecuteMDI("G0 Z"..HighZ)
67 + ExecuteMDI("G0 X0Y0")
68 +
69 + file:close()
71 71  end
72 72  
73 73  function LogCurrentPos(tipHeight)
74 - local CurrX = AxisGetPos(Axis.X)
75 - local CurrY = AxisGetPos(Axis.Y)
76 - local CurrZ = AxisGetPos(Axis.Z)
77 -
78 - local fmt = "%.5f"
79 - file:write(string.format(fmt, CurrX)..","..string.format(fmt, CurrY)..","..string.format(fmt, CurrZ - tipHeight), "\n")
73 + local CurrX = AxisGetPos(Axis.X)
74 + local CurrY = AxisGetPos(Axis.Y)
75 + local CurrZ = AxisGetPos(Axis.Z)
76 +
77 + local fmt = "%.5f"
78 + file:write(string.format(fmt, CurrX)..","..string.format(fmt, CurrY)..","..
79 + string.format(fmt, CurrZ - tipHeight), "\n")
80 80  end
81 81  {{/code}}
82 82  
83 -
84 -
85 -{{view-file att--filename="M155.pm" name="" height="250"/}}
83 +[[Скачать макрос>>attach:M155.pm]]