madarkak(x) = x - (x - floor(x))^(2) - floor((2 * x))

Tool: Mezo
Szélesség, Magasság
Input: A, Width, Long
Output: poly1

B: A + (Width, 0)
C: A + (Width, (-Long))
D: A + (0, (-Long))
poly1 = Polygon({A, B, C, D})

Tool: fixpont
szam,szam
Input: u, v
Output: P

P: (x(Corner[4]) + (u / x(Corner[5]) * (x(Corner[3]) - x(Corner[4]))), y(Corner[4]) - (v / y(Corner[5]) * (y(Corner[4]) - y(Corner[1]))))

Tool: panelfent
szam
Input: a
Output: poligon, s

A = fixpont(0, a)
B = fixpont(x(Corner[5]), a)
s = Segment(A, B)
poligon, b, c, a_1, b_1 = Polygon(Corner[3], Corner[4], A, B)

Tool: Kereszt
Input: A, r
Output: poly1

B: A + (1, 0)
c = Circle(A, r)
a = Line(A, B)
b = OrthogonalLine(A, a)
d, e = AngularBisector(b, a)
f, g = AngularBisector(e, b)
h, i = AngularBisector(e, f)
l, m = AngularBisector(b, d)
n, p = AngularBisector(d, l)
C = Intersect(c, h, 2)
D = Intersect(c, p, 2)
t = Line(C, D)
E = Intersect(c, n, 2)
F = Intersect(c, i, 1)
G = Intersect(c, p, 1)
H = Intersect(c, h, 1)
I = Intersect(c, n, 1)
J = Intersect(c, i, 2)
d_1 = OrthogonalLine(C, t)
e_1 = OrthogonalLine(D, t)
K = Intersect(a, e_1)
L = Intersect(b, d_1)
M = Intersect(a, d_1)
N = Intersect(b, e_1)
poly1, c_2, l_1, e_2, f_2, m_1, g_2, h_1, n_1, i_1, j_1, k_1, d_2 = Polygon(C, L, E, F, M, G, H, N, I, J, K, D)

Tool: Pipa
Input: A, r
Output: poly1

B: A + (1, 0)
c = Circle(A, r)
a = Line(A, B)
b = OrthogonalLine(A, a)
d, e = AngularBisector(b, a)
f, g = AngularBisector(e, b)
h, i = AngularBisector(e, f)
l, m = AngularBisector(b, d)
n, p = AngularBisector(d, l)
F = Intersect(c, i, 1)
I = Intersect(c, n, 1)
J = Intersect(c, i, 2)
O = Intersect(c, a, 1)
P = Midpoint(A, J)
poly1, o, i_1, f_2, p_1 = Polygon(O, I, F, P)