home *** CD-ROM | disk | FTP | other *** search
/ Media Gallery 1996 January / MG_0196.ISO / spea / install / mirp64 / util / install.dat < prev    next >
Text File  |  1995-11-20  |  37KB  |  1,071 lines
  1. @DefineProject
  2.  @Name = "V7-MIRAGE P-64"
  3.  @Version ="Release 1095.1"
  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"
  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, 10, 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
  378.  || 'T' [= @Group || 'M' [= @Group || 'U' [= @Group) @Else
  379. @Display @Cls
  380. @If(@L==2)
  381.  Es wurde nichts ausgewählt!
  382. @Else
  383.  Nothing was selected!
  384. @Endif
  385. @Pause
  386. @EndDisplay
  387. @Goto NOCHMAL
  388. @Endif
  389.  
  390. ENVIRON:
  391. @GetOutDrive @If(@Pl==1) @LocalWindow(24, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 20, 12, 35) @Endif
  392. @If(@L==2) Auf welchem Laufwerk wollen Sie die
  393.  @Name installieren?
  394. @If(@Pl==1) Mit den Tasten @UP und @DN können Sie ein Laufwerk auswählen.
  395.  Drücken Sie anschließend @RET. @Endif // @Pl
  396. @Else
  397.  On which disk drive do you want to install
  398.  the @Name ?
  399. @If(@Pl==1) Use the keys @UP and @DN to select a drive. Press @RET to continue. @Endif // @Pl
  400. @Endif // @L
  401. @EndOutDrive
  402.  
  403. @GetSubDir
  404. @If(@L==2) In welchem Verzeichnis wollen Sie die
  405.  @Name installieren?
  406. @Else
  407.  In which directory do you want to install
  408.  the @Name ?
  409. @Endif // @L
  410. @If(@Pl==1) @LocalWindow(16, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 6, 0, 7, 50) @Endif
  411. @EndSubDir
  412.  
  413. @If(@Exists("@OutDrive:@SubDir"))
  414. @ClearOption(0)
  415. @ClearOption(1)
  416. @GetOption
  417. @If(@Pl==1) @LocalWindow(16, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 6, 20, 8, 26) @Endif
  418. @If(@L==2)
  419.  Verzeichnis @OutDrive:@SubDir existiert bereits.
  420.  Wollen Sie die Installation in diesem Verzeichnis fortsetzen?
  421.  
  422. @If(@Pl==1) Wählen Sie JA oder NEIN mit den Tasten @UP und @DN.
  423.  Drücken Sie anschließend @RET. @Endif // @Pl
  424. @Else
  425.  Directory @OutDrive:@SubDir already exists.
  426.  Do you want to continue installing in this directory?
  427.  
  428. @If(@Pl==1) Use the keys @UP and @DN to select YES or NO.
  429.  Press @RET to continue. @Endif // @Pl
  430. @Endif // @L
  431. @Option 1 = "@Y"
  432. @Option 0 = "@N"
  433. @EndOption
  434. @If (0 [= @Option) @Goto ENVIRON @Endif
  435. @Endif // @Exists
  436.  
  437.  
  438. @If('D' [= @Group || 'T' [= @Group)
  439. @If('D' [= @Group)
  440.  @ClearOption(11)
  441.  @ClearOption(12)
  442. @GetOption @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 7, 25) @Endif
  443. @t131 AutoCAD 
  444.  @t132
  445. @If(@Pl==1)@t133 @Endif
  446. @Option 12 = "AutoCAD Release 12"
  447. @Option 11 = "AutoCAD Release 11"
  448. @EndOption
  449. @Endif /* 'D' */
  450.  
  451. @If(11 [= @Option)
  452. aqu11:
  453. @If('B' [! @Group)
  454. @GetOutDrive @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  455. @t141
  456. @t142
  457. @If(@Pl==1)@t011
  458. @t012 @Endif
  459. @EndOutDrive
  460.  
  461. @GetSubdir
  462. @t143
  463. @t142
  464. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 6, 0, 7, 50) @Endif
  465. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @SubDir)? " @Endif
  466. @EndSubdir
  467.  
  468. @Endif /* !'B' */
  469.  
  470. @ELSEIF (12 [= @Option)
  471. acad12:
  472. @GetOutDrive @acad12drv @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  473. @t041 AutoCAD Rel.12 @t042
  474. @If(@Pl==1)@t011
  475. @t012 @Endif
  476. @EndOutDrive
  477.  
  478. @GetSubdir @acad12dir @Default = "\\ACAD\\"
  479. @t051 AutoCAD Rel.12 @t042
  480. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  481. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @acad12dir)? " @Endif
  482. @EndSubdir
  483.  
  484. @If(@Exists "@acad12drv:@acad12dir") @Else
  485.  @ClearOption(0)
  486.  @GetOption @If(@PL==1) @Checkbox @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 6, 8) @Endif
  487. @t081 @acad12drv:@acad12dir @t061
  488.  
  489. @If(@Pl==1)@t021
  490. @t022
  491. @t023
  492.  @Option 0 = "" @ElseIf(@Pl==3) @Option 1 = "@N" @Option 0 = "@Y" @Endif
  493.  @EndOption
  494.  @If(0 [! @Option) @Goto acad12 @Endif
  495. @Endif
  496.  
  497. aqu12:
  498. @If('B' [! @Group)
  499. @GetOutDrive @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  500. @t144
  501. @t145
  502. @If(@Pl==1)@t011
  503. @t012 @Endif
  504. @EndOutDrive
  505.  
  506. @GetSubdir
  507. @t146
  508. @t145
  509. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  510. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @SubDir)? " @Endif
  511. @EndSubdir
  512. @Endif /* !'B' */
  513.  
  514. @ELSE /* Kein AutoCAD, nur AutoShade / 3DStudio */
  515. aqush3ds:
  516. @If('B' [! @Group)
  517. @GetOutDrive @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  518. @t141
  519. @t147
  520. @If(@Pl==1)@t011
  521. @t012 @Endif
  522. @EndOutDrive
  523.  
  524. @GetSubdir
  525. @t143
  526. @t147
  527. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  528. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @SubDir)? " @Endif
  529. @EndSubdir
  530. @Endif /* !'B' */
  531. @ENDIF /* 11,12 */
  532.  
  533. @GetOption @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 3, 0, 10, 10) @Endif
  534. @t148
  535. @If(@Pl==1)@t133 @Endif
  536.  @Option 220 = "6X9"
  537.  @Option 230 = "8X16"
  538.  @Option 240 = "9X15"
  539.  @Option 250 = "12X20"
  540.  @Option 260 = "12X24"
  541.  @Option 270 = "15X25"
  542.  @Option 280 = "16X30"
  543. @EndOption
  544. @Endif /* 'D' || 'T' */
  545.  
  546. @If('M'[= @Group)
  547. ustatp:
  548. @GetOutDrive @ustapdrv @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  549. @t041 MicroStation 4.0x @t042
  550. @If(@Pl==1)@t011
  551. @t012 @Endif
  552. @EndOutDrive
  553.  
  554. @GetSubdir @ustapdir @Default = "\\USTATION\\"
  555. @t051 MicroStation 4.0x @t042
  556. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  557. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @ustapdir)? " @Endif
  558. @EndSubdir
  559.  
  560. @If(@Exists "@ustapdrv:@ustapdir") @Else
  561.  @ClearOption(0)
  562.  @GetOption @If(@PL==1) @Checkbox @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 6, 8) @Endif
  563. @t081 @ustapdrv:@ustapdir @t061
  564.  
  565. @If(@Pl==1)@t021
  566. @t022
  567. @t023
  568.  @Option 0 = "" @ElseIf(@Pl==3) @Option 1 = "@N" @Option 0 = "@Y" @Endif
  569.  @EndOption
  570.  @If(0 [! @Option) @Goto ustatp @Endif
  571. @Endif
  572. @Endif /* 'M' */
  573.  
  574. @If('U'[= @Group)
  575. ustat5p:
  576. @GetOutDrive @usta5drv @If(@Pl==1) @LocalWindow (15, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 5, 0, 12, 15) @Endif
  577. @t041 MicroStation 5.0 @t042
  578. @If(@Pl==1)@t011
  579. @t012 @Endif
  580. @EndOutDrive
  581.  
  582. @GetSubdir @usta5dir @Default = "\\USTATION\\"
  583. @t051 MicroStation 5.0 @t042
  584. @If(@Pl==1) @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 5, 50) @Endif
  585. @If(@Pl==1) @Prompt = "@t091 ([─┘] = @usta5dir)? " @Endif
  586. @EndSubdir
  587.  
  588. @If(@Exists "@usta5drv:@usta5dir") @Else
  589.  @ClearOption(0)
  590.  @GetOption @If(@PL==1) @Checkbox @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 4, 0, 6, 8) @Endif
  591. @t081 @usta5drv:@usta5dir @t061
  592.  
  593. @If(@Pl==1)@t021
  594. @t022
  595. @t023
  596.  @Option 0 = "" @ElseIf(@Pl==3) @Option 1 = "@N" @Option 0 = "@Y" @Endif
  597.  @EndOption
  598.  @If(0 [! @Option) @Goto ustat5p @Endif
  599. @Endif
  600. @Endif /* 'U' */
  601.  
  602.  
  603. /*
  604. @If(@Pl==3 && 'W' [= @Group)
  605. // Video for Windows installieren/aktualisieren?
  606. @If(@OS==3 || @OS==2)
  607. @If(@Exists("@WinSysDrive:@WinSysDir\\MSVIDEO.DLL"))
  608. @If(@FileDate("@WinSysDrive:@WinSysDir\\MSVIDEO.DLL") < @StrToDate("1995/3/16"))
  609. @GetOption
  610. @DlgCtrlSize(0, 10, 20, 12, 26)
  611. @If(@L==2)
  612. Eine ältere Version von MS Video for Windows
  613. ist bereits installiert. Diese Version sollte
  614. aktualisiert werden.
  615.  
  616. Wollen Sie die neueste Version von
  617. MS Video for Windows 1.1 installieren?
  618. @Else // @L
  619. An older version of MS Video for Windows
  620. is already installed. This version should
  621. be updated.
  622.  
  623. Do you want to install the latest version
  624. of MS Video for Windows 1.1?
  625. @Endif // @L
  626. @Option 1 = "@Y"
  627. @Option 0 = "@N"
  628. @EndOption
  629. @If(1 [= @Option) @SetGroup(V) @Endif
  630. @Endif // @FileDate, @StrToDate
  631. @Else // @Exists
  632.  @SetGroup(V)
  633. @Endif // @Exists
  634. @Endif // @OS
  635. @Endif // @Pl && 'W'
  636. /**/
  637.  
  638.  
  639. @DefineDisk
  640.     @Label = "Utilities & Various DOS Drivers"
  641.  
  642. @If(@L==2)
  643.  @F   README.GER @O README      @Group bw
  644.  @F  MAILBOX.GER @O MAILBOX.DOC @Group bw
  645. @If(@OS!=4) @F     DPMS.GER @O DPMS.DOC    @Group s @Endif
  646. @Else
  647.  @F   README.ENG @O README      @Group bw
  648.  @F  MAILBOX.ENG @O MAILBOX.DOC @Group bw
  649. @If(@OS!=4) @F     DPMS.ENG @O DPMS.DOC    @Group s @Endif
  650. @Endif // @L
  651.  
  652.  @F  BIOS.TXT @Group b
  653. @If(@Pl==1) @F  SHOW.EXE @Group bws   @Endif
  654. @If(@Pl==3) @F WSHOW.EXE @Group bws   @Endif
  655.  
  656.     @BeginLib V7MIRP64.LIF
  657. /* Utilities: */
  658.       @File V7MIPVBE.EXE @Group b
  659.       @File   S3TEST.EXE @Group b
  660.       @File    SMODE.EXE @Group b
  661.       @File  V7HFREQ.COM @Group b
  662.  
  663. //@If(@V7==0xCA || @V7==0xDA || @V7==0xEA || @V7==0xFA)
  664. //      @File     EFIX.EXE @Group b
  665. //@Endif // @V7
  666.  
  667. @If(@OS==4)
  668.  @F   S3TEST.PIF @Group b
  669.  @F   SPTUNE.PIF @Group b
  670. @Endif // @OS
  671.  
  672.       @File   SPTUNE.EXE @Group b
  673. @If(@L==2)
  674.       @File   SPTUNE.GHP          @Out   SPTUNE.HLP @Group b
  675.       @File   SPTUNE.GER          @Out   SPTUNE.TCO @Group b
  676. @Else
  677.       @File   SPTUNE.EHP          @Out   SPTUNE.HLP @Group b
  678.       @File   SPTUNE.ENG          @Out   SPTUNE.TCO @Group b
  679. @Endif
  680.  
  681.       @File  BIT6X15.FNT @Out fonts\\BIT6X15.FNT  @Group b
  682.       @File COU15X25.FNT @Out fonts\\COU15X25.FNT @Group b
  683.       @File  COU9X16.FNT @Out fonts\\COU9X16.FNT  @Group b
  684.       @File     SANS.CHR @Out fonts\\SANS.CHR     @Group b
  685.  
  686.       @File MODETRIO.DAT @Out monitors\\MODETRIO.DAT @Group b
  687.           @File V7I6B37.SDD @Out monitors\\V7I6B37.SDD @Group b
  688.           @File V7I6B38.SDD @Out monitors\\V7I6B38.SDD @Group b
  689.           @File V7I6B49.SDD @Out monitors\\V7I6B49.SDD @Group b
  690.           @File V7I6B60.SDD @Out monitors\\V7I6B60.SDD @Group b
  691.           @File V7I6B68.SDD @Out monitors\\V7I6B68.SDD @Group b
  692.           @File V7I6B79.SDD @Out monitors\\V7I6B79.SDD @Group b
  693.           @File V7I6B90.SDD @Out monitors\\V7I6B90.SDD @Group b
  694.           @File V7I6T37.SDD @Out monitors\\V7I6T37.SDD @Group b
  695.           @File V7I6T38.SDD @Out monitors\\V7I6T38.SDD @Group b
  696.           @File V7I6T49.SDD @Out monitors\\V7I6T49.SDD @Group b
  697.           @File V7I6T60.SDD @Out monitors\\V7I6T60.SDD @Group b
  698.           @File V7I6T68.SDD @Out monitors\\V7I6T68.SDD @Group b
  699.           @File V7I6T79.SDD @Out monitors\\V7I6T79.SDD @Group b
  700.           @File V7I6T90.SDD @Out monitors\\V7I6T90.SDD @Group b
  701.  
  702.  
  703. // Aquila-Treiber für AutoCAD 11 , AutoShade, 3D Studio:
  704. @F     ACAD.ENG @O ACAD.DOC @Group dt
  705. @F   RCP_S3.EXP @Option 11 @Group d
  706. @F      IBM.LGO @Option 11 @Group d
  707. @F       HP.LGO @Option 11 @Group d
  708. @F   NEWS3I.LGO @Option 11 @Group d
  709. @F   AQUILA.LGO @Option 11 @Group d
  710. // Aquila-Treiber für AutoCAD 12 , AutoShade, 3D Studio:
  711. @F   RCP_S3.EXP @O @acad12drv:@acad12dir\\drv\\RCP_S3.EXP  @Option 12 @Group d
  712. @F      IBM.LGO @O @acad12drv:@acad12dir\\drv\\IBM.LGO     @Option 12 @Group d
  713. @F       HP.LGO @O @acad12drv:@acad12dir\\drv\\HP.LGO      @Option 12 @Group d
  714. @F   NEWS3I.LGO @O @acad12drv:@acad12dir\\drv\\NEWS3I.LGO  @Option 12 @Group d
  715. @F   AQUILA.LGO @O @acad12drv:@acad12dir\\drv\\AQUILA.LGO  @Option 12 @Group d
  716. // Aquila-Treiber nur für AutoShade, 3D Studio:
  717.        @If('D' [! @Group)
  718. @F   RCP_S3.EXP @Group t
  719. @F      IBM.LGO @Group t
  720. @F       HP.LGO @Group t
  721. @F   NEWS3I.LGO @Group t
  722. @F   AQUILA.LGO @Group t
  723.        @Endif
  724. // Fonts für AutoCAD, AutoShade:
  725. @F    12x20.FNT @O fonts\\12x20.FNT    @Group dt
  726. @F    12X24.FNT @O fonts\\12x24.FNT    @Group dt
  727. @F    15X25.FNT @O fonts\\15x25.FNT    @Group dt
  728. @F    16X30.FNT @O fonts\\16x30.FNT    @Group dt
  729. @F      6X9.FNT @O fonts\\6x9.FNT      @Group dt
  730. @F     8X16.FNT @O fonts\\8x16.FNT     @Group dt
  731. @F     9X15.FNT @O fonts\\9x15.FNT     @Group dt
  732.  
  733. /* MicroStation Protected Mode: */
  734. @If(@L==2) @File BIGMICRO.GER @Out BIGMICRO.DOC @Group mu @Else @File BIGMICRO.ENG @Out BIGMICRO.DOC @Group mu @Endif
  735.       @File    VMODE.EXE @Group mu
  736. // MicroStation 4.0x:
  737.       @File  MSPEAS3.EXP @Out @ustapdrv:@ustapdir\\drivers\\MSPEAS3.EXP @Group m
  738.       @File   MSSPEA.MA  @Out @ustapdrv:@ustapdir\\drivers\\MSSPEA.MA   @Group m
  739.       @File   MSSPEA.MGL @Out @ustapdrv:@ustapdir\\drivers\\MSSPEA.MGL  @Group m
  740. // MicroStation 5.0:
  741.       @File  MSPEAS3.MGL @Out @usta5drv:@usta5dir\\drivers\\MSPEAS3.MGL @Group u
  742.       @File  MSPEAS3.MA  @Out @usta5drv:@usta5dir\\drivers\\MSPEAS3.MA  @Group u
  743.       @File  MSPEAS3.DLM @Out @usta5drv:@usta5dir\\drivers\\MSPEAS3.DLM @Group u
  744.      @EndLib
  745.  
  746. @If(@OS==3)
  747.  @BeginLib SPENERGY.LIF
  748.   @F SPENERGY.EXE @O @WindowsDrive:@WindowsDir\\SPENERGY.EXE @Group w
  749. @If(@L==2)
  750.   @F SPENERGY.GER @O @WindowsDrive:@WindowsDir\\SPENERGY.TCO @Group w
  751.   @F   DPMS_D.HLP @O @WindowsDrive:@WindowsDir\\SPENERGY.HLP @Group w
  752. @Else
  753.   @F SPENERGY.ENG @O @WindowsDrive:@WindowsDir\\SPENERGY.TCO @Group w
  754.   @F   DPMS_E.HLP @O @WindowsDrive:@WindowsDir\\SPENERGY.HLP @Group w
  755. @Endif // @L
  756. /*
  757.   @F SPENERGY.EXE @Group w
  758. @If(@L==2)
  759.   @F SPENERGY.GER @O SPENERGY.TCO @Group w
  760.   @F   DPMS_D.HLP @O SPENERGY.HLP @Group w
  761. @Else
  762.   @F SPENERGY.ENG @O SPENERGY.TCO @Group w
  763.   @F   DPMS_E.HLP @O SPENERGY.HLP @Group w
  764. @Endif // @L
  765. /**/
  766.   @F   V7DPMS.DLL @O @WinSysDrive:@WinSysDir\\V7DPMS.DLL @Group w
  767.  @EndLib
  768.  
  769.  @If("@StartupDir" != "\\")
  770.   @If(@L==2)
  771.    @F support\\SUPPORT.GER @O @OutDrive:@SubDir\\SUPPORT.HLP @Group w
  772.   @Else // @L
  773.    @F support\\SUPPORT.ENG @O @OutDrive:@SubDir\\SUPPORT.HLP @Group w
  774.   @Endif // @L
  775.   @F support\\SUPPORT.ICO @O @OutDrive:@SubDir\\SUPPORT.ICO @Group w
  776.  @Endif // @StartupDir
  777.  
  778. @Endif // @OS
  779. @EndDisk
  780.  
  781. @If('B' [= @Group)
  782.  @Write ("@OutDrive:\\@SubDir\\setgdc.bat", "wt", "SET GDC=@OutDrive:@SubDir\n")
  783. @Endif
  784.  
  785. @If(@Pl==1)
  786.  @Write ("@OutDrive:\\@SubDir\\init.bat", "wt", "@@echo off\n")
  787.  @If('B' [= @Group)
  788.   @Write ("@OutDrive:\\@SubDir\\init.bat", "at", "call setgdc.bat\n")
  789.   @Write ("@OutDrive:\\@SubDir\\init.bat", "at", "v7hfreq t\n")
  790. @If(@OS!=2)
  791.   @Write ("@OutDrive:\\@SubDir\\init.bat", "at", "sptune\n")
  792. @Endif // @OS
  793.  @Endif // 'B'
  794. @Endif // @Pl
  795.  
  796. @If('U' [= @Group || 'M' [= @Group)
  797. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "wt", "@@echo off\n")
  798. @If(@L==2)
  799. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "rem Für S3-EINSCHIRMLÖSUNG:\n")
  800. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "SET MSPEAPM=-c10 -v0\n")
  801. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "rem (-v0 steht für die gewünschte oder mögliche Auflösung)\n")
  802. @Else // 2
  803. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "rem For S3 SINGLE SCREEN:\n")
  804. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "SET MSPEAPM=-c10 -v0\n")
  805. @Write ("@OutDrive:\\@SubDir\\MSPEAPM.BAT", "at", "rem (-v0 signifies the desired or possible resolution)\n")
  806. @Endif // 2
  807. @Endif // 'U' || 'M'
  808.  
  809. @If('D' [= @Group || 'T' [= @Group)
  810. @If(11 [= @Option)
  811.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "wt", "SET DSPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  812. @Endif
  813. @If(11 [= @Option && 'T' [= @Group)
  814.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RCPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  815.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RDPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  816. @Endif
  817. @If(12 [= @Option)
  818.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "wt", "SET ACADDRV=@acad12drv:@acad12dir\\DRV\n")
  819. @Endif
  820. @If(12 [= @Option && 'T' [= @Group)
  821.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET DSPADI=@acad12drv:@acad12dir\\DRV\\RCP_S3.EXP\n")
  822.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RCPADI=@acad12drv:@acad12dir\\DRV\\RCP_S3.EXP\n")
  823.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RDPADI=@acad12drv:@acad12dir\\DRV\\RCP_S3.EXP\n")
  824. @Endif
  825. @If(11 [! @Option && 12 [! @Option && 'T' [= @Group)
  826.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "wt", "SET DSPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  827.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RCPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  828.   @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET RDPADI=@OutDrive:@SubDir\\RCP_S3.EXP\n")
  829. @Endif
  830. @If(220 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\6X9.FNT\n")   @Endif
  831. @If(230 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\8X16.FNT\n")  @Endif
  832. @If(240 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\9X15.FNT\n")  @Endif
  833. @If(250 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\12X20.FNT\n") @Endif
  834. @If(260 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\12X24.FNT\n") @Endif
  835. @If(270 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\15X25.FNT\n") @Endif
  836. @If(280 [= @Option) @Write("@OutDrive:\\@SubDir\\V7ACAD.BAT", "at", "SET AQUILA_FONT=@OutDrive:@SubDir\\FONTS\\16X30.FNT\n") @Endif
  837. @Endif /* 'D' || 'T' */
  838.  
  839.  
  840. /*
  841. // Create SPEA Group and Items #0
  842. @If(@OS==2 && 'W' [= @Group)
  843. @DefineVars
  844. @QString @PM1 = "[CreateGroup(SPEA)]"
  845. //@QString @PM2 = "[AddItem(@OutDrive:@SubDir\\SPENERGY.EXE, SPEAenergy,,0)]"
  846. @QString @PM2 = "[AddItem(@WindowsDrive:@WindowsDir\\SPENERGY.EXE, SPEAenergy,,0)]"
  847. @EndVars
  848. @ProgramManager("@PM1@PM2")
  849. @Endif // @OS && 'W'
  850. /**/
  851.  
  852. // Create SPEA Group and Items #1
  853. @If(@OS==3  && 'W' [= @Group)
  854. @DefineVars
  855. @QString @PM1 = "[ShowGroup(SPEA/V7,2)]"
  856. @QString @PM2 = "[CreateGroup(SPEA/V7)]"
  857. @QString @PM3 = "[ReplaceItem(SPEAenergy)]"
  858. @If("@StartupDir" != "\\")
  859.  @QString @PM31 = "[ReplaceItem(Support Info)]"
  860. @Else // @StartupDir
  861.  @QString @PM31 = ""
  862. @Endif // @StartupDir
  863. @EndVars
  864. @ProgramManager("@PM1@PM2@PM3@PM31")
  865. @Endif // @OS && 'W'
  866.  
  867. @ChDrive @InDrive
  868.  
  869. @If(@Pl==3 && 'W' [= @Group)
  870.  @If(@OS==3 || @OS==2)
  871.   @If("@StartupDir" != "\\")
  872.    @ChDir("..\\win31")
  873.    @Chain("Drivers for Windows 3.1x", "..\\win31\\INSTALL.DAT")
  874.   @Else
  875.    @Chain("Drivers for Windows 3.1x")
  876.   @Endif
  877.  @ElseIf(@OS==4)
  878.   @If("@StartupDir" != "\\")
  879.    @ChDir("..\\win95")
  880.    @Chain("Drivers for Windows 95", "..\\win95\\INSTALL.DAT")
  881.   @Else
  882.    @Chain("Drivers for Windows 95")
  883.   @Endif
  884.  @Endif // @OS
  885. @Endif // @Pl && 'W'
  886.  
  887.  
  888. NACHV7SETUP:
  889.  
  890. @Display @Cls
  891. @If(@L==2)
  892. @If(@Pl==3 && 'W' [= @Group)
  893.  Nach Beendigung von V7SETUP@Else Nun@Endif wird die Datei
  894.  README geöffnet. Sie enthält die neuesten
  895.  Informationen zur @Name.
  896.  
  897.  Um die Installation fortzusetzen, beenden Sie
  898.  README mit der Taste [Esc].
  899. @Else // @L
  900. @If(@Pl==3 && 'W' [= @Group)
  901.  After the end of V7SETUP@Else Now@Endif, the file README
  902.  will be opened. It contains the latest
  903.  information on @Name.
  904.  
  905.  To continue the installation, terminate README
  906.  with the key [Esc].
  907. @Endif // @L
  908. @Pause
  909. @EndDisplay
  910.  
  911. @ChDrive @OutDrive
  912. @ChDir ("@SubDir")
  913. @If(@Exists("@OutDrive:@SubDir\\README"))
  914.  @If(@Pl==1)
  915.   @If (@System "show readme") @Endif
  916.  @ElseIf(@Pl==3)
  917.   @WinExec("@OutDrive:@SubDir\\WSHOW README.", 1, (-1))
  918.  @Endif // @Pl
  919. @Endif // @Exists
  920.  
  921. @If('B' [= @Group)
  922. @ChangeLine("V7HFREQ", "", "@BootDrive:\\AUTOEXEC.BAT")
  923. @ChangeLine("V7HFREQ", "", "@BootDrive:\\AUTOEXEC.BAT")
  924. @ChangeLine("V7HFREQ", "", "@BootDrive:\\AUTOEXEC.BAT")
  925.  
  926. @SetAutoexec @Overwrite
  927.  @SetReplace("GDC", "@OutDrive:@SubDir")
  928. @If(@OS==4)
  929.  @Verbatim "@OutDrive:@SubDir\\V7HFREQ t w"
  930. @Else // @OS
  931.  @Verbatim "@OutDrive:@SubDir\\V7HFREQ t"
  932. @Endif // @OS
  933. @EndAutoexec
  934. @Endif // 'B'
  935.  
  936. // Create SPEA Group and Items #2
  937. @If(@OS==3 && 'W' [= @Group)
  938. @DefineVars
  939. @QString @PM5 = "[CreateGroup(SPEA/V7)]"
  940. @QString @PM6 = "[AddItem(@WindowsDrive:@WindowsDir\\SPENERGY.EXE, SPEAenergy,,0)]"
  941. @If("@StartupDir" != "\\")
  942.  @QString @PM61 = "[AddItem(@WindowsDrive:@WindowsDir\\WINHELP.EXE @OutDrive:@SubDir\\SUPPORT.HLP, Support Info, @OutDrive:@SubDir\\SUPPORT.ICO, 0)]"
  943. @Else // @StartupDir
  944.  @QString @PM61 = ""
  945. @Endif // @StartupDir
  946. @QString @PM7 = "[ShowGroup(SPEA/V7,1)]"
  947. @EndVars
  948. @ProgramManager("@PM5@PM6@PM61@PM7")
  949. @Endif // @OS && 'W'
  950.  
  951.  
  952. @If(@Pl==3 && (@OS==3 || @OS==4) && 'W' [= @Group)
  953.  @GetOption @If(@PL==1) @Checkbox @LocalWindow (13, 39) @ElseIf(@Pl==3) @DlgCtrlSize(0, 6, 0, 8, 8) @Endif
  954. @If(@L==2)
  955. Zur Vervollständigung der Installation
  956. muß Ihr Computer neu gestartet werden.
  957. Wollen Sie jetzt neustarten?
  958. @Else
  959. Your computer must be rebooted
  960. to complete the installation.
  961. Do you want to reboot now?
  962. @Endif // @L
  963. @If(@Pl==1)@t021
  964. @t022
  965. @t023
  966.  @Option 0 = "" @ElseIf(@Pl==3) @Option 0 = "@Y" @Option 1 = "@N" @Endif
  967.  @EndOption
  968. @DefineVars @If(0 [= @Option) @Integer @WinExit = 1 @Else @Integer @WinExit = 0 @Endif @EndVars
  969. @Endif // @Pl && @OS && 'W'
  970.  
  971.  
  972. @If(@Pl==1)
  973. @If('W' [= @Group)
  974.  
  975. @Display
  976. @If(@L==2)
  977.  Die Installation von
  978.     @Drivers @and @Utilities @for Windows 3.1x / Windows 95
  979.  wird unter Windows durchgeführt:
  980.  
  981.  
  982.  1. Starten Sie Windows
  983.  
  984.  2. Starten Sie das Installationsprogramm für Windows mit dem Befehl:
  985.     Datei | Ausführen: @InDrive:\@If("@StartupDir" != "\\")SPEAINST@Else@!SETUP@Endif.EXE
  986.  
  987.  3. Wählen Sie "@Drivers @and @Utilities @for Windows 3.1x / Windows 95"
  988. @Else // @L
  989.  The installation of
  990.     @Drivers @and @Utilities @for Windows 3.1x / Windows 95
  991.  must be carried out under Windows:
  992.  
  993.  
  994.  1. Start Windows
  995.  
  996.  2. Start the installation programm for Windows with the command:
  997.     File | Run: @InDrive:\@If("@StartupDir" != "\\")SPEAINST@Else@!SETUP@Endif.EXE
  998.  
  999.  3. Select "@Drivers @and @Utilities @for Windows 3.1x / Windows 95"
  1000. @Endif // @L
  1001. @Pause
  1002. @EndDisplay
  1003. @Endif // 'W'
  1004. @Endif // @Pl
  1005.  
  1006.  
  1007. @Finish
  1008. @If(@Pl==3 && (@OS==3 || @OS==4) && 'W' [= @Group)
  1009. @If(@WinExit==1)
  1010. @If("@StartupDir" == "\\")
  1011. @If(@L==2)
  1012. Ihr Computer wird jetzt neu gestartet.
  1013. Bitte nehmen Sie die Diskette aus Laufwerk @InDrive.
  1014. @Else
  1015. Your computer will now be rebooted.
  1016. Please remove the disk from drive @Indrive.
  1017. @Endif
  1018. @Pause
  1019. @Endif // @StartupDir
  1020. @WindowsExit(-1)
  1021. @Endif // @WinExit
  1022. @Endif // @Pl && @OS && 'W'
  1023.  
  1024. @If(@Pl==3 && @OS==2 && 'W' [= @Group)
  1025. @WindowsExit(-1)
  1026. @Endif // @Pl && @OS && 'W'
  1027.  
  1028. @If(@Pl==1)
  1029. @If(@OS==2) @Else
  1030. @If('B' [= @Group)
  1031.  @Cls
  1032.  @If(@L==2)
  1033.     INSTALL startet nun das Programm SPEAtune.
  1034.     
  1035.     Mit diesem Programm haben Sie die Möglichkeit, die @B
  1036.     optimal an Ihren Monitor anzupassen. Die gewählten Einstellungen
  1037.     können abgespeichert werden und bleiben auch nach einem Neustart
  1038.     des Rechners erhalten.
  1039.     Nähere Informationen entnehmen Sie bitte der Datei README sowie der
  1040.     Online-Hilfe von SPEAtune.
  1041.     
  1042.     Achtung:
  1043.     Wenn Sie die genauen Daten Ihres Monitors nicht kennen, verlassen
  1044.     Sie SPEAtune mit der Taste [Esc].
  1045.  
  1046.  @Pause
  1047.  @Else
  1048.     INSTALL will now start the program SPEAtune.
  1049.     
  1050.     This program allows you to adapt the @B accurately
  1051.     to your monitor. The selected settings can be memorized and will
  1052.     be present after a system reset.
  1053.     
  1054.     For further information, please refer to the file README and to
  1055.     the SPEAtune online-help.
  1056.     
  1057.     Attention:
  1058.     If you do not know the exact specifications of your monitor,
  1059.     press [Esc] to quit SPEAtune.
  1060.  
  1061.  @Pause
  1062.  @Endif
  1063. @ChDrive @OutDrive
  1064. @ChDir ("@SubDir")
  1065. @Endif // 'B'
  1066. @Endif // @OS
  1067. @Endif // @Pl
  1068.  
  1069. @If(@Pl==1) @Execute("@GetENV("COMSPEC")", "/E:1024 /CINIT.BAT") @Endif
  1070. @EndFinish
  1071.