Author
Ðề: Tối ưu hóa đường chạy dao gia công 4 trục.
Keke, chú có thể cho anh xem mấy cái option mà chú chọn trong NX Post Builder không ? Mấy cái biến số..., anh hứa là dẫn chú đi nhậu (1 thùng ken) chả là anh đang cần cái này lắm. Chỉ cần nhìn thấy là anh có thể viết tương tự được..kakaka.
Về chạy xoắn ốc Helical xuất ra G1...X,Y,Z làm cho file nặng kb, để giải quyết cái này thì mình chọn trong phần mềm là xuất ra helical for all axis / sau đó lấy macro Helical có sẳn, thì xuất ra được đường xoắn ốc theo kiểu G3 X,Y,Z, 1 đường xoắn ốc chỉ gồm khoảng vài dòng. (Anh dùng Catia / IMSPost).
THEM MACRO HELICAL tu Post CO SAN.
HELICAL/*
*Center Point
CX = CLDATAN.1
CY = CLDATAN.2
CZ = CLDATAN.3
*INDIRV direction from start point
TI = CLDATAN.4
TJ = CLDATAN.5
TK = CLDATAN.6
*Helix direction
VI = CLDATAN.7
VJ = CLDATAN.8
VK = CLDATAN.9
*Pitch
P = -CLDATAN.10
*Radius
R = CLDATAN.11
*Angle
A = CLDATAN.12
*Helight
H = CLDATAN.13
*Count
C = CLDATAN.14
*End Point
EIX = CLDATAN.15
EIY = CLDATAN.16
EIZ = CLDATAN.17
*Find Circle vector/direction
DX = SYSTEM.X - CX
DY = SYSTEM.Y - CY
DZ = SYSTEM.Z - CZ
V1 = VECTOR(DX,DY,DZ)
V2 = VECTOR(TI,TJ,TK)
VD = VECPROD(V1,V2)
*
CNT = A/360.0
FULL = INT(CNT)
DX = P*VI
DY = P*VJ
DZ = P*VK
EFX = EIX
EFY = EIY
EFZ = EIZ
EX = SYSTEM.X
EY = SYSTEM.Y
EZ = SYSTEM.Z
I = 1
WHILE (I <= FULL)
EX = EX + DX
EY = EY + DY
EZ = EZ + DZ
CALL(CIRCLE/CX,CY,CZ,VD.X,VD.Y,VD.Z,EX,EY,EZ)
I = I + 1
ENDWHILE
IF (FULL < CNT)
CALL(CIRCLE/CX,CY,CZ,VD.X,VD.Y,VD.Z,EFX,EFY,EFZ)
ENDIF
RETURN
Chú ý, Macro Helical có sẳn trong IMSPost không có dòng tô đậm màu đen. Trong Catia, Circular Milling / chọn không xuất ra cycle / Generate NC Code chọn All Helix.
Trong IMSPost chọn Circular Interpolation là IJK, from start to circle center.
Done !. Chỉ đơn giản vậy thôi.
Keke, chú có thể cho anh xem mấy cái option mà chú chọn trong NX Post Builder không ? Mấy cái biến số..., anh hứa là dẫn chú đi nhậu (1 thùng ken) chả là anh đang cần cái này lắm. Chỉ cần nhìn thấy là anh có thể viết tương tự được..kakaka.
Về chạy xoắn ốc Helical xuất ra G1...X,Y,Z làm cho file nặng kb, để giải quyết cái này thì mình chọn trong phần mềm là xuất ra helical for all axis / sau đó lấy macro Helical có sẳn, thì xuất ra được đường xoắn ốc theo kiểu G3 X,Y,Z, 1 đường xoắn ốc chỉ gồm khoảng vài dòng. (Anh dùng Catia / IMSPost).
THEM MACRO HELICAL tu Post CO SAN.
HELICAL/*
*Center Point
CX = CLDATAN.1
CY = CLDATAN.2
CZ = CLDATAN.3
*INDIRV direction from start point
TI = CLDATAN.4
TJ = CLDATAN.5
TK = CLDATAN.6
*Helix direction
VI = CLDATAN.7
VJ = CLDATAN.8
VK = CLDATAN.9
*Pitch
P = -CLDATAN.10
*Radius
R = CLDATAN.11
*Angle
A = CLDATAN.12
*Helight
H = CLDATAN.13
*Count
C = CLDATAN.14
*End Point
EIX = CLDATAN.15
EIY = CLDATAN.16
EIZ = CLDATAN.17
*Find Circle vector/direction
DX = SYSTEM.X - CX
DY = SYSTEM.Y - CY
DZ = SYSTEM.Z - CZ
V1 = VECTOR(DX,DY,DZ)
V2 = VECTOR(TI,TJ,TK)
VD = VECPROD(V1,V2)
*
CNT = A/360.0
FULL = INT(CNT)
DX = P*VI
DY = P*VJ
DZ = P*VK
EFX = EIX
EFY = EIY
EFZ = EIZ
EX = SYSTEM.X
EY = SYSTEM.Y
EZ = SYSTEM.Z
I = 1
WHILE (I <= FULL)
EX = EX + DX
EY = EY + DY
EZ = EZ + DZ
CALL(CIRCLE/CX,CY,CZ,VD.X,VD.Y,VD.Z,EX,EY,EZ)
I = I + 1
ENDWHILE
IF (FULL < CNT)
CALL(CIRCLE/CX,CY,CZ,VD.X,VD.Y,VD.Z,EFX,EFY,EFZ)
ENDIF
RETURN
Chú ý, Macro Helical có sẳn trong IMSPost không có dòng tô đậm màu đen. Trong Catia, Circular Milling / chọn không xuất ra cycle / Generate NC Code chọn All Helix.
Trong IMSPost chọn Circular Interpolation là IJK, from start to circle center.
Done !. Chỉ đơn giản vậy thôi.
Last edited: