#######################################################################################################################################
# #
# M I S E E N M O N T A G N E ' $m ' E T ' $M ' E N F A U S S E S C O U L E U R S : #
# #
# #
# Author of '$xivP/disk.000000009/face.2/.REFL.D.11.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss). #
# #
#######################################################################################################################################
$Z setParam _____Palette $xiP/cercle.11
$Z SETParam _____Echelle 1.0
$Z SETParam _____Translation 1.0
$Z SETParam _____Perspective 0.5
$Z Pal
$Z set Parametres="standard=VRAI"
$Z set Parametres1="$Parametres avion=VRAI"
$Z set Parametres2="$Parametres echelle=$_____Echelle avion=FAUX Ty=$_____Translation perspective=$_____Perspective"
$c #include <stdio.h>
$c
$c extern int atoi();
$c extern char *getenv();
$c
$c #define N0 (atoi(getenv("PremiereA")))
$c #define N (atoi(getenv("DerniereA")))
$c
$c int main()
$c {
$c int n;
$c
$c for (n=N0 ; n<=N ; n++)
$c {
$c printf("$xci/vraies_C$X
$c A=$_____Surface.%04d
$c p=$_____Palette
$c RVB=VRAI
$c R=$xTV/TEXTURE
$c $formatI\n"
$c ,n
$c );
$c
$c printf("$xci/substitue$X
$c A=$xTV/TEXTURE$ROUGE
$c substitution=L_SUBSTITUTION_02
$c R=$xTV/TEXTURE$ROUGE
$c $formatI\n"
$c );
$c printf("$xci/substitue$X
$c A=$xTV/TEXTURE$VERTE
$c substitution=L_SUBSTITUTION_02
$c R=$xTV/TEXTURE$VERTE
$c $formatI\n"
$c );
$c printf("$xci/substitue$X
$c A=$xTV/TEXTURE$BLEUE
$c substitution=L_SUBSTITUTION_02
$c R=$xTV/TEXTURE$BLEUE
$c $formatI\n"
$c );
$c
$c printf("$xci/montagne.01$X
$c A=$_____Surface.%04d
$c T=$xTV/TEXTURE$ROUGE
$c $Parametres1
$c R=$_____images$m.%04d$ROUGE
$c $formatI\n"
$c ,n,n
$c );
$c printf("$xci/montagne.01$X
$c A=$_____Surface.%04d
$c T=$xTV/TEXTURE$VERTE
$c $Parametres1
$c R=$_____images$m.%04d$VERTE
$c $formatI\n"
$c ,n,n
$c );
$c printf("$xci/montagne.01$X
$c A=$_____Surface.%04d
$c T=$xTV/TEXTURE$BLEUE
$c $Parametres1
$c R=$_____images$m.%04d$BLEUE
$c $formatI\n"
$c ,n,n
$c );
$c
$c printf("$xci/montagne.01$X
$c A=$_____Surface.%04d
$c T=$xTV/TEXTURE$ROUGE
$c $Parametres2
$c R=$_____images$M.%04d$ROUGE
$c $formatI\n"
$c ,n,n
$c );
$c printf("$xci/montagne.01$X
$c A=$_____Surface.%04d
$c T=$xTV/TEXTURE$VERTE
$c $Parametres2
$c R=$_____images$M.%04d$VERTE
$c $formatI\n"
$c ,n,n
$c );
$c printf("$xci/montagne.01$X
$c A=$_____Surface.%04d
$c T=$xTV/TEXTURE$BLEUE
$c $Parametres2
$c R=$_____images$M.%04d$BLEUE
$c $formatI\n"
$c ,n,n
$c );
$c }
$c }