/* 

   $VER: MPEGPlay.filer 1.2 (2.4.95)

   Author:
    Matthias Scheler (tron@lyssa.pb.owl.de)

   Function:
    Plays MPEG files with Michael van Elst's mp V1.03.
    It pops up a requester asking to use HAM6 instead of the GRAY.

   History:
    1.2   removed unnecessary ADDRESS 'FilerRexx'

   Requires:
    mp V1.03 or newer

   Call:
    MPEGPlay FILENAME

   Example for "Filer.RC":
    REXXCLASS "#?.mpg","","MPEGPlay %s"

*/

PARSE ARG FileName

OPTIONS RESULTS

'STATUS Playing MPEG Animation' FileName
PANEL OFF

QUESTBOX 'Play animation in HAM6 ?'
IF RESULT THEN EXEC 'mp -dither ham6' FileName
ELSE EXEC 'mp -dither gray' FileName

PANEL ON
'HISTORY Played MPEG Animation' FileName