home *** CD-ROM | disk | FTP | other *** search
- echo off
- if %1. == . goto help
- if exist %1con goto goon
- echo *** Destination path not found!
- goto help
- :goon
- echo getlang e c from exec.c to %1exec.c
- getlang e c <exec.c >%1exec.c
- if errorlevel 1 goto err
- echo getlang e p from exec.pas to %1exec.pas
- getlang e p <exec.pas >%1exec.pas
- if errorlevel 1 goto err
- echo getlang e c from exec.h to %1exec.h
- getlang e c <exec.h >%1exec.h
- if errorlevel 1 goto err
- echo getlang e a from checkpat.asm to %1checkpat.asm
- getlang e a <checkpat.asm >%1checkpat.asm
- if errorlevel 1 goto err
- echo getlang e c from checkpat.h to %1checkpat.h
- getlang e c <checkpat.h >%1checkpat.h
- if errorlevel 1 goto err
- echo getlang e p from checkpat.pas to %1checkpat.pas
- getlang e p <checkpat.pas >%1checkpat.pas
- if errorlevel 1 goto err
- echo getlang e c from extest.c to %1extest.c
- getlang e c <extest.c >%1extest.c
- if errorlevel 1 goto err
- echo getlang e p from extest.pas to %1extest.pas
- getlang e p <extest.pas >%1extest.pas
- if errorlevel 1 goto err
- echo getlang e a from spawn.asm to %1spawn.asm
- getlang e a <spawn.asm >%1spawn.asm
- if errorlevel 1 goto err
- echo getlang e c from compat.h to %1compat.h
- getlang e c <compat.h >%1compat.h
- if errorlevel 1 goto err
- goto exit
- :err
- echo *** Error!
- :help
- echo Usage: English destination-path
- echo copies the english version of all sources to the destination path.
- echo Example: english d:\eng\
- :exit
-