1. Pavage aléatoires par superposition en jouant avec les calques. (Random tiling)
V2
Bouts de code:
Éléments cachés:
m1=Séquence(Séquence(Cercle((i + 1, j + 1), 1), i, 0, c - 1, 2), j, 0, l - 1, 2)
m2=Séquence(Séquence(Cercle((i, j), 1), i, 0, c - 1, 2), j, 0, l - 1, 2)
l1=Aplatir(m1)
l2=Aplatir(m2)
script du bouton:
Exécute(Séquence("S"+i+"=Element(l1,"+(i)+")", i, 1, c*l))
Exécute(Séquence("SetDynamicColor(S"+i+",0,0,0,1)", i, 1, c*l))
Exécute(Séquence("SetLayer( S"+i+",RandomBetween( 0, 2))", i, 1, c*l))
Exécute(Séquence("SetLineThickness( S"+i+",0)", i, 1, c*l/4))
Exécute(Séquence("C"+i+"=Element(l2,"+(i)+")", i, 1, c*l))
Exécute(Séquence("SetDynamicColor(C"+i+",1,1,1,1)", i, 1, c*l))
Exécute(Séquence("SetLayer( C"+i+",RandomBetween( 0, 1))", i, 1, c*l))
Exécute(Séquence("SetLineThickness( C"+i+",0)", i, 1, c*l/4))
V2 (PNG)
V1
Bouts de code:
m1=Séquence(Séquence(Cercle((i + 1, j + 1), 1), i, 0, c - 1, 2), j, 0, l - 1, 2)
m2=Séquence(Séquence(Cercle((i, j), 1), i, 0, c - 1, 2), j, 0, l - 1, 2)
l1=Aplatir(m1)
l2=Aplatir(m2)
Exécute(Séquence("S"+i+"=Element(l1,"+(i)+")", i, 1, c*l/4))
Exécute(Séquence("SetDynamicColor(S"+i+",0,0,0,1)", i, 1, c*l/4))
Exécute(Séquence("SetLayer( S"+i+",RandomBetween( 0, 2))", i, 1, c*l/4))
Exécute(Séquence("C"+i+"=Element(l2,"+(i)+")", i, 1, c*l/4))
Exécute(Séquence("SetDynamicColor(C"+i+",1,1,1,1)", i, 1, c*l))
Exécute(Séquence("SetLayer( C"+i+",RandomBetween( 0, 1))", i, 1, c*l/4))
