SHORTIES\TRAN.BAT  ·  BAT  ·  587 B  ·  1988-04-01  ·  from PCPlus_Issue-19_Apr-1988
echo off
echo   
echo Tramsfer program by M J Houghton.
echo (C) Copyright Jan 1988.
echo   
 
rem Check input
if "%1"=="" goto no
if "%2"=="" goto no
if not exist %1 goto no
   
Rem Start transfer
echo Transfering the files to "%2".
COPY %1 %2
echo Removing files from the start directory.
DEL %1
echo    
echo Transfer completed.
GOTO END

rem Display error messages
:no
if "%1"=="" echo Need a source file(s).
if "%1"=="" goto end
if "%2"=="" echo Need a directory or filename to copy to.
if "%2"=="" goto end
echo File(s) do not exist!!
goto end

:end