home *** CD-ROM | disk | FTP | other *** search
/ Media Gallery 1996 January / MG_0196.ISO / spea / install / mirp32 / util / install.dat < prev    next >
Text File  |  1995-11-20  |  34KB  |  1,012 lines
  1. @DefineProject
  2.  @Name = "V7-MIRAGE P-32"
  3.  @Version ="Release 1095.3"
  4.  @OutDrive = C
  5. @If(@StrLen("@GetEnv("GDC")") > 0)
  6.     @SubDir = "@GetEnv("GDC")"
  7. @Else
  8.     @SubDir = "\\SPEA\\GDC"
  9. @Endif // @StrLen, @GetEnv
  10.  @Requires @HardDisk
  11.  @Immediate = 1
  12. @EndProject
  13. @DefineVars @QString @NextName = "@Name" @EndVars
  14.  
  15. @If(@Platform==1)
  16.  @ScrHead(1, M, 0, 63, "$062@Name  $063@Version")
  17. @ElseIf(@Platform==3)
  18.  @BackgroundMode(3, @RGB(0,0,127), @RGB(0,0,127))
  19. // @ScrHead("@Name")
  20. @Endif // @Platform
  21.  
  22. @If(@Platform == 1)
  23.  @FileAttr("C:\\odd33ver.tpl", "r-s-h-")
  24.  @Delete("C:\\odd33ver.tpl")
  25.  @FileAttr("C:\\odd33set.tpl", "r-s-h-")
  26.  @Delete("C:\\odd33set.tpl")
  27.  @FileAttr("D:\\odd33ver.tpl", "r-s-h-")
  28.  @Delete("D:\\odd33ver.tpl")
  29.  @FileAttr("D:\\odd33set.tpl", "r-s-h-")
  30.  @Delete("D:\\odd33set.tpl")
  31.  @FileAttr("E:\\odd33ver.tpl", "r-s-h-")
  32.  @Delete("E:\\odd33ver.tpl")
  33.  @FileAttr("E:\\odd33set.tpl", "r-s-h-")
  34.  @Delete("E:\\odd33set.tpl")
  35.  @FileAttr("F:\\odd33ver.tpl", "r-s-h-")
  36.  @Delete("F:\\odd33ver.tpl")
  37.  @FileAttr("F:\\odd33set.tpl", "r-s-h-")
  38.  @Delete("F:\\odd33set.tpl")
  39.  @FileAttr("G:\\odd33ver.tpl", "r-s-h-")
  40.  @Delete("G:\\odd33ver.tpl")
  41.  @FileAttr("G:\\odd33set.tpl", "r-s-h-")
  42.  @Delete("G:\\odd33set.tpl")
  43.  @System ("getos.bat do it really")
  44.  
  45.  @If(@Exists("C:\\odd33ver.tpl") && @Exists("C:\\odd33set.tpl"))
  46.   @DefineVars @QString @TmpStr = "C:" @EndVars
  47.   @Goto DETECTOS2
  48.  
  49.  @ElseIf(@Exists("D:\\odd33ver.tpl") && @Exists("D:\\odd33set.tpl"))
  50.   @DefineVars @QString @TmpStr = "D:" @EndVars
  51.   @Goto DETECTOS2
  52.  
  53.  @ElseIf(@Exists("E:\\odd33ver.tpl") && @Exists("E:\\odd33set.tpl"))
  54.   @DefineVars @QString @TmpStr = "E:" @EndVars
  55.   @Goto DETECTOS2
  56.  
  57.  @ElseIf(@Exists("F:\\odd33ver.tpl") && @Exists("F:\\odd33set.tpl"))
  58.   @DefineVars @QString @TmpStr = "F:" @EndVars
  59.   @Goto DETECTOS2
  60.  
  61.  @ElseIf(@Exists("G:\\odd33ver.tpl") && @Exists("G:\\odd33set.tpl"))
  62.   @DefineVars @QString @TmpStr = "G:" @EndVars
  63.   @Goto DETECTOS2
  64.  
  65.  @Else // @Exists
  66.   @FlushOptions
  67.   @GetOption @Cls
  68.    @If(@L==2)
  69.  Bitte geben Sie das Betriebssystem an, das gerade aktiv ist.
  70.    @Else // @L
  71.  Please specify the operating system which is currently active.
  72.    @Endif // @L
  73. @Option 1000 = "DOS"
  74. @Option 2000 = "OS/2"
  75. @Option 3000 = "Windows 3.1x"
  76. @Option 4000 = "Windows 95"
  77.   @EndOption
  78.  
  79. @If     (1000 [= @Option) @DefineVars @Integer @OS = 1 @EndVars
  80. @ElseIf (2000 [= @Option) @DefineVars @Integer @OS = 2 @EndVars
  81. @ElseIf (3000 [= @Option) @DefineVars @Integer @OS = 3 @EndVars
  82. @ElseIf (4000 [= @Option) @DefineVars @Integer @OS = 4 @EndVars @Endif
  83.   @Goto OSDETECTED
  84.  @Endif // @Exists
  85.  
  86. DETECTOS2:
  87.  @If(@StrInFile("Operating System/2", "@TmpStr\\odd33ver.tpl") == 1)
  88.   @DefineVars @Integer @OS = 2 @EndVars
  89.  @ElseIf(@StrInFile("Windows 95", "@TmpStr\\odd33ver.tpl") == 1)
  90.   @DefineVars @Integer @OS = 4 @EndVars
  91.  @ElseIf(@StrInFile("Windows NT", "@TmpStr\\odd33ver.tpl") == 1)
  92.   @DefineVars @Integer @OS = 4 @EndVars
  93.  @ElseIf(@StrInFile("DOS", "@TmpStr\\odd33ver.tpl") == 1)
  94.   @If(@StrInFile("windir", "@TmpStr\\odd33set.tpl") == 1)
  95.    @DefineVars @Integer @OS = 3 @EndVars
  96.   @Else
  97.    @DefineVars @Integer @OS = 1 @EndVars
  98.   @Endif
  99.  @Else
  100.   @DefineVars @Integer @OS = 0 @EndVars
  101.  @Endif // @StrInFile
  102.  @Delete("@TmpStr\\odd33ver.tpl")
  103.  @Delete("@TmpStr\\odd33set.tpl")
  104. @ElseIf(@Platform == 3)
  105.  @If(@Chicago == 1)
  106.   @DefineVars @Integer @OS = 4 @EndVars
  107.  @Else // ! @Chicago
  108.   @If(@OS2Info == 1)
  109.    @DefineVars @Integer @OS = 2 @EndVars
  110.   @Else
  111.    @DefineVars @Integer @OS = 3 @EndVars
  112.   @Endif // @OS2Info
  113.  @Endif // @Chicago
  114. @Endif // @Platform
  115. @DefineVars @Integer @Pl = @Platform @EndVars
  116. OSDETECTED:
  117.  
  118. @If(@Pl==1 && (@OS==3 || @OS==4 && "@P4"!="dospart"))
  119. @Display @Cls
  120. @If(@L==2)
  121.  Bitte starten Sie das Installationsprogramm mit dem Befehl:
  122.  
  123. @If("@StartupDir"=="\\")
  124.  Datei | Ausführen: @InDrive:\SETUP.EXE (unter Windows)
  125.  @InDrive:\>INSTALL.BAT                 (unter DOS)
  126. @Else // @StartupDir
  127.  Datei | Ausführen: @InDrive:@StartupDir\SETUP.EXE (unter Windows)
  128.  @InDrive:@StartupDir>INSTALL.BAT                  (unter DOS)
  129. @Endif // @StartupDir
  130. @Else // @L
  131.  Please start the installation program with the command:
  132.  
  133. @If("@StartupDir"=="\\")
  134.  File | Run: @InDrive:\SETUP.EXE (under Windows)
  135.  @InDrive:\>INSTALL.BAT          (under DOS)
  136. @Else // @StartupDir
  137.  File | Run: @InDrive:@StartupDir\SETUP.EXE (under Windows)
  138.  @InDrive:@StartupDir>INSTALL.BAT           (under DOS)
  139. @Endif // @StartupDir
  140. @Endif // @L
  141. @Pause
  142. @EndDisplay
  143. @Exit
  144. @Endif // @Pl, @OS, @P4
  145.  
  146. @If("@P4" == "dospart") @Chain("Utilities & Various DOS Drivers", "DOSPART.DAT") @Endif
  147.  
  148. @DefineVars
  149. @QString @B = "V7-MIRAGE P-32"
  150. @QString @Checkfile = "S3TEST.EXE"
  151.  
  152. @If(@Platform==1)
  153.  @QString @UP  = "[]"
  154.  @QString @DN  = "[]"
  155.  @QString @RET = "[─┘]"
  156. @ElseIf(@Platform==3)
  157.  @If(@L==2)
  158.   @QString @UP  = "AUF"
  159.   @QString @DN  = "AB"
  160.   @QString @RET = "RETURN"
  161.  @Else // @L
  162.   @QString @UP  = "UP"
  163.   @QString @DN  = "DOWN"
  164.   @QString @RET = "ENTER"
  165.  @Endif // @L  
  166. @Endif // @Platform
  167.  
  168.  @Drive @acad12drv = C
  169.  @Dir @acad12dir = "\\ACAD"
  170.  @Drive @ustapdrv = C
  171.  @Dir @ustapdir = "\\USTATION"
  172.  @Drive @usta5drv = C
  173.  @Dir @usta5dir = "\\USTATION"
  174.  @Drive @ckdrv = C
  175.  @Dir @ckdir = "\\CADKEY"
  176.  @Drive @cvandrv = C
  177.  @Dir @cvandir = "\\CADVANCE"
  178.  @Drive @datadrv = C
  179.  @Dir @datadir = "\\MTEC"
  180.  @Drive @gendrv = C
  181.  @Dir @gendir = "\\CADD6"
  182.  @Drive @ustardrv = C
  183.  @Dir @ustardir = "\\USTATION"
  184.  @Drive @lotusdrv = C
  185.  @Dir @lotusdir = "\\123"
  186.  @Drive @symdrv = C
  187.  @Dir @symdir = "\\SYM"
  188.  @Drive @worddrv = C
  189.  @Dir @worddir = "\\WORD"
  190.  @Drive @versadrv = C
  191.  @Dir @versa53dir = "\\VCAD53"
  192.  @Dir @versa54dir = "\\VCAD"
  193.  @Dir @versa386dir = "\\VCAD386"
  194.  @Drive @wpdrv = C
  195.  @Dir @wpdir = "\\WP"
  196.  @QString @d8 = "\n\n\n\n\n\n\n\n"
  197. @If (@L==1) 
  198. @QString @t011 = " Use the keys [] and [] to select a drive. Press [─┘] to continue."
  199. @QString @t012 = " "
  200. @QString @t021 = " Use the SPACE BAR to select YES or NO."
  201. @QString @t022 = " Press [─┘] to continue and create this directory (if YES)"
  202. @QString @t023 = " or to modify the last input (if NO)."
  203. @QString @t033 = " "
  204. @QString @t041 = " On which disk drive is"
  205. @QString @t042 = "installed at present?"
  206. @QString @t051 = " In which directory is"
  207. @QString @t061 = "does not exist. Do you want to create it?"
  208. @QString @t081 = " Directory"
  209. @QString @t091 = " Which directory"
  210. @QString @t101 = "already exists."
  211. @QString @t102 = " Do you want to continue installing in this directory?"
  212. @QString @t111 = " Use the SPACE BAR to select YES or NO. Press [─┘] to continue."
  213. @QString @t133 = " Use the keys [] and [] to select. Press [─┘] to continue."
  214. @QString @t121 = " On which disk drive do you want to install the \"@B Utilities\" ?"
  215. @QString @t131 = " For which version of"
  216. @QString @t132 = "do you want to install @B drivers?"
  217. @QString @t141 = " On which disk drive do you want to install the @B driver"
  218. @QString @t142 = " and the font files for AutoCAD release 11 ?"
  219. @QString @t143 = " In which directory do you want to install the @B driver"
  220. @QString @t144 = " On which disk drive do you want to install the font files"
  221. @QString @t145 = " for AutoCAD Release 12 ?"
  222. @QString @t146 = " In which directory do you want to install the font files"
  223. @QString @t147 = " and the font files for AutoShade / 3DStudio ?"
  224. @QString @t148 = " Which font size do you want to use in AutoCAD und AutoShade ?"
  225. @QString @t171 = "        Select the applications for which you want to install drivers."
  226. @QString @t172 = "        ATTENTION: If this installation program is being executed for"
  227. @QString @t173 = "                   the FIRST TIME, also select \"@B Utilities\"."
  228. @QString @t174 = "         Use the []  and []  keys to move the cursor up and down."
  229. @QString @t175 = "         Use the SPACE BAR  to activate or deactivate installation of"
  230. @QString @t176 = "         the driver at the cursor position. Press [─┘] when finished."
  231. @QString @t201 = " Please enter the directory in which you want the \"@B Utilities\""
  232. @QString @t202 = " to be installed. The standard name of the directory is: @SubDir"
  233. @QString @t203 = " "
  234. @QString @t204 = "Do you want to continue"
  235. @QString @t205 = " installing the \"@B Utilities\" in this directory?"
  236. @QString @t251 = " On which disk drive did you install the \"@B Utilities\" ?"
  237. @QString @t252 = " In which directory did you install the \"@B Utilities\" ?"
  238. @QString @t253 = "does not contain the \"@B Utilities\"."
  239. @QString @t254 = "does not exist."
  240. @QString @t300 = " Cannot find the \"@B Utilities\" in directory"
  241. @QString @t301 = " If the \"@B Utilities\" are not installed, press [Esc]."
  242. @QString @Y = "YES"
  243. @QString @N = "NO "
  244. @QString @Drivers = "Drivers"
  245. @QString @for = "for"
  246. @QString @and = "and"
  247. @QString @Utilities = "utilities"
  248. @Endif 
  249. @If (@L==2) 
  250. @QString @t011 = " Mit den Tasten [] und [] können Sie ein Laufwerk auswählen."
  251. @QString @t012 = " Bestätigen Sie mit [─┘]."
  252. @QString @t021 = " Wählen Sie JA oder NEIN mit der LEERTASTE."
  253. @QString @t022 = " Drücken Sie [─┘] zur Fortsetzung (Verzeichnis wird erzeugt, wenn JA)"
  254. @QString @t023 = " oder zur Änderung der letzten Eingabe (wenn NEIN)."
  255. @QString @t033 = " "
  256. @QString @t041 = " Auf welchem Laufwerk ist"
  257. @QString @t042 = "derzeit installiert?"
  258. @QString @t051 = " In welchem Verzeichnis ist"
  259. @QString @t061 = "existiert nicht. Wollen Sie es erzeugen ?"
  260. @QString @t071 = " Die Installation von"
  261. @QString @t072 = "wurde erfolgreich vorbereitet."
  262. @QString @t081 = " Verzeichnis"
  263. @QString @t091 = " Welches Verzeichnis"
  264. @QString @t101 = "existiert bereits."
  265. @QString @t102 = " Wollen Sie die Installation in diesem Verzeichnis fortsetzen?"
  266. @QString @t111 = " Wählen Sie JA / NEIN mit der Leertaste. Drücken Sie anschließend [─┘]."
  267. @QString @t133 = " Benutzen Sie die Tasten [] und [] zur Auswahl. Bestätigen Sie mit [─┘]."
  268. @QString @t121 = " Auf welchem Laufwerk wollen Sie die \"@B Utilities\"\n installieren?"
  269. @QString @t131 = " Für welche Version von"
  270. @QString @t132 = "wollen Sie @B Treiber installieren?"
  271. @QString @t141 = " Auf welches Laufwerk wollen Sie den @B Treiber und die"
  272. @QString @t142 = " Schriftfontdateien für AutoCAD Release 11 installieren?"
  273. @QString @t143 = " In welches Verzeichnis wollen Sie den @B Treiber und die"
  274. @QString @t144 = " Auf welches Laufwerk wollen Sie die Schriftfontdateien"
  275. @QString @t145 = " für AutoCAD Release 12 installieren?"
  276. @QString @t146 = " In welches Verzeichnis wollen Sie die Schriftfontdateien"
  277. @QString @t147 = " Schriftfontdateien für AutoShade / 3DStudio installieren?"
  278. @QString @t148 = " Welche Schriftfontgröße wollen Sie in AutoCAD und AutoShade nutzen?"
  279. @QString @t171 = "    Wählen Sie die Anwendungen, für die Treiber installiert werden sollen."
  280. @QString @t172 = "    ACHTUNG:   Wenn dieses Installationsprogramm zum ERSTEN MAL ausgeführt"
  281. @QString @t173 = "               wird, wählen Sie zusätzlich \"@B Utilities\"."
  282. @QString @t174 = "       Mit den Tasten [] und [] können Sie den Auswahlbalken bewegen."
  283. @QString @t175 = "       Mit der LEERTASTE können Sie den invers dargestellten Treiber"
  284. @QString @t176 = "       zur Installation aktivieren/deaktivieren. Fortsetzung mit [─┘]."
  285. @QString @t201 = "      Bitte geben Sie das Verzeichnis an, in dem die"
  286. @QString @t202 = "      \"@B Utilities\" installiert werden sollen."
  287. @QString @t203 = "      Das Standardverzeichnis hierfür lautet: @SubDir"
  288. @QString @t204 = "Wollen Sie die Installation"
  289. @QString @t205 = " der \"@B Utilities\" in diesem Verzeichnis fortsetzen?"
  290. @QString @t251 = " Auf welchem Laufwerk haben Sie die \"@B Utilities\" installiert ?"
  291. @QString @t252 = " In welchem Verzeichnis haben Sie die \"@B Utilities\" installiert ?"
  292. @QString @t253 = "enthält nicht die \"@B Utilities\"."
  293. @QString @t254 = "existiert nicht."
  294. @QString @t300 = " Kann die \"@B Utilities\" nicht finden im Verzeichnis"
  295. @QString @t301 = " Wenn die \"@B Utilities\" nicht installiert sind, drücken Sie [Esc]."
  296. @QString @Y = " JA "
  297. @QString @N = "NEIN"
  298. @QString @Drivers = "Treiber"
  299. @QString @for = "für"
  300. @QString @and = "und"
  301. @QString @Utilities = "Dienstprogramme"
  302. @Endif 
  303. @EndVars
  304.  
  305.  
  306. @If (@Com(1) == 744 || @Com(2) == 744 || @Com(3) == 744 || @Com(4) == 744)
  307.  @If (@L == 2)
  308. @Display @Cls
  309.  
  310.      Warnung:  INSTALL hat einen möglichen Adressenkonflikt in Ihrem
  311.      System bei Adresse 2E8h festgestellt (diese Adresse ist allgemein
  312.      als COM4 reserviert). Wenn in Ihrem System ein Modem, Fax/Modem
  313.      oder eine Soundkarte in Betrieb ist, kann eine Inkompatibilität
  314.      mit der @B vorliegen.
  315.  
  316.      (Einige Peripheriegeräte verwenden diese im allgemeinen unbenutzte
  317.      Adresse, obwohl die AT-Busspezifikation sie für Graphiksubsysteme
  318.      vorsieht.)
  319.  
  320.      Es wird empfohlen, INSTALL jetzt abzubrechen und das betrefffende
  321.      Peripheriegerät auf eine andere Adresse umzukonfigurieren, z.B.
  322.      COM1 oder COM2. Dies kann durch Jumper oder Schalter auf dem Gerät
  323.      erfolgen, oder mit Hilfe eines Dienstprogrammes.
  324.  
  325.    @Pause
  326.    @Cls
  327.  
  328.      Wenn Sie INSTALL nicht abbrechen, können Sie zwar fortfahren, aber
  329.      Sie werden nicht die besonderen Vorteile Ihrer @B nutzen
  330.      können, bis dieser Konflikt beseitigt ist. Möglicherweise treten
  331.      Bild-Darstellungsprobleme unter WINDOWS auf und Auflösungen von
  332.      mehr als 640x480 in 16 Farben laufen nicht korrekt.
  333.  
  334.  
  335.    @Pause
  336. @EndDisplay
  337.  
  338.  @Else /* @L */
  339.  
  340. @Display @Cls
  341.  
  342.      Warning:  INSTALL has detected a potential address conflict in 
  343.      your system at address space 2E8H (generally this space is 
  344.      reserved as COM4).  If you are running a modem, fax/modem 
  345.      or sound card in your system, there may be an incompatibility 
  346.      with the @B .
  347.      
  348.      (Some communication peripherals try and utilize this generally
  349.      unused space, however the AT Bus specification reserves this space
  350.      for graphics subsystems.)
  351.      
  352.      It is recommened that you exit the INSTALL program now and 
  353.      reconfigure the other communciation device for another address 
  354.      such as COM1 or COM2.  This can be done through jumpers or 
  355.      switches on the device, or through a software utility.
  356.  
  357.  
  358.    @Pause
  359.    @Cls
  360.  
  361.  
  362.  
  363.      If you do not exit INSTALL, you can continue but you will not be 
  364.      able to take full advantage of the advanced features of your 
  365.      @B until this conflict is removed.  Probably, you will
  366.      have display problems running Windows and you will not be able
  367.      to properly run resolutions beyond 640x480 in 16 colors.
  368.  
  369.      
  370.  
  371.     @Pause
  372. @EndDisplay
  373.  
  374.  @Endif /* @L */
  375. @EndIf /* @Com */
  376.  
  377. NOCHMAL:
  378. @FlushGroups()
  379. @MaxListSize(8)
  380. @If(@Pl==1) @SetGroup(B) @Endif
  381. @If(@Pl==3) @SetGroup(W) @Endif
  382. /*
  383. @GetGroups @Checkbox @If(@Pl==1) @LocalWindow (12, 39) @Cls @Endif @If(@Pl==3) @DlgCtrlSize(0, 4, 0, 8, 60) @Endif @If(@L==2)
  384.  Welche Teile der @Name Software wollen Sie installieren? @Else
  385.  Which parts of the @Name software do you want to install? @Endif // @L
  386. @d8
  387.  
  388.  
  389.  
  390. @If(@L==2) Mit den Tasten @UP und @DN können Sie den Auswahlbalken bewegen.
  391.  Mit der LEERTASTE können Sie die aktuelle Zeile aktivieren oder
  392.  deaktivieren. Betätigen Sie die Taste @RET zur Fortsetzung.
  393. @Else Use the @UP and @DN keys to move the selection bar.
  394.  Use the SPACE key to activate or deactivate the current line.
  395.  Press the @RET key to continue. @Endif // @L
  396. @Set W = "@Drivers @and @Utilities @for Windows 3.1x / Windows 95 "
  397. @Set B = "@Utilities @for DOS"
  398. @Set D = "S3 @Drivers @for AutoCAD 11/386 & 12"
  399. @Set T = "S3 @Drivers @for AutoShade 2.1, 3DStudio 1.0/2.0    "
  400. //@Set M = "SPEA BigMicro @Drivers @for MicroStation 4.0x "
  401. //@Set U = "SPEA BigMicro @Drivers @for MicroStation 5.0 "
  402. @EndGroups
  403. /**/
  404. @BarOffset(0)
  405.  
  406.  
  407. @If('W' [= @Group || 'B' [= @Group || 'D' [= @Group || 'T' [= @Group) @Else
  408. @Display @Cls
  409. @If(@L==2)
  410.  Es wurde nichts ausgewählt!
  411. @Else
  412.  Nothing was selected!
  413. @Endif
  414. @Pause
  415. @EndDisplay
  416. @Goto NOCHMAL
  417. @Endif
  418.  
  419. ENVIRON:
  420. @GetOutDrive @If(@Pl==1) @LocalWindow(24, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 20, 12, 35) @Endif
  421. @If(@L==2) Auf welchem Laufwerk wollen Sie die
  422.  @Name Software installieren?
  423. @If(@Pl==1) Mit den Tasten @UP und @DN können Sie ein Laufwerk auswählen.
  424.  Drücken Sie anschließend @RET. @Endif // @Pl
  425. @Else
  426.  On which disk drive do you want to install
  427.  the @Name software?
  428. @If(@Pl==1) Use the keys @UP and @DN to select a drive. Press @RET to continue. @Endif // @Pl
  429. @Endif // @L
  430. @EndOutDrive
  431.  
  432. @GetSubDir
  433. @If(@L==2) In welchem Verzeichnis wollen Sie die
  434.  @Name Software installieren?
  435. @Else
  436.  In which directory do you want to install
  437.  the @Name software?
  438. @Endif // @L
  439. @If(@Pl==1) @LocalWindow(16, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 6, 0, 7, 50) @Endif
  440. @EndSubDir
  441.  
  442. @If(@Exists("@OutDrive:@SubDir"))
  443. @ClearOption(0)
  444. @ClearOption(1)
  445. @GetOption
  446. @If(@Pl==1) @LocalWindow(16, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 6, 20, 8, 26) @Endif
  447. @If(@L==2)
  448.  Verzeichnis @OutDrive:@SubDir existiert bereits.
  449.  Wollen Sie die Installation in diesem Verzeichnis fortsetzen?
  450.  
  451. @If(@Pl==1) Wählen Sie JA oder NEIN mit den Tasten @UP und @DN.
  452.  Drücken Sie anschließend @RET. @Endif // @Pl
  453. @Else
  454.  Directory @OutDrive:@SubDir already exists.
  455.  Do you want to continue installing in this directory?
  456.  
  457. @If(@Pl==1) Use the keys @UP and @DN to select YES or NO.
  458.  Press @RET to continue. @Endif // @Pl
  459. @Endif // @L
  460. @Option 1 = "@Y"
  461. @Option 0 = "@N"
  462. @EndOption
  463. @If (0 [= @Option) @Goto ENVIRON @Endif
  464. @Endif // @Exists
  465.  
  466.  
  467. @If('D' [= @Group || 'T' [= @Group)
  468. @If('D' [= @Group)
  469.  @ClearOption(11)
  470.  @ClearOption(12)
  471. @GetOption @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 7, 25) @Endif
  472. @t131 AutoCAD 
  473.  @t132
  474. @If(@Pl==1)@t133 @Endif
  475. @Option 12 = "AutoCAD Release 12"
  476. @Option 11 = "AutoCAD Release 11"
  477. @EndOption
  478. @Endif /* 'D' */
  479.  
  480. @If(11 [= @Option)
  481. aqu11:
  482. @If('B' [! @Group)
  483. @GetOutDrive @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  484. @t141
  485. @t142
  486. @If(@Pl==1)@t011
  487. @t012 @Endif
  488. @EndOutDrive
  489.  
  490. @GetSubdir
  491. @t143
  492. @t142
  493. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 6, 0, 7, 50) @Endif
  494. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @SubDir)? " @Endif
  495. @EndSubdir
  496.  
  497. @Endif /* !'B' */
  498.  
  499. @ELSEIF (12 [= @Option)
  500. acad12:
  501. @GetOutDrive @acad12drv @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  502. @t041 AutoCAD Rel.12 @t042
  503. @If(@Pl==1)@t011
  504. @t012 @Endif
  505. @EndOutDrive
  506.  
  507. @GetSubdir @acad12dir @Default = "\\ACAD\\"
  508. @t051 AutoCAD Rel.12 @t042
  509. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  510. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @acad12dir)? " @Endif
  511. @EndSubdir
  512.  
  513. @If(@Exists "@acad12drv:@acad12dir") @Else
  514.  @ClearOption(0)
  515.  @GetOption @If(@PL==1) @Checkbox @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 6, 8) @Endif
  516. @t081 @acad12drv:@acad12dir @t061
  517.  
  518. @If(@Pl==1)@t021
  519. @t022
  520. @t023
  521.  @Option 0 = "" @ElseIf(@Pl==3) @Option 1 = "@N" @Option 0 = "@Y" @Endif
  522.  @EndOption
  523.  @If(0 [! @Option) @Goto acad12 @Endif
  524. @Endif
  525.  
  526. aqu12:
  527. @If('B' [! @Group)
  528. @GetOutDrive @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  529. @t144
  530. @t145
  531. @If(@Pl==1)@t011
  532. @t012 @Endif
  533. @EndOutDrive
  534.  
  535. @GetSubdir
  536. @t146
  537. @t145
  538. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  539. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @SubDir)? " @Endif
  540. @EndSubdir
  541. @Endif /* !'B' */
  542.  
  543. @ELSE /* Kein AutoCAD, nur AutoShade / 3DStudio */
  544. aqush3ds:
  545. @If('B' [! @Group)
  546. @GetOutDrive @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  547. @t141
  548. @t147
  549. @If(@Pl==1)@t011
  550. @t012 @Endif
  551. @EndOutDrive
  552.  
  553. @GetSubdir
  554. @t143
  555. @t147
  556. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  557. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @SubDir)? " @Endif
  558. @EndSubdir
  559. @Endif /* !'B' */
  560. @ENDIF /* 11,12 */
  561.  
  562. @GetOption @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 3, 0, 10, 10) @Endif
  563. @t148
  564. @If(@Pl==1)@t133 @Endif
  565.  @Option 220 = "6X9"
  566.  @Option 230 = "8X16"
  567.  @Option 240 = "9X15"
  568.  @Option 250 = "12X20"
  569.  @Option 260 = "12X24"
  570.  @Option 270 = "15X25"
  571.  @Option 280 = "16X30"
  572. @EndOption
  573. @Endif /* 'D' || 'T' */
  574.  
  575. @If('M'[= @Group)
  576. ustatp:
  577. @GetOutDrive @ustapdrv @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  578. @t041 MicroStation 4.0x @t042
  579. @If(@Pl==1)@t011
  580. @t012 @Endif
  581. @EndOutDrive
  582.  
  583. @GetSubdir @ustapdir @Default = "\\USTATION\\"
  584. @t051 MicroStation 4.0x @t042
  585. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  586. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @ustapdir)? " @Endif
  587. @EndSubdir
  588.  
  589. @If(@Exists "@ustapdrv:@ustapdir") @Else
  590.  @ClearOption(0)
  591.  @GetOption @If(@PL==1) @Checkbox @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 6, 8) @Endif
  592. @t081 @ustapdrv:@ustapdir @t061
  593.  
  594. @If(@Pl==1)@t021
  595. @t022
  596. @t023
  597.  @Option 0 = "" @ElseIf(@Pl==3) @Option 1 = "@N" @Option 0 = "@Y" @Endif
  598.  @EndOption
  599.  @If(0 [! @Option) @Goto ustatp @Endif
  600. @Endif
  601. @Endif /* 'M' */
  602.  
  603. @If('U'[= @Group)
  604. ustat5p:
  605. @GetOutDrive @usta5drv @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  606. @t041 MicroStation 5.0 @t042
  607. @If(@Pl==1)@t011
  608. @t012 @Endif
  609. @EndOutDrive
  610.  
  611. @GetSubdir @usta5dir @Default = "\\USTATION\\"
  612. @t051 MicroStation 5.0 @t042
  613. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  614. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @usta5dir)? " @Endif
  615. @EndSubdir
  616.  
  617. @If(@Exists "@usta5drv:@usta5dir") @Else
  618.  @ClearOption(0)
  619.  @GetOption @If(@PL==1) @Checkbox @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 6, 8) @Endif
  620. @t081 @usta5drv:@usta5dir @t061
  621.  
  622. @If(@Pl==1)@t021
  623. @t022
  624. @t023
  625.  @Option 0 = "" @ElseIf(@Pl==3) @Option 1 = "@N" @Option 0 = "@Y" @Endif
  626.  @EndOption
  627.  @If(0 [! @Option) @Goto ustat5p @Endif
  628. @Endif
  629. @Endif /* 'U' */
  630.  
  631.  
  632. /*
  633. @If(@Pl==3 && 'W' [= @Group)
  634. // Video for Windows installieren/aktualisieren?
  635. @If(@OS==3 || @OS==2)
  636. @If(@Exists("@WinSysDrive:@WinSysDir\\MSVIDEO.DLL"))
  637. @If(@FileDate("@WinSysDrive:@WinSysDir\\MSVIDEO.DLL") < @StrToDate("1995/3/16"))
  638. @GetOption
  639. @DlgCtrlSize(0, 10, 20, 12, 26)
  640. @If(@L==2)
  641. Eine ältere Version von MS Video for Windows
  642. ist bereits installiert. Diese Version sollte
  643. aktualisiert werden.
  644.  
  645. Wollen Sie die neueste Version von
  646. MS Video for Windows 1.1 installieren?
  647. @Else // @L
  648. An older version of MS Video for Windows
  649. is already installed. This version should
  650. be updated.
  651.  
  652. Do you want to install the latest version
  653. of MS Video for Windows 1.1?
  654. @Endif // @L
  655. @Option 1 = "@Y"
  656. @Option 0 = "@N"
  657. @EndOption
  658. @If(1 [= @Option) @SetGroup(V) @Endif
  659. @Endif // @FileDate, @StrToDate
  660. @Else // @Exists
  661.  @SetGroup(V)
  662. @Endif // @Exists
  663. @Endif // @OS
  664. @Endif // @Pl && 'W'
  665. /**/
  666.  
  667.  
  668. @DefineDisk
  669.     @Label = "Utilities & Various DOS Drivers"
  670.  
  671. @If(@L==2)
  672.  @F   README.GER @O README      @Group bw
  673.  @F  MAILBOX.GER @O MAILBOX.DOC @Group bw
  674. @If(@OS!=4) @F     DPMS.GER @O DPMS.DOC    @Group s @Endif
  675. @Else
  676.  @F   README.ENG @O README      @Group bw
  677.  @F  MAILBOX.ENG @O MAILBOX.DOC @Group bw
  678. @If(@OS!=4) @F     DPMS.ENG @O DPMS.DOC    @Group s @Endif
  679. @Endif // @L
  680.  
  681.  @F  BIOS.TXT @Group b
  682. @If(@Pl==1) @F  SHOW.EXE @Group bws   @Endif
  683. @If(@Pl==3) @F WSHOW.EXE @Group bws   @Endif
  684.  
  685.  
  686. @If(@OS==3)
  687.  @BeginLib SPENERGY.LIF
  688.   @F SPENERGY.EXE @O @WindowsDrive:@WindowsDir\\SPENERGY.EXE @Group w
  689. @If(@L==2)
  690.   @F SPENERGY.GER @O @WindowsDrive:@WindowsDir\\SPENERGY.TCO @Group w
  691.   @F   DPMS_D.HLP @O @WindowsDrive:@WindowsDir\\SPENERGY.HLP @Group w
  692. @Else
  693.   @F SPENERGY.ENG @O @WindowsDrive:@WindowsDir\\SPENERGY.TCO @Group w
  694.   @F   DPMS_E.HLP @O @WindowsDrive:@WindowsDir\\SPENERGY.HLP @Group w
  695. @Endif // @L
  696. /*
  697.   @F SPENERGY.EXE @Group w
  698. @If(@L==2)
  699.   @F SPENERGY.GER @O SPENERGY.TCO @Group w
  700.   @F   DPMS_D.HLP @O SPENERGY.HLP @Group w
  701. @Else
  702.   @F SPENERGY.ENG @O SPENERGY.TCO @Group w
  703.   @F   DPMS_E.HLP @O SPENERGY.HLP @Group w
  704. @Endif // @L
  705. /**/
  706.   @F   V7DPMS.DLL @O @WinSysDrive:@WinSysDir\\V7DPMS.DLL @Group w
  707.  @EndLib
  708.  
  709.  @If("@StartupDir" != "\\")
  710.   @If(@L==2)
  711.    @F support\\SUPPORT.GER @O @OutDrive:@SubDir\\SUPPORT.HLP @Group w
  712.   @Else // @L
  713.    @F support\\SUPPORT.ENG @O @OutDrive:@SubDir\\SUPPORT.HLP @Group w
  714.   @Endif // @L
  715.   @F support\\SUPPORT.ICO @O @OutDrive:@SubDir\\SUPPORT.ICO @Group w
  716.  @Endif // @StartupDir
  717.  
  718. @Endif // @OS
  719. @EndDisk
  720.  
  721.  
  722. @If('B' [= @Group)
  723.  @Write ("@OutDrive:\\@SubDir\\setgdc.bat", "wt", "SET GDC=@OutDrive:@SubDir\n")
  724. @Endif
  725.  
  726. @If(@Pl==1)
  727.  @Write ("@OutDrive:\\@SubDir\\init.bat", "wt", "@@echo off\n")
  728.  @If('B' [= @Group)
  729.   @Write ("@OutDrive:\\@SubDir\\init.bat", "at", "call setgdc.bat\n")
  730.   @Write ("@OutDrive:\\@SubDir\\init.bat", "at", "v7hfreq t\n")
  731. @If(@OS!=2)
  732.   @Write ("@OutDrive:\\@SubDir\\init.bat", "at", "sptune\n")
  733. @Endif // @OS
  734.  @Endif // 'B'
  735. @Endif // @Pl
  736.  
  737. @If('U' [= @Group || 'M' [= @Group)
  738. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "wt", "@@echo off\n")
  739. @If(@L==2)
  740. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "rem Für S3-EINSCHIRMLÖSUNG:\n")
  741. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "SET MSPEAPM=-c10 -v0\n")
  742. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "rem (-v0 steht für die gewünschte oder mögliche Auflösung)\n")
  743. @Else // 2
  744. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "rem For S3 SINGLE SCREEN:\n")
  745. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "SET MSPEAPM=-c10 -v0\n")
  746. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "rem (-v0 signifies the desired or possible resolution)\n")
  747. @Endif // 2
  748. @Endif // 'U' || 'M'
  749.  
  750. @If('D' [= @Group || 'T' [= @Group)
  751. @If(11 [= @Option)
  752.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "wt", "SET DSPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  753. @Endif
  754. @If(11 [= @Option && 'T' [= @Group)
  755.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RCPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  756.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RDPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  757. @Endif
  758. @If(12 [= @Option)
  759.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "wt", "SET ACADDRV=@acad12drv:@acad12dir\\DRV\n")
  760. @Endif
  761. @If(12 [= @Option && 'T' [= @Group)
  762.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET DSPADI=@acad12drv:@acad12dir\\DRV\\RCP_S3.EXP\n")
  763.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RCPADI=@acad12drv:@acad12dir\\DRV\\RCP_S3.EXP\n")
  764.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RDPADI=@acad12drv:@acad12dir\\DRV\\RCP_S3.EXP\n")
  765. @Endif
  766. @If(11 [! @Option && 12 [! @Option && 'T' [= @Group)
  767.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "wt", "SET DSPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  768.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RCPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  769.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RDPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  770. @Endif
  771. @If(220 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\6X9.FNT\n")   @Endif
  772. @If(230 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\8X16.FNT\n")  @Endif
  773. @If(240 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\9X15.FNT\n")  @Endif
  774. @If(250 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\12X20.FNT\n") @Endif
  775. @If(260 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\12X24.FNT\n") @Endif
  776. @If(270 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\15X25.FNT\n") @Endif
  777. @If(280 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\16X30.FNT\n") @Endif
  778. @Endif /* 'D' || 'T' */
  779.  
  780.  
  781. /*
  782. // Create SPEA Group and Items #0
  783. @If(@OS==2 && 'W' [= @Group)
  784. @DefineVars
  785. @QString @PM1 = "[CreateGroup(SPEA)]"
  786. //@QString @PM2 = "[AddItem(@OutDrive:@SubDir\\SPENERGY.EXE, SPEAenergy,,0)]"
  787. @QString @PM2 = "[AddItem(@WindowsDrive:@WindowsDir\\SPENERGY.EXE, SPEAenergy,,0)]"
  788. @EndVars
  789. @ProgramManager("@PM1@PM2")
  790. @Endif // @OS && 'W'
  791. /**/
  792.  
  793. // Create SPEA Group and Items #1
  794. @If(@OS==3  && 'W' [= @Group)
  795. @DefineVars
  796. @QString @PM1 = "[ShowGroup(SPEA/V7,2)]"
  797. @QString @PM2 = "[CreateGroup(SPEA/V7)]"
  798. @QString @PM3 = "[ReplaceItem(SPEAenergy)]"
  799. @If("@StartupDir" != "\\")
  800.  @QString @PM31 = "[ReplaceItem(Support Info)]"
  801. @Else // @StartupDir
  802.  @QString @PM31 = ""
  803. @Endif // @StartupDir
  804. @EndVars
  805. @ProgramManager("@PM1@PM2@PM3@PM31")
  806. @Endif // @OS && 'W'
  807.  
  808. @ChDrive @InDrive
  809.  
  810. @If(@Pl==3 && 'W' [= @Group)
  811.  @If(@OS==3 || @OS==2)
  812.   @If("@StartupDir" != "\\")
  813.    @ChDir("..\\win31")
  814.    @Chain("Drivers for Windows 3.1x", "..\\win31\\INSTALL.DAT")
  815.   @Else
  816.    @Chain("Drivers for Windows 3.1x")
  817.   @Endif
  818.  @ElseIf(@OS==4)
  819.   @If("@StartupDir" != "\\")
  820.    @ChDir("..\\win95")
  821.    @Chain("Drivers for Windows 95", "..\\win95\\INSTALL.DAT")
  822.   @Else
  823.    @Chain("Drivers for Windows 95")
  824.   @Endif
  825.  @Endif // @OS
  826. @Endif // @Pl && 'W'
  827.  
  828.  
  829. NACHV7SETUP:
  830.  
  831. @Display @Cls
  832. @If(@L==2)
  833.  Nach Beendigung von V7SETUP wird die Datei
  834.  README geöffnet.
  835.  Sie enthält die neuesten Informationen
  836.  zur @B.
  837.  
  838.  Um die Installation fortzusetzen, beenden Sie
  839.  README mit der Taste [Esc].
  840. @Else // @L
  841.  After termination of V7SETUP, the file README
  842.  will be opened.
  843.  It contains the latest information
  844.  about @B.
  845.  
  846.  To continue the installation, terminate README
  847.  with the key [Esc].
  848. @Endif // @L
  849. @Pause
  850. @EndDisplay
  851.  
  852. @ChDrive @OutDrive
  853. @ChDir ("@SubDir")
  854. @If(@Exists("@OutDrive:@SubDir\\README"))
  855.  @If(@Pl==1)
  856.   @If (@System "show readme") @Endif
  857.  @ElseIf(@Pl==3)
  858.   @WinExec("@OutDrive:@SubDir\\WSHOW README.", 1, (-1))
  859.  @Endif // @Pl
  860. @Endif // @Exists
  861.  
  862. @If('B' [= @Group)
  863. @ChangeLine("V7HFREQ", "", "@BootDrive:\\AUTOEXEC.BAT")
  864. @ChangeLine("V7HFREQ", "", "@BootDrive:\\AUTOEXEC.BAT")
  865. @ChangeLine("V7HFREQ", "", "@BootDrive:\\AUTOEXEC.BAT")
  866.  
  867. @SetAutoexec @Overwrite
  868.  @SetReplace("GDC", "@OutDrive:@SubDir")
  869. @If(@OS==4)
  870.  @Verbatim "@OutDrive:@SubDir\\V7HFREQ t w"
  871. @Else // @OS
  872.  @Verbatim "@OutDrive:@SubDir\\V7HFREQ t"
  873. @Endif // @OS
  874. @EndAutoexec
  875. @Endif // 'B'
  876.  
  877. // Create SPEA Group and Items #2
  878. @If(@OS==3 && 'W' [= @Group)
  879. @DefineVars
  880. @QString @PM5 = "[CreateGroup(SPEA/V7)]"
  881. @QString @PM6 = "[AddItem(@WindowsDrive:@WindowsDir\\SPENERGY.EXE, SPEAenergy,,0)]"
  882. @If("@StartupDir" != "\\")
  883.  @QString @PM61 = "[AddItem(@WindowsDrive:@WindowsDir\\WINHELP.EXE @OutDrive:@SubDir\\SUPPORT.HLP, Support Info, @OutDrive:@SubDir\\SUPPORT.ICO, 0)]"
  884. @Else // @StartupDir
  885.  @QString @PM61 = ""
  886. @Endif // @StartupDir
  887. @QString @PM7 = "[ShowGroup(SPEA/V7,1)]"
  888. @EndVars
  889. @ProgramManager("@PM5@PM6@PM61@PM7")
  890. @Endif // @OS && 'W'
  891.  
  892.  
  893. @If(@Pl==3 && (@OS==3 || @OS==4) && 'W' [= @Group)
  894.  @GetOption @If(@PL==1) @Checkbox @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 6, 0, 8, 8) @Endif
  895. @If(@L==2)
  896. Zur Vervollständigung der Installation
  897. muß Ihr Computer neu gestartet werden.
  898. Wollen Sie jetzt neustarten?
  899. @Else
  900. Your computer must be rebooted
  901. to complete the installation.
  902. Do you want to reboot now?
  903. @Endif // @L
  904. @If(@Pl==1)@t021
  905. @t022
  906. @t023
  907.  @Option 0 = "" @ElseIf(@Pl==3) @Option 0 = "@Y" @Option 1 = "@N" @Endif
  908.  @EndOption
  909. @DefineVars @If(0 [= @Option) @Integer @WinExit = 1 @Else @Integer @WinExit = 0 @Endif @EndVars
  910. @Endif // @Pl && @OS && 'W'
  911.  
  912.  
  913. @If(@Pl==1)
  914. @If('W' [= @Group)
  915.  
  916. @Display
  917. @If(@L==2)
  918.  Die Installation von
  919.     @Drivers @and @Utilities @for Windows 3.1x / Windows 95
  920.  wird unter Windows durchgeführt:
  921.  
  922.  
  923.  1. Starten Sie Windows
  924.  
  925.  2. Starten Sie das Installationsprogramm für Windows mit dem Befehl:
  926.     Datei | Ausführen: @InDrive:\@If("@StartupDir" != "\\")SPEAINST@Else@!SETUP@Endif.EXE
  927.  
  928.  3. Wählen Sie "@Drivers @and @Utilities @for Windows 3.1x / Windows 95"
  929. @Else // @L
  930.  The installation of
  931.     @Drivers @and @Utilities @for Windows 3.1x / Windows 95
  932.  must be carried out under Windows:
  933.  
  934.  
  935.  1. Start Windows
  936.  
  937.  2. Start the installation programm for Windows with the command:
  938.     File | Run: @InDrive:\@If("@StartupDir" != "\\")SPEAINST@Else@!SETUP@Endif.EXE
  939.  
  940.  3. Select "@Drivers @and @Utilities @for Windows 3.1x / Windows 95"
  941. @Endif // @L
  942. @Pause
  943. @EndDisplay
  944. @Endif // 'W'
  945. @Endif // @Pl
  946.  
  947.  
  948. @Finish
  949. @If(@Pl==3 && (@OS==3 || @OS==4) && 'W' [= @Group)
  950. @If(@WinExit==1)
  951. @If("@StartupDir" == "\\")
  952. @If(@L==2)
  953. Ihr Computer wird jetzt neu gestartet.
  954. Bitte nehmen Sie die Diskette aus Laufwerk @InDrive.
  955. @Else
  956. Your computer will now be rebooted.
  957. Please remove the disk from drive @Indrive.
  958. @Endif
  959. @Pause
  960. @Endif // @StartupDir
  961. @WindowsExit(-1)
  962. @Endif // @WinExit
  963. @Endif // @Pl && @OS && 'W'
  964.  
  965. @If(@Pl==3 && @OS==2 && 'W' [= @Group)
  966. @WindowsExit(-1)
  967. @Endif // @Pl && @OS && 'W'
  968.  
  969. @If(@Pl==1)
  970. @If(@OS==2) @Else
  971. @If('B' [= @Group)
  972.  @Cls
  973.  @If(@L==2)
  974.     INSTALL startet nun das Programm SPEAtune.
  975.     
  976.     Mit diesem Programm haben Sie die Möglichkeit, die @B
  977.     optimal an Ihren Monitor anzupassen. Die gewählten Einstellungen
  978.     können abgespeichert werden und bleiben auch nach einem Neustart
  979.     des Rechners erhalten.
  980.     Nähere Informationen entnehmen Sie bitte der Datei README sowie der
  981.     Online-Hilfe von SPEAtune.
  982.     
  983.     Achtung:
  984.     Wenn Sie die genauen Daten Ihres Monitors nicht kennen, verlassen
  985.     Sie SPEAtune mit der Taste [Esc].
  986.  
  987.  @Pause
  988.  @Else
  989.     INSTALL will now start the program SPEAtune.
  990.     
  991.     This program allows you to adapt the @B accurately
  992.     to your monitor. The selected settings can be memorized and will
  993.     be present after a system reset.
  994.     
  995.     For further information, please refer to the file README and to
  996.     the SPEAtune online-help.
  997.     
  998.     Attention:
  999.     If you do not know the exact specifications of your monitor,
  1000.     press [Esc] to quit SPEAtune.
  1001.  
  1002.  @Pause
  1003.  @Endif
  1004. @ChDrive @OutDrive
  1005. @ChDir ("@SubDir")
  1006. @Endif // 'B'
  1007. @Endif // @OS
  1008. @Endif // @Pl
  1009.  
  1010. @If(@Pl==1) @Execute("@GetENV("COMSPEC")", "/E:1024 /CINIT.BAT") @Endif
  1011. @EndFinish
  1012.