CNC Turkey

ölçme kolunun makro programının ilerlemesini nasıl düşürebilirim. ölçme koluna hızlı çarpıyor biraz yavaşlatmak için makro programın içindeki hangi değeri değiştirmem gerekiyor. program aşağıdadır.

O9011(REN TOOL SET)
(40120513.0E)
M97
G04X1.0
#10=522(EDIT FIRST MACRO STORE)
#12=1(EDIT BACK OFF)
#17=2(EDIT 2-DIA/1-RAD)
#148=#4005
IF[#148EQ94]GOTO1
G98
N1
#27=.002
#29=.04
IF[#4006EQ20]GOTO2
IF[#4006EQ70]GOTO2
#29=1
#27=.05
N2
#19=#5041-#5081
#22=#5042-#5082
#28=#5021-#5041
#31=#5022-#5042
IF[#2NE#0]GOTO3
#2=6*#29
N3
IF[#9NE#0]GOTO4
#9=500*#29
N4
IF[#20NE#0]GOTO5
#20=#4120-[[FIX[#4120/100]]*100]
IF[#20NE0]GOTO5
#20=FIX[#4120/100]
N5
IF[#20LT1]GOTO39
IF[#11NE#0]GOTO6
#11=#[2300+#20]
N6
IF[#11EQ1]GOTO7
IF[#11EQ2]GOTO8
IF[#11EQ3]GOTO9
IF[#11EQ4]GOTO10
IF[#11EQ5]GOTO11
IF[#11EQ6]GOTO12
IF[#11EQ7]GOTO13
IF[#11EQ8]GOTO14
GOTO40
N7(H1)
IF[#3NE#0]GOTO41
#1=#19+[#2*#17]+#21
#4=#22+#2-#23
#5=-#12*#29
#8=-#12*#29
#32=1
#14=1
GOTO15
N8(H2)
IF[#3NE#0]GOTO41
#1=#19+[#2*#17]+#21
#4=#22-#2-#23
#5=-#12*#29
#8=#12*#29
#32=1
#14=0
GOTO15
N9(H3)
IF[#3NE#0]GOTO41
#1=#19-[#2*#17]-#21
#4=#22-#2-#23
#5=#12*#29
#8=#12*#29
#32=0
#14=0
GOTO15
N10(H4)
IF[#3NE#0]GOTO41
#1=#19-[#2*#17]-#21
#4=#22+#2-#23
#5=#12*#29
#8=-#12*#29
#32=0
#14=1
GOTO15
N11(H5)
#4=#22+#2
#8=-#12*#29
#14=1
#18=-ABS[#3/2]
GOTO15
N12(H6)
#1=#19+[#2*#17]
#5=-#12*#29
#32=1
#18=-ABS[#3/2*#17]
GOTO15
N13(H7)
#4=#22-#2
#8=#12*#29
#14=0
#18=ABS[#3/2]
GOTO15
N14(H8)
#1=#19-[#2*#17]
#5=#12*#29
#32=0
#18=ABS[#3/2*#17]
N15(Z MEAS)
IF[#4EQ#0]GOTO26
IF[#1EQ#0]GOTO16
G31X#1F[#9*6]
#30=121
IF[ABS[#5041-#5081-#1]GT#27]GOTO36
N16
#3004=2
G31Z#4F#9
#30=122
IF[ABS[#5062-#5082-#4]LT#27]GOTO36
#30=121
IF[ABS[#5062-#5082-#22]LT#27]GOTO36
#25=#5062-#5082+#8
G1Z#25
G31Z#4F[30*#29]
#3004=0
#30=122
IF[ABS[#5062-#5082-#4]LT#27]GOTO36
#30=121
IF[ABS[#5062-#5082-#25]LT#27]GOTO36
G1Z#22F[#9*6]
IF[#6NE#0]GOTO20
#16=#5062+#31-#[#10+2+#14]-#18-#26
IF[#509EQ1]GOTO18
#15=2100+#20
IF[#13EQ#0]GOTO17
#30=123
IF[ABS[#[#15]-#16]GT#13]GOTO36
GOTO24
N17
#[#15]=#16
GOTO24
N18
#15=2800+#20
IF[#13EQ#0]GOTO19
#30=123
IF[ABS[#[#15]+#[#15-700]-#16]GT#13]GOTO36
GOTO24
N19
#[#15-700]=0
#[#15]=#16
GOTO24
N20
IF[#509EQ1]GOTO21
#15=2100+#20
#16=0
GOTO22
N21
#15=2800+#20
#16=#[#15-700]
N22
#[#10+2+#14]=#5062+#31-#[#15]-#16-#18-#26
IF[#6NE2]GOTO24
IF[#11EQ1]GOTO23
IF[#11EQ4]GOTO23
IF[#11EQ5]GOTO23
#[#10+3]=#[#10+2]-#[#10+9]
GOTO24
N23
#[#10+2]=#[#10+3]+#[#10+9]
N24
X#19
N25
IF[#1EQ#0]GOTO34
IF[#4EQ#0]GOTO26
G31Z#4F[#9*6]
#30=121
IF[ABS[#5042-#5082-#4]GT#27]GOTO35
N26(X MEAS)
IF[#1EQ#0]GOTO34
#3004=2
G31X#1F#9
#30=122
IF[ABS[#5061-#5081-#1]LT#27]GOTO35
#30=121
IF[ABS[#5061-#5081-#19]LT#27]GOTO35
#25=#5061-#5081+[#5*#17]
G1X#25
G31X#1F[30*#29]
#3004=0
#30=122
IF[ABS[#5061-#5081-#1]LT#27]GOTO35
#30=121
IF[ABS[#5061-#5081-#25]LT#27]GOTO35
G1X#19F[#9*6]
IF[#6NE#0]GOTO30
#16=#5061+#28-#[#10+#32]-#18-#24
IF[#509EQ1]GOTO28
#15=2000+#20
IF[#13EQ#0]GOTO27
#30=123
IF[ABS[#[#15]-#16]GT#13]GOTO35
GOTO34
N27
#[#15]=#16
GOTO34
N28
#15=2700+#20
IF[#13EQ#0]GOTO29
#30=123
IF[ABS[#[#15]+#[#15-700]-#16]GT#13]GOTO35
GOTO34
N29
#[#15-700]=0
#[#15]=#16
GOTO34
N30
IF[#509EQ1]GOTO31
#15=2000+#20
#16=0
GOTO32
N31
#15=2700+#20
#16=#[#15-700]
N32
#[#10+#32]=#5061+#28-#[#15]-#16-#18-#24
IF[#6NE2]GOTO34
IF[#11EQ1]GOTO33
IF[#11EQ2]GOTO33
IF[#11EQ6]GOTO33
#[#10+1]=#[#10]-#[#10+8]
GOTO34
N33
#[#10]=#[#10+1]+#[#10+8]
N34
Z#22
GOTO43
N35
G1X#19F[#9*6]
Z#22
IF[#30EQ121]GOTO37
IF[#30EQ122]GOTO38
IF[#30EQ123]GOTO42
N36
G1Z#22F[#9*6]
X#19
IF[#30EQ121]GOTO37
IF[#30EQ122]GOTO38
IF[#30EQ123]GOTO42
N37
#3000=92(PROBE OPEN)
N38
#3000=93(PROBE FAIL)
N39
#3000=81(ILLEGAL TOOL OFFSET NUMBER T)
N40
#3000=82(ILLEGAL TOOL NOSE VECTOR H)
N41
#3000=83(INPUTS C AND H1-H4 MIXED)
N42
#3000=99(BROKEN TOOL)
N43G#148
M99

%

 Hangi eksendeki ilerlemeyi kısmak istiyorsunuz?