home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power-Programmierung
/
CD1.mdf
/
basic
/
splos2
/
spl.bat
< prev
Wrap
DOS Batch File
|
1988-04-07
|
1KB
|
67 lines
ECHO OFF
REM This batch file lets you automate the SPL translator.
REM Format of command:
REM SPL fname /LS/S
:START
PAUSE
IF %1.SP==.SP GOTO EXIT1
IF NOT EXIST %1.SP GOTO EXIT2
ECHO %1 >PARMS
ECHO >>PARMS
IF %2z==/LS/Sz GOTO EXIT3
IF %2z==/LP/Sz GOTO EXIT4
IF %2z==/LD/Sz GOTO EXIT5
IF %2z==/LSz GOTO EXIT6
IF %2z==/LPz GOTO EXIT7
IF %2z==/LDz GOTO EXIT8
ECHO N >>PARMS
ECHO N >>PARMS
GOTO EXITS
:EXIT3
ECHO Y >>PARMS
ECHO Y >>PARMS
ECHO S >>PARMS
GOTO EXITS
:EXIT4
ECHO Y >>PARMS
ECHO Y >>PARMS
ECHO P >>PARMS
GOTO EXITS
:EXIT5
ECHO Y >>PARMS
ECHO Y >>PARMS
ECHO D >>PARMS
GOTO EXITS
:EXIT6
ECHO N >>PARMS
ECHO Y >>PARMS
ECHO S >>PARMS
GOTO EXITS
:EXIT7
ECHO N >>PARMS
ECHO Y >>PARMS
ECHO P >>PARMS
èGOTO EXITS
:EXIT8
ECHO N >>PARMS
ECHO Y >>PARMS
ECHO D >>PARMS
:EXITS
SP <PARMS
SORT <%1.BAS >%1
ERASE %1.BAS
RENAME %1 %1.BAS
BASCOM %1,%1,NUL /E/O
LINK %1,%1 ;
ERASE %1.OBJ
ERASE PARMS
GOTO EXIT
:EXIT1
ECHO Error: No file name entered.
GO TO EXIT
:EXIT2
ECHO Error: File name %1.SP does not exist.
:EXIT
WS %1.SP
GOTO START