home *** CD-ROM | disk | FTP | other *** search
/ Best of German Only 1 / romside_best_of_german_only_1.iso / anwender / dctkatal / entpack.exe / --------.--- next >
Text File  |  1992-10-01  |  9KB  |  247 lines
  1. .Title "DCT Katalog V. 3.10  Sharewareversion"
  2.  
  3. *---------------------------------- Wilkommen -------------------------------
  4. *----------------------------------------------------------------------------
  5. :Anfang
  6.   .DIALOG
  7.     .Title  "Willkommen"
  8.     .Text   "Willkommen zur Installation des Programmes DCT Katalog V. 3.10"
  9.     .Text
  10.     .Text   "Das Install-Programm wird das Programm DCT Katalog auf Ihrem Computer"
  11.     .Text   "installieren. Folgen Sie einfach den Anweisungen."
  12.     .Text
  13.     .Text   "Um das Install-Programm jederzeit abzubrechen, wählen Sie die"
  14.     .Text   "Schaltfläche 'Installation beenden'."
  15.     .Text
  16.     .Text   "Wird eine Hilfe-Schaltfläche (?) angezeigt, können Sie diese wählen "
  17.     .Text   "um weitere Informationen zu erhalten."
  18.     .Text
  19.     .Text   "Um die Installation fortzufahren, wählen Sie die Schaltfläche"
  20.     .Text   "'Fortfahren'."
  21.     .Button "~F~ortfahren" :Name
  22.     .Button "~I~nstallation beenden" :Abbruch
  23.     .Button "~?~ Hilfe" :Hilfe_1
  24.   .END
  25.  
  26. :Hilfe_1
  27.   .DIALOG
  28.     .Title  "Hilfe"
  29.     .Text   " Wie wird eine Schaltfläche aktiviert ?"
  30.     .Text
  31.     .Text   " Tastatur                              "
  32.     .Text   "  Jede Schaltfläche verfügt über einen hervorgehobenen Buchstaben. "
  33.     .Text   "  Drücken Sie bitte zuerst die [Alt] - Taste und halten Sie sie gedrückt. "
  34.     .Text   "  Drücken Sie nun die Taste des hervorgehobenen Buchstaben. "
  35.     .Text   "
  36.     .Text   " Maus "
  37.     .Text   "  Fahren Sie mit dem Mauszeiger auf eine beliebige Stelle innerhalb "
  38.     .Text   "  einer Schaltfläche und drücken Sie die linke Maustaste. "
  39.     .Text
  40.     .Button "~Z~urück" :Anfang
  41.   .END
  42.  
  43. :Name
  44.   .DIALOG
  45.     .Text "                                                 "
  46.     .Text "  Bitte Quell-Verzeichnis eingeben :             "
  47.     .Input "  " "A:\" 32 V
  48.     .Text
  49.     .Button "~F~ortfahren" :Test
  50.     .Button "~I~nstallation beenden" :Abbruch
  51.     .Button "~?~ Hilfe" :Hilfe2
  52.   .END
  53.  
  54. :Hilfe2
  55.    .DIALOG
  56.      .Title "Hilfe"
  57.      .Text  " Mit der Eingabe des Quell-Verzeichnisses geben Sie an, "
  58.      .Text  " in welchem Laufwerk/Verzeichnis sich die Installations- "
  59.      .Text  " diskette befindet. "
  60.      .Text  " "
  61.      .Text  " Von diesem Laufwerk/Verzeichnis wird dann die Installation "
  62.      .Text  " des Programmes vorgenommen."
  63.      .Text
  64.      .Button "~Z~urück" :Return
  65.    .END
  66.  
  67. :Test
  68.  .SetV1 E1 ++ "\"
  69.  .IfNExist V1 + KATALOG.EX~ :Name :Optionen
  70.  
  71. :Optionen
  72.   .DIALOG
  73.     .Title  "Installations-Optionen"
  74.     .Text   " Um eine vollständige Installation von DCT Katalog durchzuführen,     "
  75.     .Text   " wählen Sie jetzt 'Automatisch'. Dies ist die bevorzugte und "
  76.     .Text   " einfachste Installation. INSTALL kopiert das Programm "
  77.     .Text   " DCT Katalog in das Verzeichnis : 'C:\DCT\KAT'
  78.     .Text
  79.     .Text   " Falls Sie das Verzeichnis, in das DCT Katalog installiert werden     "
  80.     .Text   " soll, ändern wollen, so wählen Sie 'Benutzerdefiniert'"
  81.     .Text
  82.     .Button "~A~utomatisch" :Automatisch
  83.     .Button "~B~enutzerdefiniert" :Benutzerdefiniert
  84.     .Button "~I~nstallation beenden" :Abbruch
  85.     .Button "~?~ Hilfe" :Hilfe3
  86.   .END
  87.  
  88. :Hilfe3
  89.   .DIALOG
  90.     .Title "Hilfe"
  91.     .Text
  92.     .Text " Bei Wahl der Option 'Automatisch' wird das Programm "
  93.     .Text " automatisch in das Verzeichnis C:\DCT\KAT kopiert. "
  94.     .Text " Um das Programm in ein anderes Verzeichnis zu installieren, "
  95.     .Text " wählen Sie die Option 'Benutzerdefiniert'"
  96.     .Text
  97.     .Button "~Z~urück" :Return
  98.   .END
  99.  
  100. :Automatisch
  101.   .SetV2 "C:\DCT\KAT"
  102.   .SetV3 V2 ++ "\"
  103.   .Goto :Kopieren
  104.  
  105. :Benutzerdefiniert
  106.   .Dialog
  107.     .Title "Eingabe des Verzeichnisses"
  108.     .Text
  109.     .Text "  Bitte geben Sie das Verzeichnis ein, in das DCT Katalog  "
  110.     .Text "  installiert werden soll : "
  111.     .Text
  112.     .Text
  113.     .Input "  Verzeichnis : " "C:\DCT\KAT" 30 V
  114.     .Text
  115.     .Text
  116.     .Button "~F~ortfahren":SetzeVerz
  117.     .Button "~I~nstallation beenden":Abbruch
  118.   .End
  119.  
  120. :SetzeVerz
  121.  .SetV2 E1
  122.  .SetV3 V2 ++ "\"
  123.  
  124.  
  125. :Kopieren
  126.  .OpenIDialog V1 V2
  127.    .MakeDir V2 :Weiter "     Erstelle das Verzeichnis " + V2 + " ..."
  128.  
  129. :Weiter
  130. *----------------------------------------------------------------------------
  131. * Kopieren der Katalog Programm - Dateien
  132. *----------------------------------------------------------------------------
  133.    .COPY V1 + "KATALOG.EX~"  V3 + "KATALOG.EXE"  :Label1 :Label2 "    Kopiere " + V1 + "KATALOG.EXE nach " + V2 + " ..."
  134.    .COPY V1 + "KATALOG.CF~"  V3 + "KATALOG.CFG"  :Label1 :Label2
  135.    .COPY V1 + "KATALOG.HL~"  V3 + "KATALOG.HLP"  :Label1 :Label2 "    Kopiere " + V1 + "KATALOG.HLP  nach "  + V2 + " ..."
  136.    .Copy V1 + "MAKE.EX~"     V3 + "MAKE.EXE"     :Label1 :Label2 "    Kopiere " + V1 + "MAKE.EXE     nach " + V2 + " ..."
  137.    .Copy V1 + "CODIERE.EX~"  V3 + "CODIERE.EXE"  :Label1 :Label2 "    Kopiere " + V1 + "CODIERE.EXE  nach " + V2 + " ..."
  138.    .Copy V1 + "INST.BA~"     V3 + "INST.BAT"     :Label1 :Label2 "    Kopiere " + V1 + "INST.BAT     nach " + V2 + " ..."
  139.    .Copy V1 + "MASTER.BA~"   V3 + "MASTER.BAT"   :Label1 :Label2 "    Kopiere " + V1 + "MASTER.BAT   nach " + V2 + " ..."
  140.  
  141.    .IfNExist V3 + "START.BAT" :Start_Not_Ex :Start_Ex
  142.  
  143. :Start_Not_Ex
  144.    .Copy V1 + "START.BA~"    V3 + "START.BAT"    :Label1 :Label2 "    Kopiere " + V1 + "START.BAT    nach " + V2 + " ..."
  145.  
  146. :Start_Ex
  147.    .Copy V1 + "BESTELL.TX~"  V3 + "BESTELL.TXT"  :Label1 :Label2 "    Kopiere " + V1 + "BESTELL.TXT  nach " + V2 + " ..."
  148.    .Copy V1 + "HANDBUCH.TX~" V3 + "HANDBUCH.TXT" :Label1 :Label2 "    Kopiere " + V1 + "HANDBUCH.TXT nach " + V2 + " ..."
  149.    .CHDIR V2 "    Wechsle in das Verzeichnis " + V2 + " ..."
  150. .Dialog
  151.    .Title "Installation abgeschlossen"
  152.    .Text
  153.    .Text  "  Die Sharewareversion des DCT Katalog V. 3.10 wurde erfolgreich  "
  154.    .Text  "  in das Verzeichnis " + V2 + " installiert."
  155.    .Text "
  156.    .Text  "  Sollen die Demo - Katalogdateien installiert werden ? "
  157.    .Text
  158.    .Button "   ~J~a   " :InstDemo
  159.    .Button "  ~N~ein  " :InstDemoNein
  160. .END
  161.  
  162. :InstDemo
  163. *----------------- Erstellen der DEMO.BAT -----------------------------------
  164. *----------------------------------------------------------------------------
  165.   .Del   V3 + DEMO.BAT
  166.   .SetV4 "@ECHO OFF"
  167.   .SetV5 "CD " + V3 + "DEMO"
  168.   .SetV6 "KATALOG"
  169.   .SetV7 "CD " + V2
  170.   .Write V3 + DEMO.BAT V4 :Abbruch
  171.   .Write V3 + DEMO.BAT V5 :Abbruch
  172.   .Write V3 + DEMO.BAT V6 :Abbruch
  173.   .Write V3 + DEMO.BAT V7 :Abbruch
  174.  
  175. *------------------ Kopieren der DEMO - Dateien -------------------------
  176.   .MakeDir V3 + "DEMO" :KopiereDEMO "     Erstelle das Verzeichnis " + V3 + "DEMO ..."
  177.   .CHDIR V3 + "DEMO" "    Wechsle in das Verzeichnis " + V3 + "DEMO ..."
  178.  
  179. :KopiereDEMO
  180.   .DEL V3 + "DEMO\DEMO.*"
  181.   .DEL V3 + "DEMO\DEMO1.*"
  182.   .DEL V3 + "DEMO\DEMO2.*"
  183.   .DEL V3 + "DEMO\DEMO3.*"
  184.   .DEL V3 + "DEMO\KATALOG.DAT"
  185.   .DEL V3 + "DEMO\KATALOG.CFG"
  186.   .DEL V3 + "DEMO\KATALOG.ASC"
  187.   .Copy V1 + "DEMO.EX~"    "DEMO.EXE"    :Label1 :Label2 "    Kopiere " + V1 + "DEMO.EXE   nach " + V2 + "\DEMO ..."
  188.   .Copy V1 + "KATALOG.EX~"  V3 + "DEMO\KATALOG.EXE"  :Label1 :Label2 "    Kopiere " + V1 + "KATALOG.EXE nach " + V2 + "\DEMO ..."
  189.   .Copy V1 + "KATALOG.HL~"  V3 + "DEMO\KATALOG.HLP"  :Label1 :Label2 "    Kopiere " + V1 + "KATALOG.HLP nach " + V2 + "\DEMO ..."
  190.   .Copy V1 + "BESTELL.TX~"  V3 + "DEMO\BESTELL.TXT"  :Label1 :Label2 "    Kopiere " + V1 + "BESTELL.TXT  nach " + V2 + "\DEMO ..."
  191.   .Copy V1 + "HANDBUCH.TX~" V3 + "DEMO\HANDBUCH.TXT" :Label1 :Label2 "    Kopiere " + V1 + "HANDBUCH.TXT nach " + V2 + "\DEMO ..."
  192.   .EXEC "DEMO.EXE >NUL" "    Entpacke Demo - Dateien ..."
  193.   .DEL V3 + "DEMO\DEMO.EXE"
  194.   .CHDIR V2 "   Wechsle in das Verzeichnis " + V2 + " ..."
  195. .DIALOG
  196.   .Title "Installation abgeschlossen"
  197.   .Text
  198.   .Text  "Die Demo - Dateien wurden in das Verzeichnis "
  199.   .Text  V2 + " kopiert."
  200.   .Text  "
  201.   .Text  "Starten Sie nun das Demo durch Eingabe von "
  202.   .Text  "DEMO [Enter]. "
  203.   .Text
  204.   .Button "~O~.K."
  205. .END
  206.  
  207. :InstDemoNein
  208.  .CloseIDialog
  209.  .Goto :Ende
  210.  
  211.  
  212. :Abbruch
  213. .DIALOG
  214.   .Title  "Installation abbrechen"
  215.   .Text   "  Das Programm DCT Katalog V. 3.10