#######################################################################################################################################
#                                                                                                                                     #
#         A U T O - T R A N S F O R M A T I O N S   D ' U N E   S E Q U E N C E  :                                                    #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirs/.PROJ.H1.2.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20060420082728).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

#20150610103018____:$Z                  Pal                                                                                           #

$c                  #include  <stdio.h>
$c
$c                  #define   N0        Premiere
$c                  #define   N         Derniere
$c
$c                  int       main()
$c                            {
$c                            int       n;
$c
$c                            for       (n=N0 ; n<=N ; n++)
$c                                      {
$c                                      printf("$xci/neutre$X
$c                                                                  A=$xTV/SURFACE.3$COORD_X.%04d
$c                                                                  standard=FAUX
$c                                                                  R=$xTV/SELF$ROUGE
$c                                                                                                  $formatI\n"
$c                                            ,n
$c                                             );

$c                                      printf("$xci/neutre$X
$c                                                                  A=$xTV/SURFACE.3$COORD_Y.%04d
$c                                                                  standard=FAUX
$c                                                                  R=$xTV/SELF$VERTE
$c                                                                                                  $formatI\n"
$c                                            ,n
$c                                             );

$c                                      printf("$xci/neutre$X
$c                                                                  A=$xTV/SURFACE.3$COORD_Z.%04d
$c                                                                  standard=FAUX
$c                                                                  R=$xTV/SELF$BLEUE
$c                                                                                                  $formatI\n"
$c                                            ,n
$c                                             );

$c                                      printf("$xci/SelfTrans.12$Z
$c                                                                  $xTV/SELF
$c                                                                  $xTV/SELF.1\n"
$c                                            ,n
$c                                             );
$c                                      printf("eval      `$xci/genere$X
$c                                                         commande='($xci/acces$X
$c                                                                               A=$xTV/SELF.1%%s
$c                                                                               standard=FAUX
$c                                                                               zero=FAUX
$c                                                                               R=$_____imagesR3.%04d%%s
$c                                                                                                            $formatI)'
$c                                                         en_tete=FAUX RVB=VRAI XYZ=FAUX separateur=VRAI`\n"
$c                                            ,n
$c                                             );

$c                                      printf("$xci/SelfTrans.22$Z
$c                                                                  $xTV/SELF
$c                                                                  $xTV/SELF.2\n"
$c                                            ,n
$c                                             );
$c                                      printf("eval      `$xci/genere$X
$c                                                         commande='($xci/acces$X
$c                                                                               A=$xTV/SELF.2%%s
$c                                                                               standard=FAUX
$c                                                                               zero=FAUX
$c                                                                               R=$_____imagesR4.%04d%%s
$c                                                                                                            $formatI)'
$c                                                         en_tete=FAUX RVB=VRAI XYZ=FAUX separateur=VRAI`\n"
$c                                            ,n
$c                                             );
$c                                      }
$c                            }