#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D E   T R O I S   M O T I F S   F R A C T A L S   D E   B A S E  :                                    #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.STRW.73.2.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20141113135554).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____Profondeur               4

$Z                  setParam            _____MailleX                  0.2

$Z                  setParam            _____MailleY                  0.2

$Z                  setParam            _____Graine1                  1789

$Z                  setParam            _____Graine2                  1947

$Z                  setParam            _____Graine3                  2001

$Z                  $xci/fract_2D.01$X                                                                                                  \
$Z                                      profondeur=$_____Profondeur                                                                     \
$Z                                      mx=$_____MailleX my=$_____MailleY                                                               \
$Z                                      graine=$_____Graine1                                                                            \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/substitue$X                                                                                                    \
$Z                                      p=$xiP/dentscie.01                                                                              \
$Z                                      substitution=L_SUBSTITUTION_ROUGE                                                               \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      carre_image=VRAI                                                                                \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      carre_image=VRAI                                                                                \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/tapisserie$X                                                                                                   \
$Z                                      R=$_____ImageR.bas$ROUGE                                                                        \
$Z                                                                                                            $formatI

$Z                  $xci/fract_2D.01$X                                                                                                  \
$Z                                      profondeur=$_____Profondeur                                                                     \
$Z                                      mx=$_____MailleX my=$_____MailleY                                                               \
$Z                                      graine=$_____Graine2                                                                            \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/substitue$X                                                                                                    \
$Z                                      p=$xiP/dentscie.01                                                                              \
$Z                                      substitution=L_SUBSTITUTION_ROUGE                                                               \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      carre_image=VRAI                                                                                \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      carre_image=VRAI                                                                                \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/tapisserie$X                                                                                                   \
$Z                                      R=$_____ImageR.bas$VERTE                                                                        \
$Z                                                                                                            $formatI

$Z                  $xci/fract_2D.01$X                                                                                                  \
$Z                                      profondeur=$_____Profondeur                                                                     \
$Z                                      mx=$_____MailleX my=$_____MailleY                                                               \
$Z                                      graine=$_____Graine3                                                                            \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/substitue$X                                                                                                    \
$Z                                      p=$xiP/dentscie.01                                                                              \
$Z                                      substitution=L_SUBSTITUTION_ROUGE                                                               \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      carre_image=VRAI                                                                                \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/multi_02.01$X                                                                                                  \
$Z                                      carre_image=VRAI                                                                                \
$Z                                                                                                            $formatI            |     \
$Z                  $xci/tapisserie$X                                                                                                   \
$Z                                      R=$_____ImageR.bas$BLEUE                                                                        \
$Z                                                                                                            $formatI

$Z        execRVB   $xci/acces$X                                                                                                        \
$Z                                      A=$_____ImageR.bas%s                                                                            \
$Z                                      convertir=VRAI                                                                                  \
$Z                                      R=$xTV/CHAMP%s                                                                                  \
$Z                                                                                                            $formatI