Alimentación intermitente

Basado en el cuadrilátero articulado que se utilizaba para pasar la película fotograma a fotograma. El movimiento circular uniforme de C alrededor de B se transforma en la curva que describe el punto F, que engancha y suelta la película a intervalos constantes.

Animación

SI

NO

SI

NO

Rastro 

SI

NO

SI

NO

Mueve C

b_3 = 0.17 (slider from 0 to 1, step 0.01)
o = 0.3 (slider from 0 to 1, step 0.1)
c = 5 (slider from 4.5 to 5.5, step 0.1)
b = 0.8999999999999999 (slider from 0.7 to 1.3, step 0.01)
a = 4.9999999999999964 (slider from 4.5 to 5.5, step 0.1)
α = 4.743804906920587 rad (slider from 0° to 360°, step 0.1°)
A = (-2.370390607154125, 2.311574563558548)
ex: x(A)
f = Circle(A, a)
B = Point(f)
B1: B + (b, 0)
C = Rotate(B1, α, B)
e = Circle(C, c)
d = 2 (slider from 1 to 5.5, step 0.1)
s = Circle(A, d)
D = Intersect(s, e, 2)
n = 2 (slider from 0 to 5, step 0.1)
p = Circle(B, b)
i = Ray(B, B1)
C1 = Intersect(p, i, 1)
c_1 = 2.0625 (slider from 0 to 5, step 1.0E-4)
k = 0 (slider from 0 to 1, step 1)
v = 0 (slider from 0 to 1, step 0.1)
d1: (10 * v)
texto1e: "Velocidad animación: " + d1 + ""
k1 = 1 (slider from 0 to 1, step 1)
t = 0.808 (slider from 0 to 1, step 0.001)
nada = 0.5 (slider from -5 to 5, step 0.1)
texto3: "CD = " + c + ""
texto1b: "BC = " + b + ""
texto1a: "AB = " + a + ""
texto4: "DA = " + d + ""
j = Segment(A, B)
g = Segment(A, D)
h = Segment(D, C)
l = Segment(C, B)
u = 0.24 (slider from 0 to 1, step 0.01)
w = 0.7 (slider from 0 to 1, step 0.1)
a_1 = 5 (slider from 1 to 5, step 0.1)
b_1 = 2.2 (slider from 1 to 5, step 0.1)
b_2 = 1 (slider from 0 to 1, step 0.1)
m = Ray(C, D)
q = 8 (slider from 1 to 12, step 0.1)
r = Circle(C, q)
E = Intersect(r, m, 1)
lugar1 = Locus(E, α)
F1 = (-1.5563817369796404, 3.5235433258183306)
G = (2.8211770759586923, 1.31667483334529)
f_1 = Segment(F1, G)
g_1 = OrthogonalLine(E, m)
aa = 0.8 (slider from 0 to 1, step 0.1)
c_1 = Circle(E, aa)
H = Intersect(c_1, g_1, 1)
h_1 = Segment(E, H)
i_1 = Segment(D, E)
F: H