; Définissez les planètes et leurs propriétés
à la planète:Nom:Taille:Couleur:Distance:Orbitspeed
setpos [0 0]
pénotage
en avant:distance
penndown
Setheading 0
répéter 360 [
Forme:Taille * 0,5
Retour:taille * 0,5
Droite:Orbitspeed
]]
Setheading 0
Forme:Taille * 0,5
pénotage
Retour:taille * 0,5
penndown
Setheading:orbitspeed
Forme:Taille * 0,5
pénotage
Retour:taille * 0,5
penndown
Setheading 0
cercle:taille
pénotage
setpos [0 0]
penndown
Setheading 0
en avant:distance
penndown
Setheading:orbitspeed
cercle:taille
pénotage
setpos [0 0]
penndown
étiquette:nom
pénotage
setpos [0 0]
penndown
Setheading 0
fin
; Tracer le soleil
cercle 50
Setheading 0
pénotage
avant 50
penndown
Setheading 0
Étiqueter "Soleil"
pénotage
setpos [0 0]
penndown
; Dessiner du mercure
planète "mercure" 5 "gris" 70 2
; Dessiner Vénus
planète "Vénus" 8 "jaune" 90 1.5
; Dessiner la terre
planète "terre" 10 "bleu" 110 1
; Dessiner Mars
planète "Mars" 7 "rouge" 130 0,8
; Dessiner Jupiter
planète "Jupiter" 20 "orange" 160 0,5
; Dessiner Saturne
planète "Saturne" 18 "jaune" 200 0,3
; Dessiner Uranus
planète "Uranus" 15 "bleu clair" 250 0,2
; Dessiner Neptune
planète "Neptune" 14 "bleu foncé" 300 0,15
`` '
Explication:
1. `Planet` Procédure: Cette procédure définit les propriétés de la planète:
- «:Nom`:Nom de la planète (utilisé pour l'étiquetage).
- «:Taille»:taille de la planète en pixels.
- `:Couleur`:couleur de la planète.
- «:Distance»:distance entre le soleil en pixels.
- `:Orbitspeed`:vitesse de l'orbite en degrés par étape (contrôle à quelle vitesse la planète se déplace).
2. dessin le soleil:
- «Circle 50» dessine le soleil comme un cercle avec un rayon de 50 pixels.
- `Setheading 0` définit la direction de la tortue à 0 degrés (horizontal).
- «Penup» soulève le stylo pour empêcher le dessin tout en se déplaçant.
- «Forward 50» déplace la tortue vers l'avant de 50 pixels vers la droite.
- «Pendown» met le stylo pour commencer à dessiner.
- `Setheading 0` réduit à nouveau la direction de la tortue à 0 degrés.
- `Label" Sun "` écrit le label "Sun" à la position actuelle.
- «Penup» soulève le stylo pour passer à l'origine.
- `Setpos [0 0]` Retmenez la tortue à l'origine.
- «Pendown» met le stylo pour tirer.
3. dessin les planètes:
- Pour chaque planète, la procédure «Planet» est appelée avec les propriétés appropriées.
- La boucle `répéter 360` dessine le chemin d'orbite.
- À l'intérieur de la boucle, la tortue avance et vers l'arrière, créant un petit segment de ligne.
- «À droite:Orbitspeed» fait pivoter la tortue par la vitesse d'orbite, ce qui fait bouger la planète en cercle.
- La planète est dessinée avec la couleur et la taille spécifiées.
exécuter le code:
1. Enregistrez ce code dans un fichier nommé "Solar_System.lg" (ou tout autre nom).
2. Ouvrez Mswlogo et chargez le fichier en tapant `Charge" Solar_System.lg "`.
3. Exécutez le code en tapant «Run».
Cela créera une représentation visuelle de base du système solaire. Vous pouvez modifier le code pour personnaliser les couleurs, les tailles, les distances et les vitesses d'orbite des planètes. Vous pouvez également ajouter des fonctionnalités supplémentaires telles que les lunes, les comètes ou les astéroïdes.