Reklamlar

reklam reklam

Gönderen Konu: makro program sorunu  (Okunma sayısı 1559 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı yozluk

  • Turkeycnc.com Üyesi
  • *
  • İleti: 4
  • +0/-0
makro program sorunu
« : Mart 26, 2016, 09:36:31 ÖÖ »
ö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
 
%

Çevrimdışı cncmakro

  • Programcı
  • ***
  • İleti: 99
  • +4/-0
Ynt: makro program sorunu
« Yanıtla #1 : Mart 28, 2016, 11:51:22 ÖS »
 Hangi eksendeki ilerlemeyi kısmak istiyorsunuz?