home *** CD-ROM | disk | FTP | other *** search
- echo off
- cls
- echo.
- echo.
- echo.
- echo Auf dieser Diskette befinden sich einige Zeichnungen aus verschiedenen
- echo Branchen sowie Auszüge aus den MegaCad-Normteilebibliotheken.
- echo MegaCad sollte bereits auf Ihrem Rechner installiert sein.
- echo Die Dateien werden in die Verzeichnisse \megacad\prt und \megacad\mac kopiert.
- echo Sie benötigen ca. 6 MB freie Festplattenkapazität.
- echo.
- echo.
- pause
- cls
- cd\
- :MENUEA
- cls
- TYPE \MENUE1.DAT
- \GETKEY 35 18 AUSWAHL:
- IF ERRORLEVEL == 63 GOTO FEHLER1
- IF ERRORLEVEL == 62 GOTO ENDE
- IF NOT ERRORLEVEL == 61 goto error2
- set a=E:\megacad
- set b= E:
- goto janein1
- :ERROR2
- IF NOT ERRORLEVEL == 60 goto error3
- set a=D:\megacad
- set b= D:
- goto janein1
- :error3
- IF NOT ERRORLEVEL == 59 goto fehler1
- set a=C:\megacad
- set b= C:
- goto janein1
- :fehler1
- cls
- echo Das war keine richtige Eingabe, bitte betätigen Sie nur eine der
- echo angegebenen Funktionstasten F1 bis F4
- echo .
- pause
- goto MENUEA
- :janein1
- CLS
- ECHO Alle notwendigen Dateien werden nach %A%\prt und %A%\mac kopiert
- ECHO.
- ECHO Ist das richtig ? Drücken Sie bitte j oder n
- :FRAGE1
- \GETKEY 1 5 EINGABE:
- IF ERRORLEVEL == 110 GOTO MENUEA
- IF ERRORLEVEL == 106 GOTO COP1A
- IF ERRORLEVEL == 79 GOTO FEHLER2
- IF ERRORLEVEL == 78 GOTO MENUEA
- IF ERRORLEVEL == 77 GOTO FEHLER2
- IF ERRORLEVEL == 76 GOTO FEHLER2
- IF ERRORLEVEL == 75 GOTO FEHLER2
- IF ERRORLEVEL == 74 GOTO COP1A
- :FEHLER2
- cls
- echo Bitte nur j oder n bestätigen
- echo .
- pause
- GOTO janein1
- cls
- :cop1a
- md %a%
- cls
- :MENUE2
- cls
- lharc x prt %a%\prt\
- del %a%\mac\*.mac
- lharc x mac %a%\mac\
- cls
- :endinst
- set A=
- set B=
- echo off
- cls
- echo.
- echo.
- echo.
- echo Die Installation ist beendet.
- echo.
- echo.
- echo.
- pause
- cls
- :ende
- echo on
-