A = (-0.806, 1.412)
B = (-0.626, -4.428)
C = (4.204, -2.712)
D = (1.212, 1.996)
E = (-1.9839419750594187, -1.426503282449781)
F = (4.054, 0.092)
m1 = Invert({{x(A), y(A), 1}, {x(B), y(B), 1}, {x(C), y(C), 1}})
m2: {{x(D), y(D), 1}, {x(E), y(E), 1}, {x(F), y(F), 1}}
H = ApplyMatrix(Invert[{{Element[(m1 * m2), 1, 1] - 1, Element[(m1 * m2), 2, 1]}, {Element[(m1 * m2), 1, 2], Element[(m1 * m2), 2, 2] - 1}}], ((-Element[(m1 * m2), 3, 1]), (-Element[(m1 * m2), 3, 2])))
G = 仿射中心(A, B, C, E, F, D)
I = 仿射中心(A, B, C, F, D, E)
J = 仿射中心(A, B, C, E, D, F)
K = 仿射中心(A, B, C, D, F, E)
L = 仿射中心(A, B, C, F, E, D)
c = Conic(K, G, I, J, L)
M = (-3.672, -0.556)
N = (-4.332, -1.81)
O = (-2.22, -2.558)
d = 锥线(A, B, C, M, N, O)
e = 锥线(D, E, F, M, N, O)

Tool: 仿射中心
Input: A, B, C, D, E, F
Output: H

m1 = Invert({{x(A), y(A), 1}, {x(B), y(B), 1}, {x(C), y(C), 1}})
m2: {{x(D), y(D), 1}, {x(E), y(E), 1}, {x(F), y(F), 1}}
H = ApplyMatrix(Invert[{{Element[(m1 * m2), 1, 1] - 1, Element[(m1 * m2), 2, 1]}, {Element[(m1 * m2), 1, 2], Element[(m1 * m2), 2, 2] - 1}}], ((-Element[(m1 * m2), 3, 1]), (-Element[(m1 * m2), 3, 2])))

Tool: 锥线
Input: A, B, C, D, E, F
Output: c

G = 仿射中心(A, B, C, E, F, D)
I = 仿射中心(A, B, C, F, D, E)
J = 仿射中心(A, B, C, E, D, F)
K = 仿射中心(A, B, C, D, F, E)
L = 仿射中心(A, B, C, F, E, D)
c = Conic(K, G, I, J, L)