Design eines Buchstaben
Author: Markus Hohenwarter
Date: March 3, 2008

Verwenden Sie die Werkzeuge für Strecken und Bezierkurven, um den Umriss eines Buchstaben zu designen.

A = (0.8927569498594621, 0.7904350711958373)
B = (0, 2)
C = (-2.0849387098839056, 0.749078187032735)
D = (-0.7201615325015288, -0.243487032881721)
loc1 = Bezier3(A, B, C, D)
E = (0.6170443887721132, -1.2222666247418095)
F = (0.5756875046090109, -2.6008294301785537)
G = (-1.6024417279810452, -1.7736917469165072)
loc2 = Bezier3(D, E, F, G)
a = Segment(C, D)
b = Segment(D, E)
c = Segment(B, A)

Tool: Quadratische Bézierkurve (command Bezier2)
Drei Punkte
Input: A, B, C
Output: loc1

a = Segment(A, B)
b = Segment(B, C)
D = Point(a)
c = Line(D, b)
d = Segment(A, C)
E = Intersect(c, d)
e = Line(E, a)
F = Intersect(b, e)
f = Segment(D, F)
g = Line(A, f)
G = Intersect(c, g)
h = Segment(B, G)
I = Intersect(f, h)
loc1 = Locus(I, D)

Tool: Kubische Bézierkurve (command Bezier3)
Vier Punkte
Input: A, B, C, D
Output: c

a = Segment(A, B)
E = Point(a)
t: Distance[A, E] / a
F: B + t * (C - B)
H: E + t * (F - E)
G: C + t * (D - C)
I: F + t * (G - F)
J: H + t * (I - H)
c = Locus(J, E)