<<  Binary Telegraph  >>

Telegraph  -  Using ONLY  5 bulbs      ?!??!?....

2⁰

2¹

2²

2³

2⁴

OFF

ON

ON

ON

ON

OFF

ON

OFF

OFF

OFF

RESET

a = 1 (slider from 1 to 26, step 1)
d = false
e = false
f = false
g = false
h = false
A = (-4.16, 2.44)
B = (-3.46, 3.64)
C = (-2.7, 1.98)
D = (7.34, 2.04)
E = (7.34, 3.04)
F = (16.88, 3.1)
G = (16.94, 2.18)
H = (7.42, 1.86)
I = (6.34, 1.78)
J = (-4.06, 0.78)
A_1 = (-3.02, 1.54)
B_1 = (-2.02, 1.54)
C_1 = (-2.24, 0.24)
D_1 = (7.24, 0.2)
E_1 = (7.22, 0.98)
F_1 = (16.92, 1)
G_1 = (16.96, 0.16)
H_1 = (8.68, 0.14)
I_1 = (8.72, -0.66)
J_1 = (-2.82, -0.62)
d5 = If(d ≟ true, 1, 0)
d4 = If(e ≟ true, 1, 0)
d3 = If(f ≟ true, 1, 0)
d2 = If(g ≟ true, 1, 0)
d1 = If(h ≟ true, 1, 0)
text1: "" + d1 + ""
text2: "" + d2 + ""
text3: "" + d3 + ""
text4: "" + d4 + ""
text5: "" + d5 + ""
K = (-3.62, -3.7)
L = (-3.08, -3.72)
K_1 = (-2.64, -3.74)
L_1 = (-2.1, -3.76)
K_2 = (-1.54, -3.88)
L_2 = (-1, -3.9)
K_3 = (-0.6, -3.88)
L_3 = (-0.06, -3.9)
K_4 = (0.5, -4.06)
L_4 = (1.04, -4.08)
O = (-2.88, 1.38)
P = (-2.28, -1.18)
Q = (5.52, -1.22)
R = (4.74, 1.32)
S = (1.68, 1.38)
V = (1.3, 1.36)
M = (-2.9, -1.7)
N = (5.06, -1.76)
poly2, p_2, m, n, q_2 = Polygon(P, M, N, Q)
A_2 = (5.14, 0.36)
B_2 = (6.38, 0.36)
C_2 = (6.08, -0.54)
D_2 = (15.54, -0.46)
E_2 = (15.56, -0.26)
F_2 = (25.1, -0.2)
G_2 = (25.14, -1.18)
H_2 = (15.56, -1.3)
I_2 = (15.54, -1.06)
J_2 = (5.24, -1.08)
poly1_1, a_2, b_2, c_2, d_2, e_2, f_2, g_2, h_2, i_2, j_2 = Polygon(A_2, B_2, C_2, D_2, E_2, F_2, G_2, H_2, I_2, J_2)
O_1 = (5.3, -2.14)
P_1 = (6.04, -4.44)
Q_1 = (13.84, -4.48)
R_1 = (12.9, -2.22)
S_1 = (9.84, -2.16)
T_1 = Point(i_2)
U_1 = Point(i_2)
V_1 = (9.48, -2.16)
A_3 = (5.82, 4.18)
B_3 = (7.06, 4.18)
C_3 = (6.76, 3.28)
D_3 = (16.22, 3.36)
E_3 = (16.24, 3.56)
F_3 = (25.78, 3.62)
G_3 = (25.82, 2.64)
H_3 = (16.24, 2.52)
I_3 = (16.22, 2.76)
J_3 = (5.92, 2.74)
O_2 = (5.98, 1.68)
P_2 = (6.72, -0.62)
Q_2 = (14.52, -0.66)
R_2 = (13.58, 1.6)
S_2 = (10.52, 1.66)
V_2 = (10.16, 1.66)
A_4 = (4.36, 0.42)
B_4 = (5.6, 0.42)
C_4 = (5.3, -0.48)
D_4 = (14.76, -0.4)
E_4 = (14.78, -0.2)
F_4 = (24.32, -0.14)
G_4 = (24.36, -1.12)
H_4 = (14.78, -1.24)
I_4 = (14.76, -1)
J_4 = (4.46, -1.02)
O_3 = (4.52, -2.08)
P_3 = (5.26, -4.38)
Q_3 = (13.06, -4.42)
R_3 = (12.12, -2.16)
S_3 = (9.06, -2.1)
V_3 = (8.7, -2.1)
A_5 = (4.68, 1.4)
B_5 = (5.92, 1.4)
C_5 = (5.62, 0.5)
D_5 = (15.08, 0.58)
E_5 = (15.1, 0.78)
F_5 = (24.64, 0.84)
G_5 = (24.68, -0.14)
H_5 = (15.1, -0.26)
I_5 = (15.08, -0.02)
J_5 = (4.78, -0.04)
O_4 = (4.84, -1.1)
P_4 = (5.58, -3.4)
Q_4 = (13.38, -3.44)
R_4 = (12.44, -1.18)
S_4 = (9.38, -1.12)
V_4 = (9.02, -1.12)
A_6 = (6.12, 1.62)
B_6 = (7.36, 1.62)
C_6 = (7.06, 0.72)
D_6 = (16.52, 0.8)
E_6 = (16.54, 1)
F_6 = (26.08, 1.06)
G_6 = (26.12, 0.08)
H_6 = (16.54, -0.04)
I_6 = (16.52, 0.2)
J_6 = (6.22, 0.18)
O_5 = (6.28, -0.88)
P_5 = (7.02, -3.18)
Q_5 = (14.82, -3.22)
R_5 = (13.88, -0.96)
S_5 = (10.82, -0.9)
V_5 = (10.46, -0.9)
b = true
T = (7.1, 3.4)
U = (7.12, 2)
W = (16.98, 1.96)
Z = (16.98, 3.36)
poly1, t, u, w, z = Polygon(T, U, W, Z)
M_1 = Intersect(q_2, p_2)
N_1 = (-2.72, 1.5)
W_1 = (4.86, 1.4)
Z_1 = Intersect(q_2, n)
poly3, m_1, n_1, w_1, z_1 = Polygon(M_1, N_1, W_1, Z_1)
stroke1 = AttachCopyToView(PolyLine[(0.4000000000000001, 1.5), (0.28, 1.54), (0.22000000000000003, 1.56), (0.10000000000000002, 1.62), (-0.06000000000000001, 1.68), (-0.16000000000000003, 1.76), (-0.22000000000000003, 1.8), (-0.28, 1.86), (-0.32000000000000006, 1.92), (-0.3600000000000001, 1.98), (-0.4600000000000001, 2.1), (-0.5000000000000001, 2.18), (-0.6400000000000001, 2.36), (-0.6800000000000002, 2.42), (-0.8400000000000002, 2.54), (-0.9000000000000001, 2.56), (-0.9600000000000002, 2.6), (-1.0400000000000003, 2.68), (-1.0800000000000003, 2.82), (-1.1000000000000003, 2.92), (-1.12, 3.18), (-1.12, 3.2600000000000002), (-1.12, 3.48), (-1.12, 3.58), (-0.9800000000000002, 3.7), (-0.8400000000000002, 3.8000000000000003), (-0.7800000000000001, 3.84), (-0.6400000000000001, 3.9), (-0.56, 3.92), (-0.38000000000000006, 3.96), (-0.30000000000000004, 3.98), (-0.18000000000000005, 4.0200000000000005), (0.20000000000000004, 4.04), (0.4000000000000001, 4.0600000000000005), (0.6200000000000001, 4.12), (0.7600000000000001, 4.14), (0.9400000000000002, 4.16), (1.5200000000000002, 4.24), (1.7400000000000004, 4.24), (2.2600000000000002, 4.24), (2.4200000000000004, 4.24), (2.5600000000000005, 4.24), (2.8000000000000007, 4.24), (2.9000000000000004, 4.18), (3.0400000000000005, 4.0600000000000005), (3.0800000000000005, 4), (3.1000000000000005, 3.92), (3.1600000000000006, 3.7600000000000002), (3.2400000000000007, 3.74), (3.3000000000000007, 3.7), (3.5800000000000005, 3.56), (3.7000000000000006, 3.46), (4.080000000000001, 3.02), (4.240000000000001, 2.9), (4.340000000000001, 2.8000000000000003), (4.500000000000001, 2.68), (4.580000000000001, 2.64), (4.640000000000001, 2.62), (4.760000000000001, 2.62), (4.840000000000001, 2.62), (5.140000000000001, 2.62), (5.220000000000001, 2.62), (5.380000000000001, 2.62), (5.560000000000001, 2.62), (5.6400000000000015, 2.62), (5.740000000000001, 2.62), (5.800000000000001, 2.64), (5.900000000000001, 2.66), (6.000000000000001, 2.74), (6.100000000000001, 2.74), (6.520000000000001, 2.86), (6.6400000000000015, 2.9), (6.760000000000002, 2.94), (6.880000000000002, 2.96), (6.960000000000002, 2.96), (7.080000000000001, 2.9), true], 1, (-4.460000000000001, -5.16), (22.300000000000004, 6.36), (0, 576), (1338, 0))
stroke2 = AttachCopyToView(PolyLine[(NaN, NaN), (0.4000000000000001, 1.5), (0.3400000000000001, 1.52), (0.28, 1.56), (0.20000000000000004, 1.58), (0.12000000000000002, 1.62), (0.06000000000000001, 1.6600000000000001), (0, 1.7), (-0.06000000000000001, 1.72), (-0.12000000000000002, 1.76), (-0.16000000000000003, 1.82), (-0.22000000000000003, 1.8800000000000001), (-0.28, 1.96), (-0.3400000000000001, 2.02), (-0.38000000000000006, 2.08), (-0.44000000000000006, 2.12), (-0.4800000000000001, 2.18), (-0.5200000000000001, 2.3000000000000003), (-0.5800000000000001, 2.42), (-0.6200000000000001, 2.48), (-0.6800000000000002, 2.52), (-0.7600000000000001, 2.52), (-0.8200000000000002, 2.6), (-0.8800000000000001, 2.68), (-0.9000000000000001, 2.74), (-0.9400000000000002, 2.8000000000000003), (-0.9400000000000002, 2.88), (-0.9600000000000002, 2.96), (-0.9600000000000002, 3.04), (-0.9600000000000002, 3.14), (-0.9600000000000002, 3.22), (-0.9600000000000002, 3.34), (-0.9600000000000002, 3.44), (-0.9600000000000002, 3.54), (-0.9600000000000002, 3.64), (-0.9200000000000002, 3.72), (-0.8600000000000002, 3.74), (-0.7400000000000001, 3.74), (-0.6600000000000001, 3.7600000000000002), (-0.6000000000000001, 3.7800000000000002), (-0.5200000000000001, 3.8000000000000003), (-0.4800000000000001, 3.88), (-0.4200000000000001, 3.94), (-0.3400000000000001, 3.98), (-0.28, 4), (-0.20000000000000004, 4.04), (-0.12000000000000002, 4.08), (-0.06000000000000001, 4.1), (0, 4.14), (0.08000000000000002, 4.18), (0.16000000000000003, 4.18), (0.24000000000000005, 4.18), (0.32000000000000006, 4.18), (0.4200000000000001, 4.18), (0.5000000000000001, 4.18), (0.6800000000000002, 4.18), (0.8000000000000002, 4.18), (0.8800000000000001, 4.18), (0.9600000000000002, 4.2), (1.0200000000000002, 4.22), (1.1000000000000003, 4.22), (1.1800000000000002, 4.26), (1.2400000000000002, 4.3), (1.3800000000000003, 4.32), (1.5000000000000002, 4.32), (1.5800000000000003, 4.32), (1.6600000000000004, 4.32), (1.7200000000000004, 4.34), (1.8000000000000003, 4.34), (1.8800000000000003, 4.34), (1.9800000000000004, 4.34), (2.0600000000000005, 4.34), (2.1400000000000006, 4.34), (2.24, 4.32), (2.3200000000000003, 4.26), (2.4000000000000004, 4.22), (2.5000000000000004, 4.22), (2.5800000000000005, 4.22), (2.7200000000000006, 4.22), (2.8000000000000007, 4.22), (2.880000000000001, 4.22), (2.9600000000000004, 4.22), (3.0200000000000005, 4.14), (3.1000000000000005, 4.0600000000000005), (3.1600000000000006, 4.04), (3.2200000000000006, 3.98), (3.2600000000000007, 3.9), (3.2800000000000007, 3.8200000000000003), (3.3200000000000007, 3.7600000000000002), (3.400000000000001, 3.7), (3.460000000000001, 3.66), (3.500000000000001, 3.58), (3.5200000000000005, 3.5), (3.5400000000000005, 3.4), (3.5800000000000005, 3.34), (3.6600000000000006, 3.34), (3.7800000000000007, 3.34), (3.8400000000000007, 3.3200000000000003), (3.900000000000001, 3.3000000000000003), (4.000000000000001, 3.2800000000000002), (4.080000000000001, 3.2), (4.120000000000001, 3.14), (4.180000000000001, 3.1), (4.240000000000001, 3.04), (4.300000000000001, 3), (4.360000000000001, 2.94), (4.400000000000001, 2.88), (4.440000000000001, 2.82), (4.500000000000001, 2.8000000000000003), (4.5600000000000005, 2.7800000000000002), (4.620000000000001, 2.74), (4.700000000000001, 2.68), (4.760000000000001, 2.64), (4.820000000000001, 2.6), (4.880000000000001, 2.56), (4.940000000000001, 2.54), (5.000000000000001, 2.52), (5.080000000000001, 2.52), (5.160000000000001, 2.52), (5.280000000000001, 2.52), (5.400000000000001, 2.52), (5.460000000000001, 2.5), (5.540000000000001, 2.5), (5.6400000000000015, 2.52), (5.7200000000000015, 2.56), (5.860000000000001, 2.62), (5.920000000000001, 2.68), (5.980000000000001, 2.7), (6.040000000000001, 2.74), (6.160000000000001, 2.82), (6.280000000000001, 2.88), (6.340000000000002, 2.92), (6.400000000000001, 2.94), (6.480000000000001, 2.94), (6.540000000000001, 2.9), (6.620000000000001, 2.9), (6.700000000000001, 2.9), (6.780000000000001, 2.88), (6.860000000000001, 2.88), (6.920000000000002, 2.86), (6.980000000000001, 2.84), (7.060000000000001, 2.84), true], 1, (-4.460000000000001, -4.88), (22.300000000000004, 6.36), (0, 562), (1338, 0))
stroke3 = AttachCopyToView(PolyLine[(0.38000000000000006, 1.56), (NaN, NaN), (0.38000000000000006, 1.5), (0.32000000000000006, 1.54), (0.26000000000000006, 1.56), (0.20000000000000004, 1.58), (0.14, 1.6), (0.08000000000000002, 1.62), (0, 1.7), (0, 1.78), (-0.04000000000000001, 1.84), (-0.10000000000000002, 1.9000000000000001), (-0.16000000000000003, 1.92), (-0.22000000000000003, 1.94), (-0.28, 1.96), (-0.38000000000000006, 2), (-0.4600000000000001, 2.08), (-0.5200000000000001, 2.12), (-0.5800000000000001, 2.18), (-0.6200000000000001, 2.24), (-0.6400000000000001, 2.3000000000000003), (-0.6800000000000002, 2.38), (-0.6800000000000002, 2.46), (-0.7800000000000001, 2.5), (-0.8400000000000002, 2.6), (-0.9000000000000001, 2.66), (-0.9400000000000002, 2.72), (-1.0000000000000002, 2.8000000000000003), (-1.0400000000000003, 2.86), (-1.1000000000000003, 2.9), (-1.1600000000000001, 2.92), (-1.1800000000000002, 2.98), (-1.1800000000000002, 3.06), (-1.2000000000000002, 3.12), (-1.2000000000000002, 3.2), (-1.2000000000000002, 3.3000000000000003), (-1.1800000000000002, 3.36), (-1.1400000000000001, 3.42), (-1.0800000000000003, 3.48), (-1.0000000000000002, 3.52), (-0.9200000000000002, 3.56), (-0.8600000000000002, 3.6), (-0.8000000000000002, 3.64), (-0.6800000000000002, 3.66), (-0.6400000000000001, 3.74), (-0.5800000000000001, 3.7600000000000002), (-0.4600000000000001, 3.84), (-0.4000000000000001, 3.88), (-0.3400000000000001, 3.92), (-0.28, 3.96), (-0.22000000000000003, 3.98), (-0.16000000000000003, 4), (-0.10000000000000002, 4.04), (-0.020000000000000004, 4.0600000000000005), (0.04000000000000001, 4.1), (0.10000000000000002, 4.12), (0.18000000000000005, 4.14), (0.26000000000000006, 4.14), (0.32000000000000006, 4.16), (0.38000000000000006, 4.18), (0.4800000000000001, 4.2), (0.56, 4.2), (0.6400000000000001, 4.2), (0.7200000000000002, 4.2), (0.8400000000000002, 4.22), (0.9600000000000002, 4.22), (1.1000000000000003, 4.22), (1.2400000000000002, 4.22), (1.3200000000000003, 4.22), (1.4000000000000004, 4.22), (1.4800000000000002, 4.2), (1.5600000000000003, 4.18), (1.6600000000000004, 4.14), (1.7600000000000002, 4.12), (1.8600000000000003, 4.14), (2.0200000000000005, 4.16), (2.1000000000000005, 4.16), (2.2000000000000006, 4.16), (2.3000000000000003, 4.16), (2.3800000000000003, 4.2), (2.4800000000000004, 4.24), (2.5400000000000005, 4.26), (2.6200000000000006, 4.28), (2.7000000000000006, 4.3), (2.8000000000000007, 4.32), (2.9000000000000004, 4.32), (2.9600000000000004, 4.3), (3.0600000000000005, 4.26), (3.1400000000000006, 4.2), (3.1800000000000006, 4.14), (3.2200000000000006, 4.08), (3.2800000000000007, 4.0200000000000005), (3.3200000000000007, 3.96), (3.3600000000000008, 3.9), (3.400000000000001, 3.8200000000000003), (3.460000000000001, 3.7600000000000002), (3.480000000000001, 3.68), (3.5200000000000005, 3.6), (3.5400000000000005, 3.5), (3.6000000000000005, 3.44), (3.6600000000000006, 3.4), (3.7400000000000007, 3.38), (3.8000000000000007, 3.34), (3.8200000000000007, 3.2), (3.900000000000001, 3.06), (3.940000000000001, 3), (3.980000000000001, 2.94), (4.040000000000001, 2.92), (4.120000000000001, 2.92), (4.180000000000001, 2.9), (4.260000000000001, 2.88), (4.320000000000001, 2.86), (4.440000000000001, 2.86), (4.540000000000001, 2.84), (4.620000000000001, 2.82), (4.700000000000001, 2.8000000000000003), (4.760000000000001, 2.7600000000000002), (4.820000000000001, 2.72), (4.900000000000001, 2.68), (4.920000000000001, 2.62), (5.000000000000001, 2.62), (5.160000000000001, 2.58), (5.220000000000001, 2.56), (5.300000000000001, 2.54), (5.380000000000001, 2.52), (5.460000000000001, 2.52), (5.600000000000001, 2.52), (5.7200000000000015, 2.48), (5.820000000000001, 2.48), (5.940000000000001, 2.5), (6.060000000000001, 2.54), (6.120000000000001, 2.58), (6.1800000000000015, 2.6), (6.260000000000002, 2.64), (6.340000000000002, 2.68), (6.420000000000001, 2.72), (6.480000000000001, 2.74), (6.560000000000001, 2.7800000000000002), (6.6800000000000015, 2.84), (6.760000000000002, 2.86), (6.860000000000001, 2.86), (6.940000000000001, 2.86), (7.020000000000001, 2.86), (7.100000000000001, 2.86), true], 1, (-4.460000000000001, -4.88), (22.300000000000004, 6.36), (0, 562), (1338, 0))
b1 = If(a ≟ 1 ∨ a ≟ 3 ∨ a ≟ 5 ∨ a ≟ 7 ∨ a ≟ 9 ∨ a ≟ 11 ∨ a ≟ 13 ∨ a ≟ 15 ∨ a ≟ 17 ∨ a ≟ 19 ∨ a ≟ 21 ∨ a ≟ 23 ∨ a ≟ 25, 1, 0)
b2 = If(a ≟ 2 ∨ a ≟ 3 ∨ a ≟ 6 ∨ a ≟ 7 ∨ a ≟ 10 ∨ a ≟ 11 ∨ a ≟ 14 ∨ a ≟ 15 ∨ a ≟ 18 ∨ a ≟ 19 ∨ a ≟ 22 ∨ a ≟ 23 ∨ a ≟ 26, 1, 0)
b3 = If(a ≟ 4 ∨ a ≟ 5 ∨ a ≟ 6 ∨ a ≟ 7 ∨ a ≟ 12 ∨ a ≟ 13 ∨ a ≟ 14 ∨ a ≟ 15 ∨ a ≟ 20 ∨ a ≟ 21 ∨ a ≟ 22 ∨ a ≟ 23, 1, 0)
b4 = If(a ≟ 8 ∨ a ≟ 9 ∨ a ≟ 10 ∨ a ≟ 11 ∨ a ≟ 12 ∨ a ≟ 13 ∨ a ≟ 14 ∨ a ≟ 15 ∨ a ≟ 24 ∨ a ≟ 25 ∨ a ≟ 26, 1, 0)
b5 = If(a > 15, 1, 0)
text14: "" + b5 + ""
text15: "" + b2 + ""
text16: "" + b3 + ""
text17: "" + b4 + ""
text18: "" + b1 + ""
M_2 = (-2.34, -3.02)
N_2 = (4.84, -3.06)
c = Segment(M_2, N_2)
T_2 = (4.84, -1.88)
i = Segment(N_2, T_2)
U_2 = (-2.38, -1.96)
j = Segment(T_2, U_2)
k = Segment(U_2, M_2)
W_2 = Point(j)
Z_2 = Point(c)
l = Segment(W_2, Z_2)
M_3 = Point(j)
N_3 = Point(c)
p = Segment(M_3, N_3)
T_3 = Point(j)
U_3 = Point(c)
q = Segment(T_3, U_3)
W_3 = Point(j)
Z_3 = Point(c)
r = Segment(W_3, Z_3)
poly4, u_2, m_2, n_2, t_2 = Polygon(U_2, M_2, N_2, T_2)
M_4 = Point(j)
o: d1 * 16 + d2 * 8 + d3 * 4 + d4 * 2 + d5
text13: "⇒(" + d1 + ")2⁴+(" + d2 + ")2³+(" + d3 + ")2²+(" + d4 + ")2¹+(" + d5 + ")2⁰
= (" + d1 + ")16+(" + d2 + ")8+(" + d3 + ")4+(" + d4 + ")2+(" + d5 + ")1
=" + o + ""