@echo off
if NOT "%@eval[2+2]"=="4" goto problem

echo srodowisko:
ver
echo.


if "%1"=="h" .or. "%1"=="-h" .or. "%1"=="help" .or. "%1"=="-help" goto help
if %# GT 4 goto help
if "%1" == "-sfn" goto sfn
if "%1" == "-ascii" goto ascii

:sfn
if "%@numeric[%2]" == "0" goto help
echo Całkowita krótka ścieżka do pliku:
echo %@SFN[%2]
goto end

:ascii
if "%@numeric[%2]" == "0" goto help
echo Całkowita długa ścieżka pliku:
echo %@ASCII[%2]
goto end

:help
echo Program sluzy do korzystania z funkcji @SFN, @LFN
echo aby skorzystac z @SFN, prosze uruchomic program z argumentem -sfn
echo aby skorzystac z @LFN, prosze uruchomic program z argumentem -lfn
echo -------------------------------------------------------------------------------
echo @LFN[filename]:  Returns the long filename for a short ("8.3") filename.
echo @lfn[c:\progra~1]
echo C:\Program Files
echo -------------------------------------------------------------------------------
echo @SFN[filename]:  Returns the fully expanded short ("8.3") filename for a long filename.
echo @sfn[%comspec]
echo C:\PROGRA~1\JPSoft\TCMD17~1\TCC.EXE
echo ----------------------------------------------------------
goto end

problem
echo Nastepujace srodowisko
ver
echo nie jest obslugiwane przez te makrodyrektywe.

:end