2. Pavage aléatoires par superposition en jouant avec les calques. (Random tiling)
Liste de départ (invisibles)
m1=Séquence(Séquence(Cercle((i + 1, j + 1), 1), i, 0, c - 1, 2), j, 0, l - 1, 2)[br]m2=Séquence(Séquence(Cercle((i, j), 1), i, 0, c - 1, 2), j, 0, l - 1, 2)[br]l1=Aplatir(m1)[br]l2=Aplatir(m2)[br]
Script du bouton
[code]SoitVueActive(1)[br]Exécute(Séquence("S"+i+"=Element(l1,"+(i)+")", i, 1, c*l/4))[br]Exécute(Séquence("SetDynamicColor(S"+i+",74/255,0,132/255,1)", i, 1, c*l/4))[br]Exécute(Séquence("SetLayer( S"+i+",RandomBetween( 0, 2))", i, 1, c*l/4))[br]Exécute(Séquence("SetLineThickness( S"+i+",0)", i, 1, c*l/4))[br]Exécute(Séquence("C"+i+"=Element(l2,"+(i)+")", i, 1, c*l/4))[br]Exécute(Séquence("SetDynamicColor(C"+i+",250/255,236/255,216/255,1)", i, 1, c*l/4))[br]Exécute(Séquence("SetLayer( C"+i+",RandomBetween( 0, 1))", i, 1, c*l/4))[br]Exécute(Séquence("SetLineThickness( C"+i+",0)", i, 1, c*l/4))[br][/code]
