Modifié le 31 Décembre 2007 à 15 h 22
#@AUTEUR: Thomas Labarussias
startshape illusion_droites // declaration de la regle principale
//le code est dispose dans l'ordre des operations
rule base
// sert a creer la ligne initiale
{
13*{x 2} SQUARE {s 2 b 0}
// cree un carre noir de dimension 2*2 qui est duplique
// 13 fois en decalant de 2 sur x chaque duplicatat
10*{x 4} SQUARE {x 2 s 1.9 b 1}
// cree un carre blanc de dimension 1.9*1.9 a la position
// x = 2 puis le duplique avec un decalage de 4 sur x
// a chaque fois (10 fois)
}
rule clone
//duplique la ligne cree par la regle base
{
2*{x 0.9 y 1.9} base{}
// duplique la ligne formee precedemment, la copie etant decalee
//de 0.9 sur x et de 1.9 sur y
}
rule illusion_droites
// regle principale (duplique les deux lignes precedentes)
{
4*{y 3.8} clone{}
//copie la double ligne obtenue 4 fois en decalant de 3.8 sur y a chaque iteration
}
// complements :
// b 0 -> brigthness 0 -> couleur noire
// b 1 -> brigthness 1 -> couleur blanche