Name
SPLINE2A
Syntax
SPLINE2A n, status,
x1, y1, alpha1, länge_vor1, länge_nach1, ...,
xn, yn, alphan, länge_vorn, länge_nachn
x1, y1, alpha1, länge_vor1, länge_nach1, ...,
xn, yn, alphan, länge_vorn, länge_nachn
n > 1, Typ Integer
0 ≥ status ≤ 3, Typ integer
xi, Typ real
yi, Typ real
alphai, Typ real
länge_vori, Typ real
länge_nachi, Typ real
0 ≥ status ≤ 3, Typ integer
xi, Typ real
yi, Typ real
alphai, Typ real
länge_vori, Typ real
länge_nachi, Typ real
status = j1+ j2
j1=0: Das Spline bleibt offen.
j1=1: Der erste und der letzte Punkt des Splines werden für eine geschlossene Figur verbunden.
j2=0: Kurvenberechnung unter Verwendung der Tangenten mit alpha.
j2=2: Die Winkelparameter alpha werden nicht verwendet. Es wird ein interner Algorithmus zur Erzeugung der Krümmung verwendet.
j1=0: Das Spline bleibt offen.
j1=1: Der erste und der letzte Punkt des Splines werden für eine geschlossene Figur verbunden.
j2=0: Kurvenberechnung unter Verwendung der Tangenten mit alpha.
j2=2: Die Winkelparameter alpha werden nicht verwendet. Es wird ein interner Algorithmus zur Erzeugung der Krümmung verwendet.
Erzeugt ein Spline (gekrümmte Linie), das durch die n (=Anzahl) Kordinatenpunkte xi/yi verläuft. Im Gegensatz zum SPLINE2 lässt sich mit SPLINE2A die Krümmung genauer angeben.
Die Neigung wird durch den Tangentenwinkel alphai in jedem Stützpunkt angegeben. Wie weit diese Tangente Einfluß auf den vorherigen oder nachfolgenden Verlauf der Kurve hat, kann durch die individuelle Angabe der Tangentenlänge mit länge_vori und länge_nachi erfolgen.
Der Parameter status lässt zwischen offenem und geschlossenem Spline, sowie automatisch geglätteter Krümmung wählen.
Die Neigung wird durch den Tangentenwinkel alphai in jedem Stützpunkt angegeben. Wie weit diese Tangente Einfluß auf den vorherigen oder nachfolgenden Verlauf der Kurve hat, kann durch die individuelle Angabe der Tangentenlänge mit länge_vori und länge_nachi erfolgen.
Der Parameter status lässt zwischen offenem und geschlossenem Spline, sowie automatisch geglätteter Krümmung wählen.
a=0.05 ! Schraubenlänge
b=0.01/2 ! Schraubenkopfdurchmesser
! Schraubenlinie
POLY2 5,1, 0,a-b, -b,a, b,a, 0,a-b, 0,0
g=b*0.7 ! Gewindebreite
l=g/9 ! Halbe Tangentenlänge
! Gewindekurven
FOR i=g TO a-b-g STEP g
SPLINE2A 5, 0,
-g/3, i-g*0.6, 140, l, l,
-g/2, i-g*0.4, 90, l, l,
0, i, 0, l*2, l*2,
g/2, i+g*0.4, 90, l, l,
g/3, i+g*0.6, 140, l, l
NEXT i
b=0.01/2 ! Schraubenkopfdurchmesser
! Schraubenlinie
POLY2 5,1, 0,a-b, -b,a, b,a, 0,a-b, 0,0
g=b*0.7 ! Gewindebreite
l=g/9 ! Halbe Tangentenlänge
! Gewindekurven
FOR i=g TO a-b-g STEP g
SPLINE2A 5, 0,
-g/3, i-g*0.6, 140, l, l,
-g/2, i-g*0.4, 90, l, l,
0, i, 0, l*2, l*2,
g/2, i+g*0.4, 90, l, l,
g/3, i+g*0.6, 140, l, l
NEXT i
LINE_TYPE, LINE_PROPERTY, PEN
2D-Skript
ab 6.0