Juguete móvil

Compuesto por dos poleas fijas y dos que se desplazan el interior del cochecito.   

El sistema se acciona al mover el punto P a izquierda y derecha.

Animación

SI

NO

SI

NO

Desplazamiento
  manual de P

SI

NO

SI

NO

Desplazamiento manual

c = 0.8 (slider from 0.2 to 2, step 0.1)
o = 12 (slider from 1 to 12, step 0.1)
mx = -5.029486249724106
my = 1.9859710154887524
P1: (mx + o, my + (2 * c))
O: (mx, my)
a = 2.4 (slider from 0.2 to 3, step 0.1)
A1: (mx + 1, my + a)
A2: A1 + (o - 4, 0)
f_1 = Circle(O, a)
t = 5.533 (slider from 0 to o - 2, step 0.001)
BB: A2 - (t / (o - 4) * (A2 - A1)) + (3, (-a))
EE: BB + ((2 * c), (-2 * c))
R: EE
Q: BB
b = 0.8 (slider from 0.2 to 2, step 0.1)
p = Circle(P1, b)
j, l, m, n = Tangent(f_1, p)
Intersect(-223.99999999999935x² - 59.999999999999844x y - 2.9999999999999902y² - 1918.0515789470687x - 261.0533488905131y = 4101.438296744365, f_1)
F = Intersect(f_1, n, 1)
CC = Intersect(p, l, 1)
q = Segment(F, CC)
s = OrthogonalLine(O, q)
M = Intersect(f_1, s, 1)
i_1 = OrthogonalLine(EE, q)
e = 0.8 (slider from 0.2 to 2, step 0.1)
g_1 = Circle(Q, e)
f = 0.8 (slider from 0.2 to 3, step 0.1)
k_1 = Circle(R, f)
L = Intersect(k_1, i_1, 1)
q_1 = Line(L, M)
f_2, g_2, h_2, i_2 = Tangent(g_1, k_1)
Intersect(-2.9999999999999947x² + 7.99999999999999x y - 2.999999999999993y² - 4.062685622254655x - 2.7842839092746474y = -5.922368418215778, g_1)
U = Intersect(g_2, q_1)
u = 1.9 (slider from 0 to 5, step 0.1)
T: U + (0, (2 * a))
T3: T - (0, 1)
d = 1 (slider from 0.2 to 2, step 0.1)
α: t
B1: P1 + (1, 0)
i = Ray(P1, 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)
k1 = 0 (slider from 0 to 1, step 1)
nada = 4.5 (slider from -5 to 5, step 0.1)
fab: a / b
O1: O + (a, 0)
P1_1: P1 + (b, 0)
A = Rotate(O1, (-α), O)
g = Segment(O, A)
β: (fab * α)
B = Rotate(P1_1, (-β), P1)
h = Segment(P1, B)
DD_1 = Intersect(p, m, 1)
E = Intersect(f_1, m, 1)
texto1a: "OA = " + a + ""
texto1b: "PB = " + b + ""
N = (-3.8048484848484843, 6.610216450216449)
h_1 = Ray(P1, B)
fac: (fab * c / d)
γ: (fac * α)
G1: Q + (d, 0)
C = Rotate(G1, γ, Q)
t_1 = Ray(Q, C)
C' = Intersect(g_1, t_1, 1)
a_1 = Segment(Q, C)
b_1 = Segment(C, C')
DD = Intersect(g_1, i_2)
G = Intersect(k_1, i_2)
R_1 = Intersect(k_1, h_2)
S = Intersect(g_1, h_2)
H1: R + (f, 0)
faf: (fac * e / f)
δ: (α * faf)
D = Rotate(H1, (-δ), R)
l_2 = Segment(R, D)
texto3: "PB' = " + c + ""
texto4: "QC = " + d + ""
texto5: "QC' = " + e + ""
texto6: "RD = " + f + ""
P: A1 + (t / (o - 2) * (A2 - A1))
r = OrthogonalLine(BB, q)
O' = Mirror(O, q)
O'_1 = Mirror(O, q)
j_1 = OrthogonalLine(P1, q)
H = Intersect(p, j_1, 1)
I = Intersect(g_1, r, 2)
J = Intersect(g_1, r, 1)
K = Intersect(k_1, i_1, 2)
l_1 = Segment(M, L)
m_1 = Segment(K, J)
n_1 = Segment(I, H)
c_1 = CircleArc(O, F, M)
d_1 = CircleArc(EE, L, K)
e_1 = CircleArc(BB, I, J)
p_1 = CircleArc(P1, H, CC)
r_1 = Line(T, I)
u1 = 3.6 (slider from 0 to 5, step 0.1)
u2 = 2 (slider from 2 to 5, step 0.1)
T2: T3 + (u, 0)
U1: U + ((1.5 * u1), 0)
U2: U - (u1, 0)
U3: U + (u2, 0)
U4: U - (u2, 0)
V = Midpoint(U3, U1)
s_1 = OrthogonalLine(U2, f_2)
j_2 = OrthogonalLine(V, f_2)
k_2 = OrthogonalLine(U1, q_1)
W: U1 + (0, 1.5)
Z: U3 + (1.2, 2)
A_1: U2 + (0, (2 * a) - 3)
T1: T3 - (u, 0)
polígono1, u2_1, a_2, t1, t2, z_1, w, u1_1 = Polygon(U2, A_1, T1, T2, Z, W, U1)
c_2 = Circle(U4, c)
d_2 = Circle(V, c)
m_2 = Segment(F, A1)
n_2 = Segment(CC, A2)
p_2 = Segment(A2, A1)
q_2 = Line(O, n)
r_2 = Segment(Q, C')
texto1e: "Vel animación: " + d1 + ""