Параметрическое программирование звёздочки для приводных цепей. Программа под видео.

Программа для обработки на ЧПУ звёздочек с любым количеством зубьев, для любого шага и диаметра роликов цепи. % O00003(ZVEZDOCHKA GOST591-69) (X0Y0- PO CENTRU) (Z0- OT BAZY) #101=32(CHISLO ZUBIEV) #102=7.75(DIAMETR ROLIKA) (5 6.35 7.75 8.51 10.16 11.91 15.88 19.05 22.23 25.4 28.58 39.68) #103=12.7(SHAG CEPI) (8 9.525 12.7 15.875 19.05 25.4 31.75 38.1 44.45 50.8 63.5) #104=1(NOMER INSTRUMENTA) #105=#103/#102 IF[[1.4LE#105]AND[#105LT1.5]]#106=0.48 IF[[1.5LE#105]AND[#105LT1.6]]#106=0.532 IF[[1.6LE#105]AND[#105LT1.7]]#106=0.555 IF[[1.7LE#105]AND[#105LT1.8]]#106=0.575 IF[[1.8LE#105]AND[#105LT2]]#106=0.565 #107=#103/SIN[180/#101](DELITELNIY DIAMETR) #108=#103*[#106+1/TAN[180/#101]](DIAMETR VYSTUPOV max) #109=#102*0.5025+0.05(RADIUS VPADIN) #110=55-60/#101(POLOVINA UGLA VPADINY A) #111=18-56/#101(UGOL SOPRIAJEIA B) #112=#102*0.8+#109(RADIUS SOPRIAJENIA) #113=[90-#110-#111](90-A-B) #114=0.8*#102*SIN[#110](X1) #115=0.8*#102*COS[#110](Y1) #116=#102*[1.24*SIN[#113-180/#101]-0.8*SIN[#111]](priamoy FC) #117=1.24*#102*COS[180/#101](X2) #118=1.24*#102*SIN[180/#101](Y2) #119=#102*[1.24*COS[#113-180/#101]+0.8*COS[#111]-1.3025]-0.05(R2) M97P1 T#104M06(FREZA KONC.) (D=R) G00G90G54X0Y-[10+#108/2+#109]M08 G43H#104D#104Z50.M03 S1200 F72. Z2. G01Z0 Y-#107/2 G41X#109 G03X[-#109*SIN[#110]]Y[-#107/2+[#109*COS[#110]]]I-#109 #100=0 WHILE[#100LE[#101-1]]DO1 #127=[#114-#112*COS[#113]] #129=[-#107/2-[#115-#112*SIN[#113]]] M97P2 G03X#128Y#129R#112 #127=[#114-#112*COS[#113]-#116*SIN[#113]] #129=[-#107/2-[#115-#112*SIN[#113]]-#116*COS[#113]] M97P2 G01X#128Y#129 #127=[[#120+#125*[#107/2-#118]]/[-#117]] #129=#125 M97P2 G02X#128Y#129R#119 #126=[[360-[#101*ATAN[[[#120+#125*[#107/2-#118]]/[-#117]]/#125]]]/#101] #127=[-#108*SIN[#126]/2] #129=[-#108*COS[#126]/2] M97P2 X#128Y#129R[#108/2] #100=#100+1 M97P2 #127=[#112*COS[#113]-#114+#116*SIN[#113]] #129=[-#107/2-[#115-#112*SIN[#113]]-#116*COS[#113]] M97P2 G02X#128Y#129R#119 #127=[#112*COS[#113]-#114] #129=[-#107/2-[#115-#112*SIN[#113]]] M97P2 G01X#128Y#129 #127=[#109*SIN[#110]] #129=[-#107/2+[#109*COS[#110]]] M97P2 G03X#128Y#129R#112 #127=[-#109*SIN[#110]] #129=[-#107/2+[#109*COS[#110]]] M97P2 G03X#128Y#129R#109 END1 G03X-#109Y[-#107/2]I[#109*SIN[#110]]J[-[#109*COS[#110]]] G01G40X0 G69 G00G90Z100.M09 M05 G00G91G28Z0 M30 N1(PERESECHENIE OKR.) #120=[#119*#119-#117*#117-[#107/2-#118]*[#107/2-#118]-#108*#108/4]/[-2] #121=[#117*#117+[#107/2-#118]*[#107/2-#118]] #122=[2*[#107/2-#118]*#120] #123=[#120*#120-#117*#117*#108*#108/4] #124=SQRT[#122*#122-4*#121*#123] #125=[[-#122-#124]/[2*#121]] M99 N2(POVOROT) #128=[#127*COS[-#100*360/#101]-#129*SIN[-#100*360/#101]](X) #129=[#127*SIN[-#100*360/#101]+#129*COS[-#100*360/#101]](Y) M99 %