#######################################################################################################################################
# #
# G E N E R A T I O N D E C H A R L I E : #
# #
# #
# Author of '$xiirf/.CHAR.11.1.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, 20150110110314). #
# #
#######################################################################################################################################
$Z setParam _____Nombre 17
$Z setParam _____GraineC 1515
$Z setParam _____MinimumC 256
$Z setParam _____MaximumC 256
$Z setParam _____GraineX 1947
$Z setParam _____MinimumX -0.50
$Z setParam _____MaximumX +0.50
$Z setParam _____GraineY 1789
$Z setParam _____MinimumY -0.20
$Z setParam _____MaximumY +0.40
$Z setParam _____GraineH 2001
$Z setParam _____MinimumH +0.8
$Z setParam _____MaximumH +1.0
$Z setParam _____Iterations `GetParam $xci/fract_2D.01$X iterations`
$Z # Parametre introduit le 20150111094009... #
$Z setParam _____PaletteIM $xiP/charlie.11
$Z setParam _____PaletteN $xiP/nuages.02
$Z setParam _____Format "neutre"
$Z # Parametre introduit le 20150112111544... #
$Z setParam _____Echelle `GetParam $xci/montagne.01$X echelle`
$Z # Parametre introduit le 20150112113331... #
$Z setParam _____Ty 0.96
$Z # Parametre introduit le 20150112113331... #
$Z setParam _____Perspective 0.4
$Z # Parametre introduit le 20150112113331... #
$Z set NoMbRe=1
$Z set GrAiNeC=$_____GraineC
$Z set GrAiNeX=$_____GraineX
$Z set GrAiNeY=$_____GraineY
$Z set GrAiNeH=$_____GraineH
$Z set CeNtReX=0
$Z set CeNtReY=0
$Z set RaNdOm="$xci/valeurs_alea$X premiere=1 derniere=1"
$Z set SoMmAtIoN="$xci/maximum$X"
$Z $xci/init$X \
$Z standard=FAUX \
$Z valeur=0 \
$Z R=$xTV/GAUSSIENNES \
$Z $formatI
$Z while ($NoMbRe <= $_____Nombre)
$Z set CoEfFiCiEnTC=`$RaNdOm graine=$GrAiNeC inf=$_____MinimumC sup=$_____MaximumC`
$Z set CoOrDoNnEeSX=`$RaNdOm graine=$GrAiNeX inf=$_____MinimumX sup=$_____MaximumX`
$Z set TrAnSlAtIoNX=`$xcg/ADD2.01$X a=$CoOrDoNnEeSX b=$CeNtReX`
$Z set CoOrDoNnEeSY=`$RaNdOm graine=$GrAiNeY inf=$_____MinimumY sup=$_____MaximumY`
$Z set TrAnSlAtIoNY=`$xcg/ADD2.01$X a=$CoOrDoNnEeSY b=$CeNtReY`
$Z set HaUtEuRH=`$RaNdOm graine=$GrAiNeH inf=$_____MinimumH sup=$_____MaximumH`
$Z $xci/gauss$X \
$Z standard=FAUX \
$Z c=$CoEfFiCiEnTC \
$Z TRANSLATION_OX=$TrAnSlAtIoNX TRANSLATION_OY=$TrAnSlAtIoNY \
$Z $formatI | \
$Z $xci/normalise.01$X \
$Z origine=0 extremite=$HaUtEuRH \
$Z $formatI | \
$Z $SoMmAtIoN \
$Z standard=FAUX \
$Z A1=$xTV/GAUSSIENNES \
$Z R=$xTV/GAUSSIENNES \
$Z $formatI
$Z @ NoMbRe = $NoMbRe + 1
$Z @ GrAiNeC = $GrAiNeC + 1
$Z @ GrAiNeX = $GrAiNeX + 1
$Z @ GrAiNeY = $GrAiNeY + 1
$Z @ GrAiNeH = $GrAiNeH + 1
$Z end
$Z $xci/gauss$X \
$Z R=$xTV/GAUSS \
$Z $formatI
$Z $xci/random.01$X \
$Z standard=FAUX \
$Z R=$xTV/MER.21 \
$Z $formatI
$Z $xci/filtre.01$X \
$Z standardA=FAUX \
$Z A=$xTV/MER.21 \
$Z N=$xTV/GAUSS \
$Z standardR=FAUX \
$Z R=$xTV/MER.22 \
$Z $formatI
$Z $xci/normalise.01$X \
$Z A=$xTV/MER.22 \
$Z o=0.498 e=+0.502 \
$Z R=$xTV/MER.23 \
$Z $formatI
$Z $xci/maximum$X \
$Z A1=$xTV/GAUSSIENNES \
$Z A2=$xTV/MER.23 \
$Z standard=FAUX \
$Z R=$xTV/ALTITUDE \
$Z $formatI
$Z $xci/passe_bande$X \
$Z A=$xTV/GAUSSIENNES \
$Z standard=FAUX \
$Z Fseuil_inferieur=0.49 Fseuil_superieur=0.51 \
$Z Fvaleur_inferieure=0 Fvaleur_superieure=0.51 \
$Z $formatI | \
$Z $xci/normalise.01$X \
$Z R=$xTV/TEXTURE.71 \
$Z $formatI
$Z $xci/filtre.01$X \
$Z A=$xTV/TEXTURE.71 \
$Z standardA=FAUX \
$Z standardR=FAUX \
$Z N=$xTV/GAUSS \
$Z seuil=252 \
$Z R=$xTV/TEXTURE.72 \
$Z $formatI
$Z $xci/normalise.01$X \
$Z A=$xTV/TEXTURE.72 \
$Z $formatI | \
$Z $xci/acces$X \
$Z standard=FAUX \
$Z zero=FAUX \
$Z $formatI | \
$Z $xci/vraies_C$X \
$Z p=$_____PaletteIM \
$Z R=$xTV/TEXTURE.73 \
$Z $formatI
$Z $xci/fract_2D.01$X \
$Z iterations=$_____Iterations \
$Z mx=0.5 my=0.1 \
$Z $formatI | \
$Z $xci/vraies_C$X \
$Z p=$_____PaletteN \
$Z R=$xTV/NUAGES.11 \
$Z $formatI
$Z eval "$_____Format"
$Z # Possibilite ici de changer de format (introduite le 20150112111544)... #
$Z set exec_aR="ZBuffer=VRAI Z=$xTV/BRUME"
$Z set exec_aV="$K_VIDE"
$Z set exec_aB="$K_VIDE"
$Z execRVB $xci/montagne.01$X \
$Z echelle=$_____Echelle \
$Z A=$xTV/ALTITUDE \
$Z standard=FAUX \
$Z zero=FAUX \
$Z T=$xTV/TEXTURE.73%s \
$Z Ty=$_____Ty \
$Z perspective=$_____Perspective \
$Z R=$xTV/ILES%s \
$Z $formatI
$Z $xci/complement$X \
$Z A=$xTV/BRUME \
$Z R=$xTV/BRUME \
$Z $formatI
$Z execRVB $xci/brume.11$X \
$Z A=$xTV/ILES%s \
$Z B=$xTV/BRUME \
$Z R=$xTV/CHAR.11$M%s \
$Z $formatI
$Z $xci/lineaire$X \
$Z A=0 B=1 C=0 \
$Z standard=FAUX \
$Z $formatI | \
$Z $xci/normalise.01.x \
$Z $formatI | \
$Z $xci/multi_02.01.x \
$Z standard=FAUX \
$Z carre_image=VRAI \
$Z iterations=2 \
$Z $formatI | \
$Z $xci/acces$X \
$Z standard=FAUX zero=FAUX \
$Z R=$xTV/DEGRADE \
$Z $formatI
$Z execRVB $xci/interpole.02$X \
$Z A1=$xTV/NUAGES.11%s \
$Z A2=$xTV/CHAR.11$M%s \
$Z P=$xTV/DEGRADE \
$Z R=$_____ImageR$M%s \
$Z $formatI
Copyright © Jean-François Colonna, 2019-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2019-2021.