home *** CD-ROM | disk | FTP | other *** search
- ECHO OFF RBASE 4000 BY MICRORIM
- CLS
- TYPE CPC.TXT
- IF NOT EXIST CPC.TXT GOTO COPYRT
- Rem Rbase 4000
- SET .OVL=#!"C:\RB4K
- SET 'RBASE=#!"C:\RB4K
- SET 'XRW=#!"C:\RB4K
- SET 'RB4000=#!"C:\RB4K
- SET .DAT=#!"C:\RB4K
- SET .XRW=#!"C:\RB4K
- SET 'RBEDIT=#!"C:\RB4K;
- SET 'CLOUT=#!"C:\RB4K
- SET 'GATEWAY=#!"C:\RB4K
- SET .CMD=#C:\RB4KDATA
- SET .RBS=#C:\RB4KDATA
- SET .REP=#C:\RB4KDATA
- SET .LEX=#C:\RB4KDATA
- UNI .RU -DEPFTO ON > NUL
- RB4000
- IF NOT EXIST RB4000.EXE GOTO END
- UNI .RC -# > NUL
- UNI .RU -.* OFF > NUL
- GOTO STOP
- :END
- CLS
- UNI .RC -# > NUL
- ECHO ... Unable to find Rb4000 command file ...
- GOTO STOP
- :COPYRT
- CLS
- ECHO ... Unable to locate CPC.TXT. Please fix.
- GOTO STOP
- :STOP
-