if not exist file.lst goto error
cls

dup echo y "|" del
dup rd
del data
dir


goto end
:error
echo off
cls
echo FILE.LST must exist to execute this demo file!
echo ÿ
echo ÿ
echo ÿ
:end