宏程序，螺纹，钻孔，UG刀库

老玩童UG

本人宏程序略知一二，呵呵！分享给大家几个常用的。我就想知道UG刀库怎样管理等基础知识。

348527760

太模糊

zcgsky

看不清楚

老玩童UG

%
O9133(G933 LUO XUAN XI)
(G933 RZQ UVW IJK MSF)
(R=QI)(Z=SHEN)(Q=MEI DAO QIE SHEN)
(U=DI KONG ZHI JING)
(V=NEI KONG ZHI JING)
(W=LUO JU BAN JING)
(I#4EQ1=XI WAI YUAN)
(J#5=G3 G2)
(K=ZUI HOU ZHENG YUAN)

IF[#33NE#0]GO14
#33=1
#32=#[13000+#4111]+#[12000+#4111](D)

IF[#18EQ#0]TH#18=#26(R)
IF[#26EQ#0]TH#3000=1(Z)

IF[#21EQ#0]TH#21=#32*2(U)
IF[#21LT[#32*2]]TH#3000=1(U)
IF[#22EQ#0]TH#22=#21(V)
IF[[#4EQ0]AN[#22LT[#32*2]]]TH#3000=1(V)

IF[[#17EQ#0]AN[#23EQ#0]]TH#23=#32(Q W)
IF[[#17NE#0]AN[#23NE#0]]TH#3000=1(Q W)
IF[#17EQ#0]TH#30=AB[[#22-#21]/[#23*2]](QUAN)
IF[#23EQ#0]TH#30=AB[[#26-#18]/#17](QUAN)
IF[#17EQ#0]TH#17=[#26-#18]/[[#22-#21]/[#23*2]](Q)
IF[#23EQ#0]TH#23=[#22-#21]/2/[[#26-#18]/#17](W)
IF[#26GT#18]TH#17=AB[#17](Q)
IF[#26LT#18]TH#17=-AB[#17](Q)
IF[#22GT#21]TH#23=AB[#23](W)
IF[#22LT#21]TH#23=-AB[#23](W)

IF[#4EQ#0]TH#4=0(I)
IF[[#4EQ0]AN[#5EQ#0]]TH#5=3(J)
IF[[#4EQ1]AN[#5EQ#0]]TH#5=2(J)
IF[#6EQ#0]TH#6=0(K)
IF[#13EQ#0]TH#13=8(M)
IF[#19EQ#0]TH#19=#0(S)
IF[#9EQ#0]TH#9=#0(F)

IF[#4EQ0]TH#21=#21/2-#32(BAN JING)
IF[#4EQ0]TH#22=#22/2-#32(BAN JING)
IF[#4EQ1]TH#21=#21/2+#32(BAN JING)
IF[#4EQ1]TH#22=#22/2+#32(BAN JING)

N14#14=#5001(X)
#15=#5002(Y)
#16=#5003(Z)
G90M#13F#9S#19

G0X[#14+#21]Y#15
Z[#18+3]
G1Z#18F#9
#27=#5001-#14(I)
#28=#5002-#15(J)

#10=#30
IF[#5EQ3]TH#24=CO[#10*360]*[#21+#10*#23](X)
IF[#5EQ3]TH#25=SI[#10*360]*[#21+#10*#23](Y)
IF[#5EQ2]TH#24=CO[#10*[-360]]*[#21+#10*#23](X)
IF[#5EQ2]TH#25=SI[#10*[-360]]*[#21+#10*#23](Y)
G#5X[#14+#24]Y[#15+#25]Z[#18+#10*#17]I-#27J-#28Q#23K#17

IF[#6EQ0]TH#27=#0(I)
IF[#6EQ0]TH#28=#0(J)
G#5I-#27J-#28(ZUI HOU ZHENG YUAN)
G0Z#16
X#14Y#15
M99
%

老玩童UG

全部G66P9133 RZQ UVW JK FMS
最简G66P9133 Z UVW
最简G66P9133 RZQ U

R为Z轴起点，Z为Z轴终点，Q为Z轴每圈移动量（螺距）。
U为起点直径，V为终点直径，W为每圈移动量半径。
J2为顺时针旋转，J3为逆时针旋转，
K1时有最后整圆，K等于0时无最后整圆。
FMS为系统原始代码意义。


R无则仅XY平面螺旋，Z轴不移动。
Z无报警
如果有RZ和UV那么Q和W二者知其一便可自动得其另一，所以仅需输入一个就可以。
U无则等于刀径，在刀补上一定要有刀径输入。
V无则为Z轴直螺旋。
J无则为3。
K无则为1，K1时一般用于铣孔，K0时一般用于铣螺纹。
其余无则为无。


例如：
M6T1
G90G0Z100
G66P9133R1Z-20Q2U30（从Z1到Z-20螺距2大径30左旋螺纹。）
XY
XY
...
G67
...

例如：
M6T1
G90G0Z100
G66P9133Z-20U10V50W10J2K1（Z-20处从内孔10洗到50螺距10逆铣孔）
XY
...
G67
…

例如：
...
G66P9133R-20Z1U50V10W10J3K1（从Z-20到Z1从内孔50到10螺距10顺铣锥孔）
XY
...
G67
...

使用注意:RZ可以为任意数值，其他最好不要输错了正负号等明显错误，错了可能轨迹正确也可能不正确，数值的范围不可能挨个设置报警，所以请空运行确认无误后方可加工。我只能提供唯一正确的使用方法，不能设限并报警所有可能错误的使用方法，2个数就是4种条件报警，3个数就是9种，6个数是36种，错误报警写不完。

老玩童UG

%
O9138(G938 SHEN KONG ZUAN)
(G938 XYZA RQFK H)
(G938=ZONG SHI FAN HUI CHU SHI PING MIAN)
(G983=ZONG SHI FAN HUI ZUAN KONG PING MIAN R)
(R=ZUAN KONG PING MIAN)
(Q=JIAN GE DUAN)
(F=JIN JI LIANG)
(K=0)
(I=JIAN XI)

IF[#30NE#0]GO14
#30=#30+1

#16=#5003(Z XUN HUAN QI DIAN)
#32=#[12000+#4111](D)
IF[[#26EQ#0]AN[#23NE#0]]TH#26=#23-#32*0.26(Z)
IF[#18EQ#0]THEN#18=1(R)
IF[#17EQ#0]THEN#17=2(Q)
IF[#9EQ#0]TH#9=#32/100(F)
IF[[#9EQ[#32/100]]AN[#9GT0.1]]TH#9=0.1(F)
IF[#4EQ#0]THEN#4=0.5(I)
IF[#13EQ#0]TH#13=8
M#13S#19(M S)

N14IF[#18LT#26]TH#3000=1(R LT Z)
IF[#18GT#16]TH#3000=1(R GT Z QI)

#10=#18
G0Z#10
WH[#10GT#26]DO1
#10=#10-#17
IF[#10LT#26]THEN#10=#26
#12=#10+#4
G1Z#10
G0Z#16
G4X#1
IF[#10EQ#26]TH#12=#0
Z#12
END1
M99
%

老玩童UG

%
O9299(M999 QING KONG #500-#799)#30=#3003
#3003=1
IF[#1EQ#0]TH#1=500(KAI SHI)
IF[#2EQ#0]TH#2=799(JIE SHU)
WH[#1LE#2]DO1
#[#1]=#0
#1=#1+1
EN1
N99#3003=#30
M2

老玩童UG

O9202(程序号)
#1=255(把#1的十进制值转为二进制值并写入#6，大于255溢出)
#6=0(初始清空)
WHILE[#1GE2]DO1（如果#1大于等于2则运行至END1）
#5=#1
#2=0
#3=1
#4=1
WHILE[#1GE2]DO2（如果#1大于等于2则运行至END2）
#2=#2+1
#1=#1/2
IF[#2GE8]THEN#3000=1(溢出报警)
END2 （DO2至END2结果为#1中有几个2相乘，那么#2就等于几）
WHILE[#2GT0]DO3（如果#2大于0则运行至END3）
#2=#2-1
#3=#3*10
#4=#4*2
END3
#1=#5-#4
#6=#6+#3
IF[#1EQ1]THEN#6=#6+1
END1
M30（程序结束）

老玩童UG

立卧加宏程序使用说明
2018/10/28
#521=(手动卸刀位置X值)
#522=(手动卸刀位置Y值)
#523=(手动卸刀位置Z值)
#524=-525 (X轴的旋中X-700.975)
#526=-200(Z轴的旋中)
#527=8(=8时开水，不等于8时等于9)
#528=61(正在交换或者交换未完成的工作台号)
#529=61(交换完成的工作台号)
#530=38(正在交换或者交换未完成的刀具号)
#531=38(交换完成的刀具号)

刀补输入
例：M911 Z0 R54 H3
解释：机械坐标Z值，减工件坐标系Z值，再减外部坐标系Z值，再减M911的Z值，写入3号刀具长度补偿形状值并清空磨损值。

坐标系输入
例：M922 X100 R54
解释：等同于坐标系输入X50测量。

例：M922 Y-100 R54
解释：等同于坐标系输入Y-50测量。

例：M922 X0 R55 Q56
解释：据G55的X值和四轴X旋中算G56的X值。
限制：X数值不参与计算所以可以输入任意值，但不能没有，如果没有则不进行坐标系的计算并写入。

例：M922 Z175.5 R55 Q56
解释：据G55的Z值和四轴Z旋中算G56的Z值。
限制：Z数值参与计算而且不能没有，如果没有则不进行坐标系的计算并写入。

例：M922 Z0 R54 H3(发那科MB不需要)
解释：等同于坐标系输入Z0测量(带3号刀补测量)。
R不输则等于当前坐标系，H不输则等于当前刀号。

找正程序
例：G900 X100
解释：X轴来回运动。

例：G900 X-100 Z10
解释：Z轴先移动后，X轴再来回运动。

老玩童UG

%
O9999
G10L50
N00000R00000000
N00100R00101110(TV LF YU DU)
N00138R10000000(CUN CHU KA)
N01015R00010000(G30 G1 OR G0)
N01201R00100000(ZUO BIAO XI)
N01202R00000000(G52 QU XIAO)
N01207R00000001(G54-G43)
N01401R00010010(G84 KONG G0=G1)
N01402R00000001(G95)
N01404R10000000(F0)
N01405R00000010(F0.12-F0.123)
N01410R4000(&F1000)
N03030R4(M)
N03031R4(S)
N03032R4(T)
N03033R4(B)
N03101R00010010(MDI HOU TAI BIAN JI)
N03104R11000001(WEI ZHI XIAN SHI)
N03105R00000101(XIAN SHI F)
N03106R00100000
N03107R10010000
N03108R01000100
N03111R11100111(BAO JING QIE HUAN)(N03112R00001000)
N03116R00000100(BAO JING QING CHU)(N03117R00000001)(ZHU ZHOU FU ZAI)
N03191R01001001(FPS DAO BU QUE REN)
N03201R01100000(M02 M30 M99)
N03202R00111000(NE8 NE9)
N03203R00100000(MDI BIAN JI)
N03204R01000100(MDI XIAO KUO HAO)
N03205R00100000(BGC)
N03209R00000000
N03211R0(KOU LING)
N03232R00000000(HONG CHENG XU XIAN SHI)
N03292R00000000(#7CAN SHU OFF)
N03401R00000001(G DAI MA)
N03402R01000000(FU WEI QING CHU)
N03403R01100000(G2 CHONG FU BAO JING )
N03404R11100100(3M MDI M2 M198)
N03405R00000000(ZI DONG DAO JIAO)
N03406R00100000
N03407R01000001
N03408R00000000
N03409R10000000
N03410R0(G2 G3 WU CHA)
N03411R60
N03412R6
N03413R3
N03414R4
N03415R5
N03416R0
N03450R00011000(FS15 FS16 M98 M99)
N05001R01000000(G43 A)
N05003R01000000(G43 FU WEI QING QU)
N05005R00000001
N05006R01000000(G43 H)
N05041R10000000(G41 G42 BAO JING)
N05200R01010011(G84)
N05201R00011001(G84 S)
N05211R50(G84 S1000)
N05213R300(G84 I)
N05400R11010001(G68)
N05421P1R1000(G51 I)
N05421P2R1000
N05421P3R1000
N05421P4R1000
N06000R00000101
N06004R00000000(ATAN 0-360)
N06006R00000001(LUO JI YUN SUAN)
N06071R61(O9001 MZ)
N06072R62(O9002 MZ)
N06073R60(O9003 MZ)
N06074R0(O9004 MZ)
N06075R0(O9005 MZ)
N06076R0(O9006 MZ)
N06077R0(O9007 MZ)
N06078R0(O9008 MZ)
N06079R0(O9009 MZ)
N06050R0(O9010 GH)
N06051R0(O9011 GH)
N06052R0(O9012 GH)
N06053R0(O9013 GH)
N06054R984(O9014 GH)
N06055R0(O9015 GH)
N06056R0(O9016 GH)
N06057R0(O9017 GH)
N06058R900(O9018 GH)
N06059R0(O9019 GH)
N06080R6(O9020 MH)
N06081R911(O9021 MH)
N06082R922(O9022 MH)
N06083R930(O9023 MH)
N06084R0(O9024 MH)
N06085R905(O9025 MH)
N06086R906(O9026 MH)
N06087R980(O9027 MH)
N06088R981(O9028 MH)
N06089R982(O9029 MH)
G11
M30
(N3211=KEY)
(N6090=65)
(6005#0=1M98Q)
%