장공 가공 마크로 프로그램
·
장공 프로그램
장공 프로그램.rtf
#1------깊이
#2------FEED
#3------R FEED
#4------OFFSET NO
#5------Z DP FEED
#6------OBLONG R
#7------장공 길이
#8------반복 횟수(1=1 2=2)
#9------장공 방향 (1=Y 2=X)
O7 (OBLONG)
#1= 0
#2= 1000.
#3= 1000.
#4= 1(OFFSET NO)
#5= 500.(Z DP FEED)
#6= 15. (OBLONG R)
#7= 50. (L)
#8= 1 (REP 1=1 2=2)
#9= 1 (X OR Y 1=Y 2=X)
#10= 2 (1=G41 2=G42)
G90G0X0Y0M3S3000
G43Z50.H1
/M8
G90G0X0Y0M98P9017
G40G90G0Z200.M9
M30
O9017
IF[#10EQ1]GOTO1
IF[#10EQ2]GOTO11
N1
IF[#9EQ1]GOTO2
IF[#9EQ2]GOTO5
N2
IF[#8EQ1]GOTO3
IF[#8EQ2]GOTO4
N3
G90G0Z1.
G1Z#1F#5
G41G91X#6D#4F#2
Y#7
G3 X-[2*#6] R#6F#3
G1Y-#7F#2
G3 X[2*#6] R#6F#3
G40G1X-#6
G40G90G0Z50.
GOTO10
N4
G90G0Z1.
G1Z#1F#5
G41G91X#6D#4F#2
Y#7
G3 X-[2*#6] R#6F#3
G1Y-#7F#2
G3 X[2*#6] R#6F#3
G1Y#7F#2
G3 X-[2*#6] R#6F#3
G1Y-#7F#2
G3 X[2*#6] R#6F#3
G40G1X-#6
G40G90G0Z50.
GOTO10
N5
IF[#8EQ1]GOTO6
IF[#8EQ2]GOTO7
N6
G90G0Z1.
G1Z#1F#5
G41G91Y-#6D#4F#2
X#7
G3 Y[2*#6] R#6F#3
G1X-#7F#2
G3 Y-[2*#6] R#6F#3
G1G40Y#6
G40G90G0Z50.
GOTO10
N7
G90G0Z1.
G1Z#1F#5
G41G91Y-#6D#4F#2
X#7
G3 Y[2*#6] R#6F#3
G1X-#7F#2
G3 Y-[2*#6] R#6F#3
G1X#7F#2
G3 Y[2*#6] R#6F#3
G1X-#7F#2
G3 Y-[2*#6] R#6F#3
G1G40Y#6
G40G90G0Z50.
GOTO10
N11
IF[#9EQ1]GOTO12
IF[#9EQ2]GOTO15
N12
IF[#8EQ1]GOTO13
IF[#8EQ2]GOTO14
N13
G90G0Z1.
G1Z#1F#5
G42G91X-#6D#4F#2
Y#7
G2 X[2*#6] R#6F#3
G1Y-#7F#2
G2 X-[2*#6] R#6F#3
G40G1X#6
G40G90G0Z50.
GOTO10
N14
G90G0Z1.
G1Z#1F#5
G42G91X-#6D#4F#2
Y#7
G2 X[2*#6] R#6F#3
G1Y-#7F#2
G2 X-[2*#6] R#6F#3
G1Y#7F#2
G2 X[2*#6] R#6F#3
G1Y-#7F#2
G2 X-[2*#6] R#6F#3
G40G1X#6
G40G90G0Z50.
GOTO10
N15
IF[#8EQ1]GOTO16
IF[#8EQ2]GOTO17
N16
G90G0Z1.
G1Z#1F#5
G42G91Y#6D#4F#2
X#7
G2 Y-[2*#6] R#6F#3
G1X-#7F#2
G2 Y[2*#6] R#6F#3
G1G40Y-#6
G40G90G0Z50.
GOTO10
N17
G90G0Z1.
G1Z#1F#5
G42G91Y#6D#4F#2
X#7
G2 Y-[2*#6] R#6F#3
G1X-#7F#2
G2 Y[2*#6] R#6F#3
G1X#7F#2
G2 Y-[2*#6] R#6F#3
G1X-#7F#2
G2 Y[2*#6] R#6F#3
G1G40Y-#6
G40G90G0Z50.
GOTO10
N10
G40G90G0Z50.
G90M99