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