home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Best of German Only 2
/
romside_best_of_german_only_2.iso
/
dos
/
anwender
/
tksfonts
/
entpack.exe
/
INSTALL.BAT
< prev
next >
Wrap
DOS Batch File
|
1994-02-05
|
5KB
|
146 lines
ECHO OFF
CLS
IF EXIST tkssw.exe goto weiter
rem tksswdiskette nicht im Laufwerk
GOTO wrongdisk
rem falsche Diskette
:weiter
CLS
ECHO ╔═══════════════════════════════════════════════════════════════════════╗
ECHO ║ TKS Softfonts Thomas Klaus, Weinberg 16, 74423 Mittelfischach ║
ECHO ║ ║
ECHO ║ Installation und Entpacken einer TKS Font Diskette auf Festplatte. ║
ECHO ║ ║
ECHO ║ Dabei wird ein Verzeichnis TKSSW auf Festplatte angelegt (Vorgabe C:) ║
ECHO ║ Die Datei TKSSW.EXE wird auf Ihre Festplatte kopiert, die enthaltenen ║
ECHO ║ Dateien werden entpackt und TKSSW.EXE wieder gelöscht. ║
ECHO ║ ║
ECHO ║ Sie können natürlich auch ein beliebiges Verzeichnis auf einer ║
ECHO ║ anderen Festplatte angeben. ║
ECHO ║ ║
ECHO ║ Beispiel: INSTALL D: HPFONTS kopiert die Fonts nach D:\HPFONTS ║
ECHO ║ oder: INSTALL D: TKSSW kopiert die Fonts nach D:\TKSSW ║
ECHO ║ ║
ECHO ║ Falls Sie nur INSTALL eingegeben haben wird nach C:\TKSSW kopiert. ║
ECHO ║ Sofern Sie das nicht möchten brechen Sie nun mit STRG+C ab und rufen ║
ECHO ║ INSTALL mit den gewünschten Angaben auf. ║
ECHO ╚═══════════════════════════════════════════════════════════════════════╝
ECHO ╔═══════════════════════════════════════════════════════════════════════╗
ECHO ║ Weiter mit beliebiger Taste - Abbruch mit STRG+C ║
ECHO ╚═══════════════════════════════════════════════════════════════════════╝
ECHO.
PAUSE >NUL
IF "%1" == "" GOTO drivec
rem [Installation auf C:]
rem [Prüfen ob %1 vorhanden ist]
ECHO test >%1\abcxyz.tmp
if not exist %1\*.* goto wrongdrive
DEL %1\abcxyz.tmp > NUL
IF "%2" == "" goto subdir
rem [Kopieren der Dateien...]
IF NOT EXIST %1\%2\*.* MD %1\%2 > NUL
echo .
echo .
Echo am kopieren auf %1\%2
copy tkssw.exe %1\%2
IF NOT EXIST %1\%2\*.* GOTO fehler
%1
CD\%2
IF EXIST tkssw.exe tkssw
IF EXIST tkssw.exe DEL tkssw.exe >NUL
GOTO ende2
:drivec
ECHO ╔══════════════════════════════════════════════════════════════════════╗
ECHO ║ Gewählt C:\TKSSW Weiter mit beliebiger Taste - Abbruch mit STRG C ║
ECHO ╚══════════════════════════════════════════════════════════════════════╝
PAUSE >NUL
IF NOT EXIST c:\tkssw\*.* MD c:\tkssw > NUL
echo .
echo .
Echo am kopieren auf C:\TKSSW
copy tkssw.exe c:\tkssw
IF NOT EXIST c:\tkssw\*.* GOTO fehler
c:
CD\tkssw
IF EXIST tkssw.exe tkssw
IF EXIST tkssw.exe DEL tkssw.exe >NUL
GOTO ende2
:subdir
IF NOT EXIST %1\tkssw\*.* MD %1\tkssw > NUL
echo .
echo .
Echo am kopieren auf %1\tkssw
copy tkssw.exe %1\tkssw
IF NOT EXIST %1\tkssw\*.* GOTO fehler
%1
CD\tkssw
IF EXIST tkssw.exe tkssw
IF EXIST tkssw.exe DEL tkssw.exe >NUL
GOTO ende2
:fehler
CLS
ECHO ╔═══════════════════════════════════════════════════════════════════════╗
ECHO ║ TKS Softfonts Thomas Klaus, Weinberg 16, 74423 Mittelfischach ║
ECHO ║ ║
ECHO ║ Installation und Entpacken einer TKS Font Diskette auf Festplatte. ║
ECHO ║ ║
ECHO ║ Dabei wird ein Verzeichnis TKSSW auf Festplatte angelegt (Vorgabe C:) ║
ECHO ║ Die Datei TKSSW.EXE wird auf Ihre Festplatte kopiert, die enthaltenen ║
ECHO ║ Dateien werden entpackt und TKSSW.EXE wieder gelöscht. ║
ECHO ║ ║
ECHO ║ Sie können natürlich auch ein beliebiges Verzeichnis auf einer ║
ECHO ║ anderen Festplatte angeben. ║
ECHO ║ ║
ECHO ║ Beispiel: INSTALL D: HPFONTS kopiert die Fonts nach D:\HPFONTS ║
ECHO ║ oder: INSTALL D: TKSSW kopiert die Fonts nach D:\TKSSW ║
ECHO ║ ║
ECHO ╚═══════════════════════════════════════════════════════════════════════╝
echo.
ECHO ╔══════════════════════════════╗
ECHO ║ Weiter mit beliebiger Taste ║
ECHO ╚══════════════════════════════╝
pause >NUL
GOTO aus
:wrongdrive
cls
echo.
Echo Das angegebene Laufwerk existiert leider nicht, oder Sie haben vergessen
echo den Doppelpunkt mit anzugeben (C anstatt C:)
echo.
ECHO ╔══════════════════════════════╗
ECHO ║ Weiter mit beliebiger Taste ║
ECHO ╚══════════════════════════════╝
pause > nul
goto aus
:wrongdisk
CLS
ECHO FEHLER: Bitte starten Sie INSTALL direkt von der TKS Softfont Diskette.
ECHO.
ECHO ╔══════════════════════════════╗
ECHO ║ Weiter mit beliebiger Taste ║
ECHO ╚══════════════════════════════╝
pause > nul
goto ende
:ende2
start
:ende
CLS
ECHO ... das war's ...
ECHO ON
:aus