home *** CD-ROM | disk | FTP | other *** search
- 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, 7164 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 enthalten ║
- 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 einegegeben 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, 7164 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 enthalten ║
- 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
- :ausn