Impossible triangle animation

Script Setup
[code]#Define points on hexagon and its center[br]#L_1 = Sequence((cos(k), sin(k)), k, 0, 2 pi, pi/3)[br]#SetVisibleInView(L_1, 1, false)[br][br]#P1 = Element(L_1, 1)[br]#P2 = Element(L_1, 2)[br]#P3 = Element(L_1, 3)[br]#P4 = Element(L_1, 4)[br]#P5 = Element(L_1, 5)[br]#P6 = Element(L_1, 6)[br][br]Execute(Zip("P"+k+" = (cos(2pi "+k+"/6), sin(2pi "+k+"/6))", k, 1...6))[br]O = (0, 0)[br][br]#Define figures[br]A1 = Polygon(O, P4, P3, P2)[br]A2 = Polygon(O, P2, P1, P6)[br]A3 = Polygon(O, P6, P5, P4)[br][br]#Define points of triangle[br]r = Slider(1, 8, 0.01, 1, 160, false, true, false, false)[br]SetValue(r, 2.66)[br][br]L_2 = Rotate(Sequence((r * cos(k), r * sin(k)), k, 0, 2π, 2π / 3), -π / 2, (0, 0))[br]SetVisibleInView(L_2, 1, false)[br][br]T1 = Element(L_2, 1)[br]T2 = Element(L_2, 2)[br]T3 = Element(L_2, 3)[br][br]d = Distance(T1, T2)[br][br]#Define vectors[br]v1 = Vector((0, 0), T3)[br]v2 = Vector((0, 0), ( x(T3) + d/3, y(T3)))[br]v3 = Vector((0, 0), ( x(T3) + 2 * d/3, y(T3)))[br][br]v4 = Vector(T3, (x(T3) + d/3, y(T3)))[br][br]t = Slider(0, 1, 0.01, 3, 160, false, true, false, false)[br][br]#Part 1[br]#Grey#[br]TA1 = Translate( Translate( A1, v1 ), t * v4 )[br]TA2 = Translate( Translate( A1, v2 ), t * v4 )[br]TA3 = Translate( Translate( A1, v3 ), t * v4 )[br]#Set layer for effect[br]SetLayer( TA1, 4 )[br]SetLayer( TA2, 4 )[br]SetLayer( TA3, 2 )[br][br]#Light Purple#[br]R1TA1 = Rotate( TA1, 2 * pi / 3, (0,0) )[br]R1TA2 = Rotate( TA2, 2 * pi / 3, (0,0) )[br]R1TA3 = Rotate( TA3, 2 * pi / 3, (0,0) )[br]#Set layer for effect[br]SetLayer( R1TA1, 1 )[br]SetLayer( R1TA2, 2 )[br]SetLayer( R1TA3, 2 )[br][br]#Purple#[br]R2TA1 = Rotate( TA1, 4 * pi / 3, (0,0) )[br]R2TA2 = Rotate( TA2, 4 * pi / 3, (0,0) )[br]R2TA3 = Rotate( TA3, 4 * pi / 3, (0,0) )[br]#Set layer for effect[br]SetLayer( R2TA1, 2 )[br]SetLayer( R2TA2, 3 )[br]SetLayer( R2TA3, 1 )[br][br]#Part 2[br]#Purple#[br]UA1 = Translate( Translate( A2, v1 ), t * v4 )[br]UA2 = Translate( Translate(A2, v2 ), t * v4 )[br]UA3 = Translate( Translate( A2, v3 ), t * v4 )[br]#Set layer for effect[br]SetLayer( UA1, 3 )[br]SetLayer( UA2, 1 )[br]SetLayer( UA3, 1 )[br][br]#Grey#[br]T1TA1 = Rotate( UA1, 2 * pi / 3, (0,0) )[br]T1TA2 = Rotate( UA2, 2 * pi / 3, (0,0) )[br]T1TA3 = Rotate( UA3, 2 * pi / 3, (0,0) )[br]#Set layer for effect[br]SetLayer( T1TA1, 1 )[br]SetLayer( T1TA2, 1 )[br]SetLayer( T1TA3, 2 )[br][br]#Light Purple#[br]T2TA1 = Rotate( UA1, 4 * pi / 3, (0,0) )[br]T2TA2 = Rotate( UA2, 4 * pi / 3, (0,0) )[br]T2TA3 = Rotate( UA3, 4 * pi / 3, (0,0) )[br]#Set layer for effect[br]SetLayer( T2TA1, 2 )[br]SetLayer( T2TA2, 0 )[br]SetLayer( T2TA3, 0 )[br][br]#Part 3[br]#Light Purple#[br]VA1 = Translate( Translate( A3, v1 ), t * v4 )[br]VA2 = Translate( Translate( A3, v2 ), t * v4 )[br]VA3 = Translate( Translate( A3, v3 ), t * v4 )[br]#Set layer for effect[br]SetLayer( VA1, 3 )[br]SetLayer( VA2, 4 )[br]SetLayer( VA3, 1 )[br][br]#Purple#[br]U1TA1 = Rotate( VA1, 2 * pi / 3, (0,0) )[br]U1TA2 = Rotate( VA2, 2 * pi / 3, (0,0) )[br]U1TA3 = Rotate( VA3, 2 * pi / 3, (0,0) )[br]#Set layer for effect[br]SetLayer( U1TA1, 3 )[br]SetLayer( U1TA2, 1 )[br]SetLayer( U1TA3, 2 )[br][br]#Grey#[br]U2TA1 = Rotate( VA1, 4 * pi / 3, (0,0) )[br]U2TA2 = Rotate( VA2, 4 * pi / 3, (0,0) )[br]U2TA3 = Rotate( VA3, 4 * pi / 3, (0,0) )[br]#Set layer for effect[br]SetLayer( U2TA1, 5 )[br]SetLayer( U2TA2, 2 )[br]SetLayer( U2TA3, 0 )[br][/code]

Information: Impossible triangle animation