Tự động hóa

Bài 1 Tạo Macro trong Mach3

Tạo macro trong Mach3

Sử dụng các lệnh lập trình Visual Basic.
Sử dụng ' cho các ghi chú.
Sử dụng lệnh Code để viết các lệnh GCode trong Macro, thí dụ Code "G1 X8.25 Y2.50"
Luôn sử dụng     
While IsMoving()
WEnd
sau mỗi lệnh chuyển động GCode để chắc chắn các lệnh sau đó được thực hiện sau khi chuyển động đã hoàn tất.

Tạo một macro mới M779.m1s

  • Trong màn hình Mach3 vào menu Operator
  • Chọn Operator> VB Script Editor


Mach3 macro: Màn hình soạn thảo VB Script Window

Trong cửa sổ VB Script Window, bấm vào nút trái cùng "Open Script File", trong cửa sổ hiện ra đánh vào "M779.m1s". Máy sẽ yêu cầu xác nhận tạo file mới nếu file M779.m1s chưa tồn tại, chọn OK.


Mach3 macro

Màn hình soạn thảo VB Script Window: Tạo file mới M779.m1s

So sánh:




In Marco

In GCode file ( file.NC)


Code "G1 Z-2 F100"

G1 Z-2 F100


Code "(Dòng chú thích)"

(Dòng chú thích)


Code "G1 Z-2 F100"

While IsMoving()

WEnd

Code "G1 X100 Y-20 F500"

*Nếu không có While IsMoving() WEnd ở trên thì câu lệnh G1 X100 Y-20 F500 sẽ thực hiện ngay trong khi câu lệnh G1 Z-2 F100 chưa kết thúc!!!

G1 Z-2 F100

G1 X100 Y-20 F500



Thí dụ đầu tiên

Gõ nội dung sau vào file macro M779.m1s

reply = MachMsg("Nhan OK de tiep tuc", "Macro M792.m1s", 0)

'Su dung bien x

x = GetOEMDRO(800)

reply = MachMsg("Toa do X hien thoi la" & x & ". Nhan Ok de tiep tuc", "Macro M792.m1s", 0)

reply = MachMsg("Nhan Ok de set toa do X ve 0.0", "Macro M792.m1s", 0)

SetOEMDRO(800, 0.0)

reply = MachMsg("Nhan ok de khoi phuc lai toa do X", "Macro M792.m1s", 0)

SetOEMDRO(800, x)  


Giải thích
MachMsg() sử dụng 3 tham số: nội dung thông báo; tiêu để cửa sổ; và lựa chọn nút lệnh trong cửa sổ.
GetOEMDRO() trả về giá trị biến định nghĩa bởi nhà sản xuất, tham số là tên biến. Trong thí dụ trên biến 800 chứa tọa độ X hiện thời.
SetOEMDRO() gán giá trị cho biến được định nghĩa bởi nhà sản xuất. SetOEMDRO(800, 5.12) nghĩa là gán giá trị 5.12 cho biến 800, cũng tức là gán tọa độ X hiện thời bằng 5.12
Đối với biến người dùng định nghĩa (không phải biến OEM- Original Equipment Manufacturer, tức là không phải biến định nghĩa bởi ArtSoft) thì ta thay tương ứng các hàm GetVar() và SetVar(). Lưu ý là các biến người dùng định nghĩa trong file .NC đều có thể sử dụng GetVar()và SetVar() để lấy giá trị hiện thời hoặc thay đổi giá trị của biến từ trong macro.
Ghi lại nội dung của file M779.m1s và thoát VB Script Editor.
Để chạy macro M779.m1s từ trong mach3, chuyển đến màn hình số 2 MDI, gõ vào M779 Enter.



Nguồn Sư Tầm



About Mr. Facebook

0 nhận xét:

Đăng nhận xét