pour tire_couleur
bidon.fcouleur (liste hasard 256 hasard 256 hasard 256)
endOn doit utiliser les parenthèses rondes () lorsque le rapporteur a plus de deux paramètres.pour coul_aléat :c
lc
tire_couleur
repete 4[av :c+2 peins re :c+2 dr 90]
dr 45
tire_couleur
repete 4[av :c+2 peins re :c+2 dr 90]
dr 22.5
tire_couleur
repete 4[av 4 peins re 4 dr 90]
dr 45
tire_couleur
repete 4[av 4peins re 4 dr 90]
tire_couleur
repete 4[av 2*:c peins re 2*:c dr 90]
dr 45
tire_couleur
repete 4[av 2*:c peins re 2*:c dr 90]
fcap 0
end
pour rosace_aléat :c
bc
repete 8 [octogone :c dr 45]
coul_aléat :c
end
pour au_boulot_ter
rosace_aléat premier boitequestion [Côté] [Longueur du côté ?]
end
pour début_ter
ct
bouton.crée "Ecran [rosace] [Tracer rosace] -360 -40 120 25 [au_boulot_ter]
bouton.crée "Ecran [effacer] [Effacer] -360 -75 120 25 [vg]
origine
end