home *** CD-ROM | disk | FTP | other *** search
/ TopWare Tools / TOOLS.iso / tools / top1277 / start.bat < prev    next >
Encoding:
DOS Batch File  |  1992-04-27  |  6.0 KB  |  209 lines
  1. echo off
  2. cls
  3. echo ╔════════════════════════════════════════════════════════════════════╗
  4. echo ║                                                                    ║
  5. echo ║                   ██▀▀▀▀▀▀▀▌  ██      ██  ██          ██           ║
  6. echo ║                   ██          ██      ██  ██          ██           ║
  7. echo ║                   ██          ██      ██  ██          ██▄▄▄▄▄▄▄    ║
  8. echo ║                   ██     ▀▀█  ██      ██  ██          ██       █   ║
  9. echo ║                   ██       █  ██      ██  ██       ▐  ██       █   ║
  10. echo ║                   ██████████  ██████████  ██████████  ██████████   ║
  11. echo ║                                                                    ║
  12. echo ║                                                                    ║
  13. echo ║   S O F T W A R E                                                  ║
  14. echo ║********************************************************************║
  15. echo ║*                                                                  *║
  16. echo ║*                              K 2                                 *║
  17. echo ║*                                                                  *║
  18. echo ║*  VERSION 4.0                        (C) 1991, 1992 G. Blumert    *║
  19. echo ║********************************************************************║
  20. echo ╚════════════════════════════════════════════════════════════════════╝
  21. echo.
  22. echo Guten Tag!
  23. echo.
  24. pause
  25. cls
  26. echo.
  27. if %1*==* goto NoParm
  28. echo Suche Verzeichnis %1
  29. if not exist K2!.exe goto NoFile
  30. chkparm %1
  31. if errorlevel 1 goto NoBackslash
  32. if not Exist %1\nul md %1
  33. if Exist %1\WARNGULB.EXE goto OldVersion
  34. GetDir
  35. if errorlevel 7 goto h
  36. if errorlevel 6 goto g
  37. if errorlevel 5 goto f
  38. if errorlevel 4 goto e
  39. if errorlevel 3 goto d
  40. if errorlevel 2 goto c
  41. if errorlevel 1 goto b
  42. set ORIGLW=A:
  43. if not %ORIGLW%*==A:* goto NoEnv
  44. goto SetDir
  45. :b
  46. set ORIGLW=B:
  47. if not %ORIGLW%*==B:* goto NoEnv 
  48. goto SetDir
  49. :c
  50. set ORIGLW=C:
  51. if not %ORIGLW%*==C:* goto NoEnv
  52. goto SetDir
  53. :d
  54. set ORIGLW=D:
  55. if not %ORIGLW%*==D:* goto NoEnv
  56. goto SetDir
  57. :e
  58. set ORIGLW=E:
  59. if not %ORIGLW%*==E:* goto NoEnv
  60. goto SetDir
  61. :f
  62. set ORIGLW=F:
  63. if not %ORIGLW%*==F:* goto NoEnv
  64. goto SetDir
  65. :g
  66. set ORIGLW=G:
  67. if not %ORIGLW%*==G:* goto NoEnv
  68. goto SetDir
  69. :h
  70. echo.
  71. echo Bitte starten Sie die Installation von einem der Laufwerke A: bis G: !
  72. echo.
  73. goto ende
  74. :NoEnv
  75. echo.
  76. echo Offenbar ist der Umgebungs-Speicher erschöpft!
  77. echo Vergrößern Sie diesen, indem Sie COMMAND.COM mit dem Parameter /E 
  78. echo starten - siehe DOS-Handbuch!
  79. echo.
  80. goto Ende
  81. :SetDir
  82. setdir %1
  83. if exist *.dsk del *.dsk>nul
  84. echo.
  85. echo Entpacke Kalendarien . . .
  86. %ORIGLW%\KALS!
  87. %ORIGLW%\K2KALS!
  88. echo.
  89. echo Welches Kalendarium soll voreingestellt werden? (Bitte Taste drücken)
  90. echo.
  91. echo    (A) Österreich
  92. echo    (C) Schweiz
  93. echo    (D) Bundesrepublik
  94. echo.
  95. :Nochmal
  96. %ORIGLW%\taste
  97. if errorlevel 101 goto nochmal
  98. if errorlevel 100 goto BRD
  99. if errorlevel  99 goto Schweiz
  100. if errorlevel  98 goto nochmal
  101. if errorlevel  97 goto Austria
  102. if errorlevel  69 goto nochmal
  103. if errorlevel  68 goto BRD
  104. if errorlevel  67 goto Schweiz
  105. if errorlevel  66 goto nochmal
  106. if errorlevel  65 goto Austria
  107. goto nochmal
  108. :BRD
  109. copy G_BRDKal.GK3 G_Kal.GK3>nul
  110. echo Kalendarium G_BRDKal.GK3 wurde nach G_Kal.GK3 kopiert!
  111. goto MakeHLP
  112. :Schweiz
  113. copy G_CHKal.GK3 G_Kal.GK3>nul
  114. echo Kalendarium G_CHKal.GK3 wurde nach G_Kal.GK3 kopiert!
  115. goto MakeHLP
  116. :Austria
  117. copy G_AKal.GK3 G_Kal.GK3>nul
  118. echo Kalendarium G_AKal.GK3 wurde nach G_Kal.GK3 kopiert!
  119. :MakeHLP
  120. echo %1\K2 /c%1\NORMAL.CFG >%1\K.BAT
  121. if exist WG4.DOC del WG4.DOC>nul
  122. if exist WG4.HLP del WG4.HLP>nul
  123. if Exist WG4.HLQ del WG4.HLQ>nul
  124. if exist WG4HLP.DEF del WG4HLP.DEF>nul
  125. if exist FORMHLP.EXE del FORMHLP.EXE>nul
  126. echo.
  127. echo Entpacke Hilfe-Dateien . . .
  128. %ORIGLW%\DOKU!
  129. echo.
  130. echo Achtung: jetzt wird aus der Datei WG4.DOC die Hilfedatei WG4.HLP
  131. echo sowie die Textdatei HANDBUCH.TXT erzeugt.
  132. echo HANDBUCH.TXT enthält die komplette Bedienungsanleitung und kann mit einer
  133. echo beliebigen Textverarbeitung angesehen werden.
  134. echo Sie können auch den MORE-Befehl benutzen.
  135. echo.
  136. echo Sie können die Datei mit COPY HANDBUCH.TXT LPT1 ausdrucken, aber Obacht:
  137. echo es werden etwa 60 Seiten Endlospapier.
  138. echo Sollten Sie ein anderes Papierformat benutzen, können Sie die Datei
  139. echo mit dem Programm FORMHLP.EXE neu formatieren.
  140. echo .
  141. echo Die komplette Dokumentation ist auch über die integrierte Hilfefunktion
  142. echo von K2 zugänglich.
  143. echo.
  144. pause
  145. FORMHLP xyz
  146. echo.
  147. echo Entpacke Programmdatei . . .
  148. echo.
  149. %ORIGLW%\K2!
  150. goto Fertig
  151. :OldVersion
  152. echo.
  153. echo Sie arbeiten bisher mit einer sehr alten Programmversion.
  154. echo.
  155. echo Bitte installieren Sie diese Version in ein neues, leeres Unterverzeich-
  156. echo nis und lesen Sie dann die Hinweise in der Datei WAS_IST.NEU!
  157. echo.
  158. goto ende
  159. :NoBackslash
  160. echo Bitte fügen Sie an den Namen des Zielverzeichnisses keinen Backslash an!
  161. echo.
  162. goto Ende
  163. :NoParm
  164. echo.
  165. echo Bitte geben Sie zur Installation an, in welches Verzeichnis die Dateien
  166. echo kopiert werden sollen, z. B.
  167. echo.
  168. echo START C:\TERMINE4
  169. echo.
  170. echo um K2 4.0 im Unterverzeichnis Termine4 auf Festplatte C: zu installieren.
  171. echo.
  172. goto Ende
  173. :NoFile
  174. echo Bitte wechseln Sie vor dem Aufruf dieser Stapeldatei auf das Laufwerk, in
  175. echo dem die Programmdiskette steckt.
  176. echo.
  177. goto Ende
  178. :Fertig
  179. if not exist %ORIGLW%\WG5UTIL!.* goto TestLoadres
  180. if exist SUCHEWG.EXE del SUCHEWG.EXE>nul
  181. echo.
  182. echo Entpacke Weckprogramm . . .
  183. %ORIGLW%\WG5UTIL!
  184. :TestLoadRes
  185. :GanzFertig
  186. set ORIGLW=
  187. cls
  188. echo.
  189. echo Die Installation ist jetzt abgeschlossen!
  190. echo.
  191. echo Die Dokumentation heißt HANDBUCH.TXT - bitte aufmerksam lesen!
  192. echo.
  193. echo Bitte stellen Sie sicher, daß Ihre Datei CONFIG.SYS den Eintrag
  194. echo FILES=15 (oder höher) enthält. Anderenfalls erhalten Sie häufig
  195. echo die Meldung "zu viele offene Dateien!
  196. echo.
  197. echo.
  198. echo Bitte starten Sie das Programm, indem Sie 
  199. echo.
  200. echo K [Eingabetaste (Enter)]
  201. echo.
  202. echo eintippen!
  203. echo.
  204. echo.
  205. echo Programm starten mit beliebiger Taste, Abbruch mit STRG+C (^C)!
  206. pause>nul
  207. K
  208. :ende
  209.