#!/bin/csh
       set debut = $1
       set fin = $2
    set i=$debut

    while ($i <= $fin)
            convert $i.M.png $i.M.ppm
            convert $i.T.png $i.T.ppm
            convert $i.U.png $i.U.ppm
        set i = `expr $i + 1 `
    end

    ##
    ## on cree le fichier de donne de ppmtompeg et on fait le mpeg
    ##
    ##
    ## D'abord l'epilogue du fichier param
    ##
    rm -f film_fin.param
    echo "##### PAS TOUCHER EN BAS #####" > film_fin.param
    echo "GOP_SIZE        15" >> film_fin.param
    echo "SLICES_PER_FRAME        1" >> film_fin.param

    echo "BASE_FILE_FORMAT        PPM" >> film_fin.param
    echo "YUV_SIZE        352x240" >> film_fin.param

    echo "INPUT_CONVERT   *" >> film_fin.param

    echo "INPUT_DIR       ./" >> film_fin.param

    echo "PATTERN         IBBPBBPBBPBBPBBPBBPBBP" >> film_fin.param

    echo "# quality parameters" >> film_fin.param

    echo "IQSCALE         8" >> film_fin.param
    echo "PQSCALE         10" >> film_fin.param
    echo "BQSCALE         25" >> film_fin.param

    echo "# motion vector search parameters" >> film_fin.param

    echo "PIXEL           HALF" >> film_fin.param

    echo "RANGE           10 4" >> film_fin.param

    echo "# LOGARITHMIC, TWOLEVEL, SUBSAMPLE, EXHAUSTIVE" >> film_fin.param
    echo "PSEARCH_ALG      LOGARITHMIC" >> film_fin.param

    echo "# CROSS2, SIMPLE" >> film_fin.param
    echo "BSEARCH_ALG     CROSS2" >> film_fin.param

    echo "# DECODED or ORIGINAL" >> film_fin.param
    echo "REFERENCE_FRAME ORIGINAL" >> film_fin.param

          echo "INPUT" > film.M.param
          echo "*.M.ppm [$debut-$fin]" >> film.M.param
          echo "END_INPUT" >> film.M.param
          echo "OUTPUT ./M.mpg" >> film.M.param
          cat film_fin.param >> film.M.param
          ppmtompeg film.M.param
          rm *.M.ppm
          echo "INPUT" > film.T.param
          echo "*.T.ppm [$debut-$fin]" >> film.T.param
          echo "END_INPUT" >> film.T.param
          echo "OUTPUT ./T.mpg" >> film.T.param
          cat film_fin.param >> film.T.param
          ppmtompeg film.T.param
          rm *.T.ppm

        echo "INPUT" > film.U.param
        echo "*.U.ppm [$debut-$fin]" >> film.U.param
        echo "END_INPUT" >> film.U.param
        echo "OUTPUT ./U.mpg" >> film.U.param
        cat film_fin.param >> film.U.param
        ##
        ## on execute
        ##
        ppmtompeg film.U.param
        rm *.U.ppm