SLOT İŞLEME

[birkan66]

%
O0001
G65P9001X100.Y40.A0 B100.C50.E1000.F2000.H13.J500.U2 R2 W14.Z-5.
(A=START ANGLE OF FIRST SLOT)
(B=OUTSIDE RADIUS CENTER POINT)
(C=INSIDE RADIUS CENTER POINT)
(E=Z FEEDRATE)
(F=FEEDRATE TO MILL)
(H=NUMBER OF SLOTS)
(J=FEEDRATE AROUND RADIUS)
(U=FINISH ALLOWANCE-RADIAL VALUE)
(W=WIDTH OF SLOT)
(Z=Z AXIS DEPTH)

O9001;

IF[#3EQ#0]THEN#3000=2(N0 INSIDE RADIUS);
IF[#11EQ#0]THEN#3000=3(NUMBER OF SLOTS);
IF[#9EQ#0]THEN#3000=4(NO MILL FEEDRATE);
IF[#18EQ#0]THEN#3000=5(NO REF POINT);
IF[#23EQ#0]THEN#3000=6(NO WIDTH GIVEN);
IF[#5EQ#0]THEN#3000=7(MILL RADIUS FEED RATE);
IF[#8EQ#0]THEN#3000=8(NO Z FEEDRATE);
IF[#26EQ#0]THEN#3000=9(NO Z DEPTH);
#140=#5003; [STORE INITIAL Z POINT]
#100=0; [SET COUNTER TO ZERO]
#27=#23/2.0; [DIVIDE DIAMETER BY 2]
#144=#[#4107+2000]; [D+2000 READS RADIUS OF ENDMILL]
#28=#27-#144-#21; [WIDTH - RADIUS - FINISH ALLOWANCE]
#29=#27-#144; [WIDTH-RADIUS]
#101=360/#11; [NO. OF DEGREES BETWEEN SLOTS]
WHILE[#100LTABS[#11]]DO1; [BEGIN LOOP]
#102=SIN[[#100*#101]+#1]; [X leg]
#103=COS[[#100*#101]+#1]; [Y leg]
#104=#2*#103; [X VALUE OF OUTSIDE INSCRIBED CIRCLE]
#105=#2*#102; [Y VALUE OF OUTSIDE INSCRIBED CIRCLE]
#106=#3*#103; [X VALUE OF INSIDE INSCRIBED CIRCLE]
#107=#3*#102; [Y VALUE OF INSIDE INSCRIBED CIRCLE]
#108=#28*#102; [X VALUE OF SMALL TRIANGLE]
#109=#28*#103; [Y VALUE OF SMALL TRIANGLE]
#110=#104-#108; [X START POINT OF 1ST RAD]
#111=#105+#109; [Y START POINT OF 1ST RAD]
#112=#106-#108; [X START POINT TOP OF 2ND RAD]
#113=#107+#109; [Y START POINT TOP OF 2ND RAD]
#114=#106+#108; [X START POINT BOT OF 2ND RAD]
#115=#107-#109; [Y START POINT BOT OF 2ND RAD]
#116=#104+#108; [X START POINT BOT OF 1ST RAD]
#117=#105-#109; [Y START POINT BOT OF 1ST RAD]
G0X#104Y#105; [POSITION TO ENTRY POINT]
G0Z#18; [RAPID T0 REFERENCE POINT]
G1Z#26F#8; [FEED TO Z VALUE]
G1X#110Y#111F#5; [FEED TO START POINT]
G1X#112Y#113F#9; [FEED TO BEGINNING OF RADIUS]
G3X#114Y#115R#28F#5; [CUT ARC]
G1X#116Y#117F#9; [FEED TO BEGINNING OF RADIUS]
G3X#110Y#111R#28F#5; [CUT ARC]
G1X#104Y#105; [FEED TO ENTRY POINT]
IF[#21EQ#0]GOTO2; [IF NO FINISH ALLOW]
(*********);
(BEGINNING OF FINISH CUT);
(*********);
#108=#29*#102;
#109=#29*#103;
#110=#104-#108;
#111=#105+#109;
#112=#106-#108;
#113=#107+#109;
#114=#106+#108;
#115=#107-#109;
#116=#104+#108;
#117=#105-#109;
G0X#104Y#105;
G1X#110Y#111;
G1X#112Y#113F#9;
G3X#114Y#115R#29F#5;
G1X#116Y#117F#9;
G3X#110Y#111R#29F#5;
G1X#104Y#105;
N2G0Z#18;
G0Z#140;
#100=#100+1;
END1;
M99;
M30
%

[birkan66]

RADIALSLOT WITH ZIG-ZAG PLUNGE MOVE)

(#240 RADIUS OF THE SLOT)
(#241 WIDTH OF THE SLOT)
(#242 ANGLE OF THE SLOT)
(#243 STARTANGLE)
(#244 ANGLE BETWEEN SLOTS)
(#245 COUNT OF SLOTS)
(#246 RADIUS OF THE TOOL)
(#247 COORDINATE CENTER X)
(#248 COORDINATE CENTER Y)
(#249 DEPTH OF THE SLOT)
(#250 COUNT OF ZIG-ZAGS)
(#251 COUNT OF CUTS FOR FINISHING)

(------------------------)
#240=100
#241=16
#242=35
#243=0
#244=45
#245=8
#246=8
#247=0
#248=0
#249=10
#250=3
#251=2
(------------------------)


#200=0
WHILE [#200 LT ABS[#245]] DO 1
#261=#200*#244+#243
#262=2*[ASIN[[#241/4]/#240]]
#263=[#242/2]-#262
#265=#240*COS[#261+#263]+#247
#266=#240*SIN[#261+#263]+#248
#267=#240*COS[#261-#263]+#247
#268=#240*SIN[#261-#263]+#248
#269=#249/#250/2
#270=#269
G0 X#265 Y#266
G0 Z2.
G1 Z0. F100

WHILE [#270LT#249] DO 2
G2 X#267 Y#268 R#240 Z-#270
#270 = #270 + #269
G3 X#265 Y#266 R#240 Z-#270
#270 = #270 + #269
END 2

G2 X#267 Y#268 R#240 
G0 Z2.

#280=#249/#251
#281=#240*COS[#261-#262]+#247
#282=#240*SIN[#261-#262]+#248
#283=#240*COS[#261+#262]+#247
#284=#240*SIN[#261+#262]+#248
#285=#240*COS[#261]+#247
#286=#240*SIN[#261]+#248
#287=[#240+[#241/2]]*COS[#261]+#247
#288=[#240+[#241/2]]*SIN[#261]+#248
#289=[#240+[#241/2]]*COS[#261+#263]+#247
#290=[#240+[#241/2]]*SIN[#261+#263]+#248
#291=[#240-[#241/2]]*COS[#261+#263]+#247
#292=[#240-[#241/2]]*SIN[#261+#263]+#248
#293=[#240+[#241/2]]*COS[#261-#263]+#247
#294=[#240+[#241/2]]*SIN[#261-#263]+#248
#295=[#240-[#241/2]]*COS[#261-#263]+#247
#296=[#240-[#241/2]]*SIN[#261-#263]+#248


#297=#280
WHILE [#297LE#249] DO 3
G1 X#285 Y#286 F2000
G1 Z-#297 F500
G41 G1 X#281 Y#282
G3 X#287 Y#288 R[#241/2]
G3 X#289 Y#290 R[#240+[#241/2]]
G3 X#291 Y#292 R[#241/2]
G2 X#295 Y#296 R[#240-[#241/2]]
G3 X#293 Y#294 R[#241/2]
G3 X#287 Y#288 R[#240+[#241/2]]
G3 X#283 Y#284 R[#241/2]
G40 G1 X#285 Y#286
#297=#297+#280
END 3
G0 Z2.
#200=#200+1
END 1

[astarabista]

ustad kullandıgın programın adını soylermısın

[birkan66]

SİTEDE MEVCUT DU NCPLOT

http://www.ncplot.com/ncplotfree/NCPlot_v120.exe

[KAZIMUGUR]

Birde cimco edit deneyin...

[birkan66]

bu dedigin program da makroları deneyebilir miyiz.yani simule edilebilirmi.

[KAZIMUGUR]

Dene gör. ::)