---

Hallo zusammen,

ich habe eine kleine Frage:
In einem Knowledge Pattern habe ich die folgende Funktion erzeugt (Punkt auf Kurve mit Abstand):

pt = pointoncurve(reference\Parallel.1 ,`reference\Point.Start` , 100 , true)

Ziel ist es jedoch, einen Punkt auf der Kurve (Parallel.1) mit einem definierten "absoluten" Abstand zum "Point.Start" zu erzeugen.
In der normalen Punktfunktion kann man dies mittels der Option "Euclidean" erzielen. Geht dies auch im Knowledge Pattern?

Danke und Gruß,
Marco

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hat keiner eine Idee, wie man einen Punkt auf der Kurve mit einem direkten Abstand zu einem anderen Punkt auf der Kurve erzeugt (und nicht mit "Kurvenlängen-Abstand")?

Gruß,
Marco

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

test_iterative_point_KWPattern.zip point_on_curve_iteration.png

Hallo zusammen,

zur Info:
Ich habe mir mit einer Iteration beholfen. Das ist zwar immer noch nicht genau, aber genauer als vorher.
Vielleicht ist das ja brauchbar, daher stell ich mal den Knowledge Pattern Code ein.

Gruß,
Marco

let i (integer)

let pt (point)
let pt2 (point)
let ln (line)
let crv (curve)

let spacing (length)
let dist (length)
let distReal (real)
let distInt (integer)
let spacingInt (Integer)
let iteration (length)

spacing = Spacing_Vorgabe

pt = CreateOrModifyDatum("Point", `Geometrical Set.1`  ,`Relations\Knowledge Pattern.1\Points`  , 1 )
pt = pointoncurve(`Geometrical Set.1\Project.1`  ,`Geometrical Set.1\Point.1` , spacing , true)
pt.Name = "Point_Spacing.1"
pt.Show = True

Distance_Points_First_Iteration  = distance(`Geometrical Set.1\Point.1` ,`Geometrical Set.1\Point_Spacing.1` )
Distance_Points_Last_Iteration  = distance(`Geometrical Set.1\Point.1` ,`Geometrical Set.1\Point_Spacing.1` )

distReal = round(Distance_Points_First_Iteration/1mm )
distInt = int(distReal)

spacingInt =int(Spacing_Vorgabe/1mm)

i = 2
for  distInt  while  distInt < spacingInt  {
pt = CreateOrModifyDatum("Point", `Geometrical Set.1`  ,`Relations\Knowledge Pattern.1\Points`  , i )
pt = pointoncurve(`Geometrical Set.1\Project.1`  ,`Geometrical Set.1\Point.1` , spacing + (i-1)*Iteration_Value , true)
pt.Name = "Point_Spacing_ITERAT."+ ToString(i)
pt.Show = False

pt2 = `Relations\Knowledge Pattern.1\Points` .GetItem(i)
Distance_Points_Last_Iteration = distance(`Geometrical Set.1\Point.1` ,pt2)
distReal = round(Distance_Points_Last_Iteration/1mm )
distInt = int(distReal)
i=i+1

}
Number_of_Iterations = i-1
pt.Name = "Point_Spacing_Final"
pt.Show = True

[Diese Nachricht wurde von mvo am 01. Jul. 2014 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP