#######################################################################################################################################
#                                                                                                                                     #
#         Z O O M   S U R   L A   C O U R B E   D E   V O N   K O C H  :                                                              #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirc/.VONK.62.2.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20180203102822).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z        set                 NPremiere=`$xci/nombres$X p=$Premiere d=$Premiere`

$Z        set                 TrAnSlAtIoNY2=`calcul -2*$TrAnSlAtIoNY`

$Z        execRVB            "$xci/scroll$X                                                                                             \
$Z                                                A=$_____images.$NPremiere%s                                                           \
$Z                                                toreX=FAUX trX=0                                                                      \
$Z                                                toreY=FAUX trY=$TrAnSlAtIoNY2                                                         \
$Z                                                                                                                      $formatI  |     \
$Z                            $xci/scale$X                                                                                              \
$Z                                                a=0.7                                                                                 \
$Z                                                R=$xTV/FOND%s                                                                         \
$Z                                                                                                                      $formatI"

$Z        $xci/init$X                                                                                                                   \
$Z                            niveau=$NOIR                                                                                              \
$Z                            R=$_____images.$NPremiere$BLEUE                                                                           \
$Z                                                                                                                      $formatI

$Z        set                 NDerniere=`$xci/nombres$X p=$Derniere d=$Derniere`

$Z        $xci/init$X                                                                                                                   \
$Z                            niveau=$NOIR                                                                                              \
$Z                            R=$_____images.$NDerniere$BLEUE                                                                           \
$Z                                                                                                                      $formatI

$c        #define   N0        Premiere
$c        #define   N         Derniere

$c        int       main()
$c                  {
$c                  int       n;

$c                  for       (n=N0 ; n<=N ; n++)
$c                            {
$c                            printf("$xci/or_02$X
$c                                                A1=$_____images.%04d$ROUGE
$c                                                A2=$xTV/FOND$ROUGE
$c                                                R=$_____images.%04d$ROUGE
$c                                                                                                                      $formatI\n"
$c                                  ,n,n
$c                                   );
$c                            }
$c                  }