• Home
  • Chimie
  • Astronomie
  • Énergie
  • La nature
  • Biologie
  • Physique
  • Électronique
  • Comment créer un système solaire à Mswlogo?
    `` MSLOGO

    ; 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.

    © Science https://fr.scienceaq.com