ECHO OFF
IF NOT %1.==. SET PDL=%1
IF %1.==. CLS
IF %1.==. TYPE \PDL\PDLLOGO.BAT
IF %1.==. PDLWHAT s 'Enter menu/directory name.'
IF %PDL%.==. GOTO  EXIT
echo program by the number - PDL menu facility now loading %PDL%
SET MENU=%PDL%
SET CD=\%PDL%
IF NOT %2.==. SET CD=%2
IF EXIST %CD%\%MENU%.BY# GOTO GOMENU
\PDL\PDLASK No menu found, exiting with directory of root.
\PDL\PDLEXITD
REM --------------------------
:GOMENU
CD %CD%
PROMPT $x$x$x$P-$G $x
\PDL\PDLDSP %MENU%.BY#
:EXIT