set var=%cd%
echo off
:main
cls
echo.
echo        Computer Chronicles
echo             Page One
echo.
echo Press 1 for S01E21: Computer Games (1984)
echo Press 2 for S02E03: Computer Games (1985)
echo Press 3 for S02E04: IBM Compatible Computers (1985)
echo Press 4 for S03E08: Modems and Bulletin Boards (1986)
echo Press 5 for S04E03: MIDI Music (1987)
echo Press 6 for S05E08: Computer Games: Part 1 (1988)
echo Press 7 for S05E09: Computer Games: Part 2 (1988)
echo Press 8 for S05E16: Shareware (1988)
echo Press 9 for S08E11: Video Game Consoles (1990)
echo Press N to go to the Next Page
echo.
echo Selected episodes which contain content related to
echo MS-DOS and PC gaming during that era have been
echo included.
echo.
choice /C 123456789N /N /M "Please Choose:"

if errorlevel = 10 goto main2
if errorlevel = 9 (
                        set title=S08E11
			goto play
)
if errorlevel = 8 (
                        set title=S05E16
			goto play
)
if errorlevel = 7 (
                        set title=S05E09
			goto play
)
if errorlevel = 6 (
                        set title=S05E08
			goto play
)
if errorlevel = 5 (
                        set title=S04E03
			goto play
)
if errorlevel = 4 (
                        set title=S03E08
			goto play
)
if errorlevel = 3 (
                        set title=S02E04
			goto play
)
if errorlevel = 2 (
                        set title=S02E03
			goto play
)
if errorlevel = 1 (
                        set title=S01E21
			goto play
)

:main2
cls
echo.
echo        Computer Chronicles
echo             Page Two
echo.
echo Press 1 for S08E21: CD-ROM Software (1991)
echo Press 2 for S08E23: Flight Simulators (1991)
echo Press 3 for S08E24: Consumer Electronics Show (1991)
echo Press 4 for S08E29: Software in Schools (1991)
echo Press 5 for S09E08: Computer Games (1991)
echo Press 6 for S09E17: Build Your Own PC (1992)
echo Press 7 for S09E22: MIDI Music (1992)
echo Press 8 for S09E25: CD-ROM Software (1992)
echo Press 9 for S10E22: CD-ROM Software (1993)
echo Press N to go to the Next Page
echo Press P to go to the Previous Page
echo.
echo Selected episodes which contain content related to
echo MS-DOS and PC gaming during that era have been
echo included.
echo.
choice /C 123456789NP /N /M "Please Choose:"

if errorlevel = 11 goto main
if errorlevel = 10 goto main3
if errorlevel = 9 (
                        set title=S10E22
			goto play
)
if errorlevel = 8 (
                        set title=S09E25
			goto play
)
if errorlevel = 7 (
                        set title=S09E22
			goto play
)
if errorlevel = 6 (
                        set title=S09E17
			goto play
)
if errorlevel = 5 (
                        set title=S09E08
			goto play
)
if errorlevel = 4 (
                        set title=S08E29
			goto play
)
if errorlevel = 3 (
                        set title=S08E24
			goto play
)
if errorlevel = 2 (
                        set title=S08E23
			goto play
)
if errorlevel = 1 (
                        set title=S08E21
			goto play
)

:main3
cls
echo.
echo        Computer Chronicles
echo            Page Three
echo.
echo Press 1 for S11E05: DOS 6.2 (1993)
echo Press 2 for S13E17: Computers and Kids (1996)
echo Press 3 for S13E39: E3 Special (1996)
echo Press 4 for S14E15: Greatest Games (1996)
echo Press 5 for S14E19: Sports Simulation Software (1996)
echo Press P to go to the Previous Page
echo.
echo Selected episodes which contain content related to
echo MS-DOS and PC gaming during that era have been
echo included.
echo.
choice /C 12345P /N /M "Please Choose:"

if errorlevel = 6 goto main2
if errorlevel = 5 (
                        set title=S14E19
			goto play
)
if errorlevel = 4 (
                        set title=S14E15
			goto play
)
if errorlevel = 3 (
                        set title=S13E39
			goto play
)
if errorlevel = 2 (
                        set title=S13E17
			goto play
)
if errorlevel = 1 (
                        set title=S11E05
			goto play
)

:play
cd ..\..\..
.\exo\util\setconsole.exe /minimize
.\exo\util\VLC\vlc.exe --width="1920" "%var%\%title%.mp4"
goto quit

:quit