Coding

Adding coding SetValue[Q,P_8] If[Distance[Q,V]==1,SetValue[P_8,V]] If[Distance[Q,V]==1,SetValue[V,Q]] Shuffle Button SetValue[A,P_2] SetValue[P_2,P_1] SetValue[P_1,P_7] SetValue[P_7,P_5] SetValue[P_5,P_3] SetValue[P_3,A] SetValue[B,P_8] SetValue[P_8,P_4] SetValue[P_4,P_6] SetValue[P_6,B] Well done: (Image P_9 is displayed) P_1 ≟ (0, 2) ∧ P_2 ≟ (1, 2) ∧ P_3 ≟ (2, 2) ∧ P_4 ≟ (0, 1) ∧ P_5 ≟ (1, 1) ∧ P_6 ≟ (2, 1) ∧ P_7 ≟ (0, 0) ∧ P_8 ≟ (1, 0)