Retour vers CoRinne et VeRo >> **[[PlanDuSiteHtml Plan du site]]** >> FacInfo >> [[LangageLogo Langage Logo]] >> [[MSWLogo MSWLogo]] ====Exemples d'utilisation de programmation avec MSWLogo==== **#R#Création de polygones#R# :** ""

Construire un carré - étape par étape

av 100

td 90

av 100

td 90

av 100

td 90

av 100

 

Commandes simples


 

 

Triangle - 3 côtés
(360° divisés par 3 = 120°)

pour triangle
répète 3 [av 100 td 120]
fin


 

 

Carré - 4 côtés
(360° divisés par 4 = 90°)

pour carré
répète 4 [av 100 td 90]
fin


 

 

Pentagone - 5 côtés
(360° divisés par 5 = 72°)

pour oentagone
répète 5 [av 100 td 72]
fin


 

 

Hexagone - 6 côtés
(360° divisés par 6 = 60°)

pour hexagone
répète 6 [av 100 td 60]
fin


 

 

Heptagone - 7 côtés
(360° divisés par 7 = 51°)

pour heptagone
répète 7 [av 100 td 51]
fin


 

 

Octogone - 8 côtés
(360° divisés par 8 = 45°)

pour octogone
répète 8 [av 100 td 45]
fin

 

Fleur - 36 carrés

pour fleur
répète 36 [td 10 carré]
fin


Commandes complexes


 

 

 Successions de carrés

pour carré :long  
répète 4 [av :long td 90]
fin

carré 10 carré 20 carré 30 carré 40
etc


 

 

 spirale 0 91

pour spirale :long :angle
si :long > 100 [stop]
av :long
td :angle
spirale :long + 2 :angle
fin


 

 

spirale 0 90

pour spirale :long :angle
si :long > 100 [stop]
av :long
td :angle
spirale :long + 2 :angle
fin

 
 

 

 poly.spirale 5 120

pour poly.spirale :long :angle si :long>205 [stop] av :long td :angle poly.spirale somme :long 5 somme :angle 0.12 fin

 

Gribouillis en couleurs

pour gribouillis
répète 4000
[fcc hasard 7
av 1 + hasard 6
fcap hasard 360]
fin

 


 

 

Arbre  en embranchements en V

pour v :long
tg 15 av :long re :long
td 30 av :long re :long tg 15
fin

pour arbre :long
si :long < 5 [stop]
tg 15 av :long v :long / 2
re :long td 30 av :long v :long / 2
re :long tg 15
arbre
fin

 

 

 

 

 

 

 

 

 

 

 

 
"" ---