ECHO OFF
CLS
TYPE SHOW.TXT
PAUSE
IF A%1 == ACGA GOTO CGA
IF A%1 == AHGC GOTO HGC
IF A%1 == AEGA GOTO EGA
IF A%1 == AEGH GOTO EGH
ECHO YOU MUST TYPE (IN UPPER CASE LETTERS):
ECHO SHOW CGA            - For standard colour graphics card
ECHO SHOW HGC            - For herculese monochrome graphics card
ECHO SHOW EGA            - For enhanced colour graphics card
ECHO                       and video graphics array (VGA)
ECHO SHOW EGH            - For super enhanced colour graphics
ECHO                       and VGA
ECHO
ECHO PLEASE RE-TRY
GOTO EXIT
:CGA
BGRAPH FILM01.IMG;
BGRAPH FILM01.IMG,0,640,0,0,10;
BGRAPH FILM01.IMG,0,640,0,0,5;
BGRAPH FILM01.IMG,0,640,0,0,3;
BGRAPH FILM01.IMG,0,640,0,0,2;
BGRAPH FILM01.IMG,0,640,0,0,1;
BGRAPH FILM01.IMG,0,640,0,0,0;
BGRAPH FILM01.IMG,0,640,0,60,0;
BGRAPH FILM01.IMG,0,640,50,40,0;
BGRAPH FILM01.IMG,0,640,100,20,0;
BGRAPH FILM01.IMG,0,640,150,100,0;
BGRAPH FILM01.IMG,0,640,200,0,0;
BGRAPH FILM02.IMG;<GO
REM BGRAPH FILM04.IMG;
REM BGRAPH FILM05.IMG;
REM BGRAPH FILM05.IMG,1,320,100,40,0;
REM BGRAPH FILM06.IMG;<GOGO
GOTO EXIT

:HGC
BGRAPH FILM01.IMG,,,,,,,HGC
BGRAPH FILM01.IMG,0,640,0,0,10,,HGC
BGRAPH FILM01.IMG,0,640,0,0,5,,HGC
BGRAPH FILM01.IMG,0,640,0,0,3,,HGC
BGRAPH FILM01.IMG,0,640,0,0,2,,HGC
BGRAPH FILM01.IMG,0,640,0,0,1,,HGC
BGRAPH FILM01.IMG,0,640,0,0,0,,HGC
BGRAPH FILM01.IMG,0,640,0,60,0,,HGC
BGRAPH FILM01.IMG,0,640,50,40,0,,HGC
BGRAPH FILM01.IMG,0,640,100,20,0,,HGC
BGRAPH FILM01.IMG,0,640,150,100,0,,HGC
BGRAPH FILM01.IMG,0,640,200,0,0,,HGC
BGRAPH FILM02.IMG,,,,,,,HGC
REM BGRAPH FILM04.IMG,,,,,,,HGC
REM BGRAPH FILM05.IMG,,,,,,,HGC
REM BGRAPH FILM05.IMG,1,320,100,40,0,,HGC
REM BGRAPH FILM06.IMG,,,,,,,HGC
GOTO EXIT

:EGA
BGRAPH FILM01.IMG,,,,,,,EGA
BGRAPH FILM01.IMG,0,640,0,0,10,,EGA
BGRAPH FILM01.IMG,0,640,0,0,5,,EGA
BGRAPH FILM01.IMG,0,640,0,0,3,,EGA
BGRAPH FILM01.IMG,0,640,0,0,2,,EGA
BGRAPH FILM01.IMG,0,640,0,0,1,,EGA
BGRAPH FILM01.IMG,0,640,0,0,0,,EGA
BGRAPH FILM01.IMG,0,640,0,60,0,,EGA
BGRAPH FILM01.IMG,0,640,50,40,0,,EGA
BGRAPH FILM01.IMG,0,640,100,20,0,,EGA
BGRAPH FILM01.IMG,0,640,150,100,0,,EGA
BGRAPH FILM01.IMG,0,640,200,0,0,,EGA
BGRAPH FILM02.IMG,,,,,,,EGA
REM BGRAPH FILM04.IMG,,,,,,,EGA
REM BGRAPH FILM05.IMG,,,,,,,EGA
REM BGRAPH FILM05.IMG,1,320,100,40,0,,EGA
REM BGRAPH FILM06.IMG,,,,,,,EGA<GOGO
GOTO EXIT

:EGH
BGRAPH FILM01.IMG,,,,,,,EGH
BGRAPH FILM01.IMG,0,640,0,0,10,,EGH
BGRAPH FILM01.IMG,0,640,0,0,5,,EGH
BGRAPH FILM01.IMG,0,640,0,0,3,,EGH
BGRAPH FILM01.IMG,0,640,0,0,2,,EGH
BGRAPH FILM01.IMG,0,640,0,0,1,,EGH
BGRAPH FILM01.IMG,0,640,0,0,0,,EGH
BGRAPH FILM01.IMG,0,640,0,60,0,,EGH
BGRAPH FILM01.IMG,0,640,50,40,0,,EGH
BGRAPH FILM01.IMG,0,640,100,20,0,,EGH
BGRAPH FILM01.IMG,0,640,150,100,0,,EGH
BGRAPH FILM01.IMG,0,640,200,0,0,,EGH
BGRAPH FILM02.IMG,,,,,,,EGH
REM BGRAPH FILM04.IMG,,,,,,,EGH
REM BGRAPH FILM05.IMG,,,,,,,EGH
REM BGRAPH FILM05.IMG,1,320,100,40,0,,EGH
REM BGRAPH FILM06.IMG,,,,,,,EGH<GOGO
GOTO EXIT

:EXIT
