lunes, 1 de febrero de 2016

Polígono



PARAMETRIZACIÓN DE UN POLÍGONO DE "N" LADOS

(P100=7) ;NÚMERO DE LADOS
(P110=50) ;RADIO DEL CIRCULO CIRCUNSCRITO
(P120=360/P100) ;360/LADOS
(P140=180) ;ANGULO DE PARTIDA
T6D1
M6
G7 G17 G71 G94 G96
F100 S1000 M3
G90 G0 G43 Z30
G40 X-100 Y0
G1 Z0
G91 Z-1
G90
(P141=-1);inicio de cuenta
G93 I0 J0
;
N0150 G1 RP110 QP140
;BLOQUE DE MOVIMIENTO
;
(P141=P141 + 1)
;incremento de 1 en cada vértice
;
(P140=P140 - P120)
;Ángulo siguiente= ANG. ACT- ANG. INTERNO
;
;
(IF (P141LTP100) GOTO N150)
;SI NºVERTICES ES MENOR QUE EL Nº DE LADOS SALTA AL BLOQUE DE MOVIMIENTO
;
;
;
G40 X-100 Y0
G0 Z30
M30

Parábola





Realizar la parametrización necesaria para generar un movimiento parabólico en el torno 8050 

T1D1
M6
(P10=0.015);valor de K
(P1=0); Valor x inicial
(P2=50)l; valor x final
(P3=1); INCREMENTO;
;
;
;
G71 G90 G5 G18
;
G95 G97 F0.01 S1000 M3
N90 (P5= P1 * P1);X2
(P6=P10 * P5); KX2
(P7=-P6); -KX2
G1 X P1 Z P7 ; BLOQUE DE MOVIMIENTO
(P1=P1+P3); sumador de X con incremento P3
(IF P1 LT P2 GOTO N90)
G0 Z15
M30