#######################################################################################################################################
# #
# V I S U A L I S A T I O N D E S P L A N E T E S D U S Y S T E M E S O L A I R E A L ' E C H E L L E : #
# #
# #
# Author of '$xiirk/.NCOS.71.1.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, 20191217102224). #
# #
#######################################################################################################################################
$Z setParam _____Dct 3750
$Z setParam _____PasTempsPeriode 1
$Z setParam _____Zoom 0.02
$Z setParam _____FacteurRayon 44000
$Z setParam _____Zoom 1.30
$Z setParam _____TransX 0
$Z setParam _____TransY -280e+11
$Z set NcorpsS=10
$Z FilSTmpB FPlAnEtEs
$Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\
$Z $DELETE $Fl ; \\
$Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\
$Z unset Fl Li'
$Z set CoOrD_Y=+70e+12
$Z set CoOrD_Z=+1e3
$Z genere $FPlAnEtEs$COORD_X \
$Z +1e3 -600e+11 -450e+11 \
$Z -300e+11 \
$Z -150e+11 +1e3 +150e+11 +300e+11 +450e+11 +600e+11
$Z genere $FPlAnEtEs$COORD_Y \
$Z +1e3 $CoOrD_Y $CoOrD_Y \
$Z $CoOrD_Y \
$Z $CoOrD_Y $CoOrD_Y $CoOrD_Y $CoOrD_Y $CoOrD_Y $CoOrD_Y
$Z genere $FPlAnEtEs$COORD_Z \
$Z $CoOrD_Z \
$Z $CoOrD_Z $CoOrD_Z $CoOrD_Z \
$Z $CoOrD_Z $CoOrD_Z $CoOrD_Z $CoOrD_Z $CoOrD_Z $CoOrD_Z
$Z genere $FPlAnEtEs$RAYON \
$Z 1390.0e6 4.88e6 12.103e6 \
$Z 12.7560e6 \
$Z 6.794e6 142.984e6 120.536e6 51.118e6 49.532e6 2.2740e6
$Z # ATTENTION : on notera qu'en fait il s'agit ici des diametres des differents corps du #
$Z # Systeme Solaire ('v $xrr/N_corps.11$K Diametre'), mais cela n'a que peu d'importance #
$Z # etant donne l'existence du parametre '$_____FacteurRayon' (qui inclue dont le rapport 2 #
$Z # entre un diametre et le rayon correspondant)... #
$Z genere $FPlAnEtEs$ROUGE \
$Z $GRIS_8 $GRIS_8 $GRIS_8 \
$Z $GRIS_0 \
$Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_8
$Z genere $FPlAnEtEs$VERTE \
$Z $GRIS_8 $GRIS_6 $GRIS_4 \
$Z $GRIS_6 \
$Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_8
$Z genere $FPlAnEtEs$BLEUE \
$Z $GRIS_0 $GRIS_2 $GRIS_0 \
$Z $GRIS_8 \
$Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8
$Z $xrr/N_corps.11$X corps=$NcorpsS \
$Z np=1 \
$Z LISTE_X=$FPlAnEtEs$COORD_X \
$Z LISTE_Y=$FPlAnEtEs$COORD_Y \
$Z LISTE_Z=$FPlAnEtEs$COORD_Z \
$Z LISTE_RAYON=$FPlAnEtEs$RAYON \
$Z Ar=$_____FacteurRayon \
$Z LISTE_ROUGE=$FPlAnEtEs$ROUGE \
$Z LISTE_VERTE=$FPlAnEtEs$VERTE \
$Z LISTE_BLEUE=$FPlAnEtEs$BLEUE \
$Z lineaire=VRAI exposant=0.4 \
$Z dct=$_____Dct \
$Z nombre=$_____PasTempsPeriode \
$Z ensemble=VRAI \
$Z renormaliser=FAUX \
$Z Lz=1.0e18 \
$Z TRANSLATION_OX=$_____TransX \
$Z TRANSLATION_OY=$_____TransY \
$Z ZOOM=$_____Zoom \
$Z attenuation_au_bord=0 \
$Z couronne=1.5 \
$Z fond=FAUX \
$Z editer_extrema_hors=FAUX \
$Z chiffres=0 \
$Z R=$_____ImageR \
$Z $formatI
$Z FilSTmpE FPlAnEtEs