#!/bin/csh

#######################################################################################################################################
#                                                                                                                                     #
#         M I S E   E N   M O N T A G N E   T E X T U R E E   E T   V U E   D E   C O T E                                             #
#         A V E C   E F F E T   D I T   D E   " B R U M E "                                                                           #
#         D ' U N E   I M A G E   E N   V R A I E S   C O U L E U R S   P A R F A I T E S  :                                          #
#                                                                                                                                     #
#                                                                                                                                     #
#         Utilisation :                                                                                                               #
#                                                                                                                                     #
#                   $xci/montagne.81$Z  <Surface> <Texture> <ImageR> [<Arguments> [<PaletteBrume>]]                                   #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xci/montagne.81$Z' :                                                                                            #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20120602184745).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

set       Surface=$1
set       Texture=$2
set       ImageR=$3
set       Arguments="$4"
                                        # Parmi les arguments variables, on trouvera par exemple :                                    #
                                        #                                                                                             #
                                        #                   depth=VRAI min=0                        Pour un effet maximal,            #
                                        #                                 =1                        Pour un effet minimal.            #
                                        #                                                                                             #
                                        #                   Ty=...                                  Pour translater verticalement.    #
                                        #                                                                                             #
                                        #                   Sy=...                                  Pour la source lumineuse.         #
                                        #                                                                                             #
                                        #                   perspective=0                           Perspective standard,             #
                                        #                              =1                           Perspective maximale.             #
                                        #                                                                                             #
set       PaletteBrume=$5
                                        # Argument introduit le 20180710071000 pour 'v $xiirv/POIN.32$M'...                           #

setArgum  PaletteBrume                  $xiP/gris.01

FileTmpB  imageT

$xci/montagne.01$X                                                                                                                      \
                    A=$Surface                                                                                                          \
                    standard=FAUX                                                                                                       \
                    zero=FAUX                                                                                                           \
                    T=$BLANC                                                                                                            \
                    avion=FAUX                                                                                                          \
                    Z-Buffer=VRAI                                                                                                       \
                    $Arguments                                                                                                          \
                    R=$imageT.MONTAGNE                                                                                                  \
                                                                                                    $formatI                      |     \
$xci/complement$X                                                                                                                       \
                                                                                                    $formatI                      |     \
$xci/vraies_C$X                                                                                                                         \
                    p=$PaletteBrume                                                                                                     \
                    R=$imageT.BRUME                                                                                                     \
                                                                                                    $formatI

execRVB             $xci/montagne.01$X                                                                                                  \
                                        A=$Surface                                                                                      \
                                        standard=FAUX                                                                                   \
                                        zero=FAUX                                                                                       \
                                        T=$Texture%s                                                                                    \
                                        avion=FAUX                                                                                      \
                                        $Arguments                                                                                      \
                                        R=$ImageR$M%s                                                                                   \
                                                                                                                        $formatI
$xci/vitre.53$Z                                                                                                                         \
                    $ImageR$M                                                                                                           \
                    $imageT.BRUME                                                                                                       \
                    $ImageR$M

FileTmpE  imageT