home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 April (Special) / Chip-Special_1997-04_cd.bin / spea / mercury / bf18mev / bf18mev1.exe / INSTALL.DAT < prev    next >
Text File  |  1995-12-12  |  13KB  |  426 lines
  1.  
  2. @DefineProject
  3.     @Name           = "BigFocus"
  4.     @Version        = "Release 1295"
  5. @If(@StrLen("@GetEnv("GDC")") > 0)
  6.     @SubDir = "@GetEnv("GDC")"
  7. @Else
  8.     @SubDir = "\\SPEA\\GDC"
  9. @Endif // @StrLen, @GetEnv
  10.     @OutDrive       = C
  11.     @Requires       @HardDisk
  12.     @Immediate = 1
  13. @EndProject
  14. @DefineVars @QString @NextName = "@Name" @EndVars
  15.  
  16. @If(@Platform==1)
  17.  @ScrHead(1, M, 0, 63, "$062SPEA @Name $063@Version")
  18. @ElseIf(@Platform==3)
  19.  @BackgroundMode(3, @RGB(0,0,127), @RGB(0,0,127))
  20.  @ScrHead("SPEA @Name @Version")
  21. @Endif // @Platform
  22.  
  23. @DefineVars
  24. @Drive @acadd12drv  = C @Dir @acadd12dir  = "\\ACAD"
  25. @Drive @acadd13drv  = C @Dir @acadd13dir  = "\\R13\\DOS"
  26. @Drive @acadwindrv  = C @Dir @acadwindir  = "\\ACADWIN"
  27. @Drive @windrv      = C @Dir @windir      = "\\WINDOWS"
  28. @Drive @ustdrv      = C @Dir @ustdir      = "\\USTATION"
  29.  
  30. @If (@L==1)
  31. @QString @TSelectDrive = "Use the keys [] and [] to select a drive."
  32. @QString @TDoReturn = "Press [─┘] to continue."
  33. @QString @TYesOrNoBySpace = "Use the SPACE BAR to select YES or NO."
  34. @QString @TDir = "Directory"
  35. @QString @TDrv = "Drive"
  36. @QString @Tand = "and"
  37. @QString @Tor = "or"
  38. @QString @TSelect = "Use the keys [] and [] to select."
  39. @QString @Tfor = "for"
  40. @QString @TDriver = "Driver"
  41. @QString @TQDrvFor = "On which drive do you want to install"
  42. @QString @TQDrvForT = "?"
  43. @QString @TQDirFor = "In which directory do you want to install"
  44. @QString @TQDirForT = "?"
  45. @QString @TQDrvOf = "On which drive is"
  46. @QString @TQDrvOfT = "installed?"
  47. @QString @TQDirOf = "In which directory is"
  48. @QString @TQDirOfT = "installed?"
  49. @QString @TNotIn = "does not appear to be installed in"
  50. @QString @TQContThisDir = "Do you want to continue installing in this directory?"
  51. @QString @TQWhichPart = "Which part of @Name do you want to install?"
  52. @QString @TQWhichParts = "Which parts of @Name do you want to install?"
  53. @QString @TQAcadLang = "Which language version of AutoCAD is being used ?"
  54. @Endif
  55. @If (@L==2)
  56. @QString @TSelectDrive = "Wählen Sie ein Laufwerk mit den Tasten [] und []."
  57. @QString @TDoReturn = "Bestätigen Sie mit [─┘]."
  58. @QString @TYesOrNoBySpace = "Wählen Sie JA oder NEIN mit der LEERTASTE."
  59. @QString @TDrv = "Laufwerk"
  60. @QString @TDir = "Verzeichnis"
  61. @QString @Tand = "und"
  62. @QString @Tor = "oder"
  63. @QString @TSelect = "Benutzen Sie die Tasten [] und [] zur Auswahl."
  64. @QString @Tfor = "für"
  65. @QString @TDriver = "Treiber"
  66. @QString @TQDrvFor = "Auf welchem Laufwerk wollen Sie"
  67. @QString @TQDrvForT = "installieren?"
  68. @QString @TQDirFor = "In welchem Verzeichnis wollen Sie"
  69. @QString @TQDirForT = "installieren?"
  70. @QString @TQDrvOf = "Auf welchem Laufwerk ist"
  71. @QString @TQDrvOfT = "installiert?"
  72. @QString @TQDirOf = "In welchem Verzeichnis ist"
  73. @QString @TQDirOfT = "installiert?"
  74. @QString @TNotIn = "scheint nicht installiert zu sein in"
  75. @QString @TQContThisDir = "Wollen Sie die Installation in diesem Verzeichnis fortsetzen?"
  76. @QString @TQWhichPart = "Welchen Teil von @Name wollen Sie installieren?"
  77. @QString @TQWhichParts = "Welche Teile von @Name wollen Sie installieren?"
  78. @QString @TQAcadLang = "Welche Sprachversion von AutoCAD wird verwendet ?"
  79. @Endif
  80. @QString @N = "\n"
  81. @EndVars
  82.  
  83.  
  84. @FlushGroups
  85. /*
  86. @GetGroups @Cls
  87.  @TQWhichPart
  88.  @TSelect @TDoReturn
  89. @Set D = "SPEA BigFocus @TDriver @Tfor AutoCAD 12 / 13 @Tfor DOS"
  90. @Set W = "SPEA BigFocus @TDriver @Tfor AutoCAD 12 @Tfor Windows"
  91. @LocalWindow(13,39)
  92. @EndGroups
  93. /**/
  94. @SetGroup(D)
  95.  
  96. @MaxListSize(8)
  97. @GetOutDrive @Cls @LocalWindow (20, 39)
  98.  @TQDrvFor @Name @TQDrvForT
  99.  @TSelectDrive @TDoReturn
  100. @EndOutDrive
  101. @MaxListSize()
  102.  
  103. @GetSubDir
  104.  @TQDirFor @Name @TQDirForT
  105. @Prompt = "([─┘] = @SubDir)? "
  106. @LocalWindow (13, 39)
  107. @EndSubdir
  108.  
  109. @If('D' [= @Group)
  110. @FlushOptions
  111. @GetOption
  112.  @TQWhichPart
  113.  @TSelect @TDoReturn
  114. @Option 12 = "SPEA BigFocus @TDriver @Tfor AutoCAD 12 @Tfor DOS"
  115. @Option 13 = "SPEA BigFocus @TDriver @Tfor AutoCAD 13 @Tfor DOS"
  116. @LocalWindow(13,39)
  117. @EndOption
  118. @Endif // 'D'
  119.  
  120. ACADDOS:
  121. @If('D' [= @Group)
  122. @If(12 [= @Option)
  123. @GetOutDrive @acadd12drv @LocalWindow (20, 39)
  124.  @TQDrvOf AutoCAD 12 @Tfor DOS @TQDrvOfT
  125.  @TSelectDrive @TDoReturn
  126. @EndOutDrive
  127.  
  128. @GetSubdir @acadd12dir
  129.  @TQDirOf AutoCAD 12 @Tfor DOS @TQDirOfT
  130. @Prompt = "([─┘] = @acadd12dir)? "
  131. @LocalWindow (13, 39)
  132. @EndSubdir
  133.  
  134. @If(@Exists "@acadd12drv:@acadd12dir\\acad.exe") @Else
  135.  @ClearOption(0)
  136.  @GetOption @Checkbox @LocalWindow (13, 39)
  137.  AutoCAD 12 @Tfor DOS @TNotIn @acadd12drv:@acadd12dir.@N
  138.  @TQContThisDir
  139.  @TYesOrNoBySpace @TDoReturn
  140.  @Option 0 = ""
  141.  @EndOption
  142.  @If(0 [! @Option) @Goto ACADDOS @Endif
  143. @Endif // @Exists
  144. @Endif // 12
  145.  
  146. @If(13 [= @Option)
  147. @GetOutDrive @acadd13drv @LocalWindow (20, 39)
  148.  @TQDrvOf AutoCAD 13 @Tfor DOS @TQDrvOfT
  149.  @TSelectDrive @TDoReturn
  150. @EndOutDrive
  151.  
  152. @GetSubdir @acadd13dir
  153.  @TQDirOf AutoCAD 13 @Tfor DOS @TQDirOfT
  154. @Prompt = "([─┘] = @acadd13dir)? "
  155. @LocalWindow (13, 39)
  156. @EndSubdir
  157.  
  158. @If(@Exists "@acadd13drv:@acadd13dir\\acad.exe") @Else
  159.  @ClearOption(0)
  160.  @GetOption @Checkbox @LocalWindow (13, 39)
  161.  AutoCAD 13 @Tfor DOS @TNotIn @acadd13drv:@acadd13dir.@N
  162.  @TQContThisDir
  163.  @TYesOrNoBySpace @TDoReturn
  164.  @Option 0 = ""
  165.  @EndOption
  166.  @If(0 [! @Option) @Goto ACADDOS @Endif
  167. @Endif // @Exists
  168. @Endif // 13
  169. @Endif // 'D'
  170.  
  171. ACADWIN:
  172. @If('W' [= @Group)
  173. @GetOutDrive @acadwindrv @LocalWindow (20, 39)
  174.  @TQDrvOf AutoCAD @Tfor WINDOWS @TQDrvOfT
  175.  @TSelectDrive @TDoReturn
  176. @EndOutDrive
  177.  
  178. @GetSubdir @acadwindir
  179.  @TQDirOf AutoCAD @Tfor WINDOWS @TQDirOfT
  180. @Prompt = "([─┘] = @acadwindir)? "
  181. @LocalWindow (13, 39)
  182. @EndSubdir
  183.  
  184. @If(@Exists "@acadwindrv:@acadwindir\\acad.exe") @Else
  185.  @ClearOption(0)
  186.  @GetOption @Checkbox @LocalWindow (13, 39)
  187.  AutoCAD @Tfor Windows @TNotIn @acadwindrv:@acadwindir.@N
  188.  @TQContThisDir
  189.  @TYesOrNoBySpace @TDoReturn
  190.  @Option 0 = ""
  191.  @EndOption
  192.  @If(0 [! @Option) @Goto ACADWIN @Endif
  193. @Endif
  194.  
  195. WINDOWS:
  196. @GetOutDrive @windrv @LocalWindow (20, 39)
  197.  @TQDrvOf WINDOWS @TQDrvOfT
  198.  @TSelectDrive @TDoReturn
  199. @EndOutDrive
  200.  
  201. @GetSubdir @windir
  202.  @TQDirOf WINDOWS @TQDirOfT
  203. @Prompt = "([─┘] = @windir)? "
  204. @LocalWindow (13, 39)
  205. @EndSubdir
  206.  
  207. @If(@Exists "@windrv:@windir\\win.com") @Else
  208.  @ClearOption(0)
  209.  @GetOption @Checkbox @LocalWindow (13, 39)
  210.  Windows @TNotIn @windrv:@windir.@N
  211.  @TQContThisDir
  212.  @TYesOrNoBySpace @TDoReturn
  213.  @Option 0 = ""
  214.  @EndOption
  215.  @If(0 [! @Option) @Goto WINDOWS @Endif
  216. @Endif 
  217. @Endif // 'W'
  218.  
  219. @If('W' [= @Group || 'D' [= @Group)
  220. @GetOption @LocalWindow (13, 39)
  221.  @TQAcadLang
  222.  @TSelect @TDoReturn
  223. @If(@L==1) @Option 10 = "English" @ElseIf(@L==2) @Option 20 = "Deutsch" @Endif
  224. @If(@L==1) @Option 20 = "German"  @ElseIf(@L==2) @Option 10 = "Englisch" @Endif
  225. @EndOption
  226. @Endif // 'W' || 'D'
  227.  
  228.  
  229. @If('D' [= @Group || 'W' [= @Group)
  230.  
  231. @If('W' [= @Group)
  232.  @Delete ("@OutDrive:@SubDir\\CFG.ADV")
  233. @Endif // 'W'
  234.  
  235. @If('D' [= @Group)
  236.  @Delete ("@OutDrive:@SubDir\\BFOCCONF.EXP")
  237.  @Delete ("@OutDrive:@SubDir\\VIEWER.TCO")
  238. @Endif // 'D'
  239.  
  240. @If(13 [= @Option) @Delete ("@OutDrive:@SubDir\\SPEA.HDX") @Endif
  241. @Delete ("@OutDrive:@SubDir\\AUTOCAD.XLI")
  242. @Delete ("@OutDrive:@SubDir\\FOCUS.IWC")
  243. @Delete ("@OutDrive:@SubDir\\FOCUS.ICF")
  244. @Delete ("@OutDrive:@SubDir\\VIEWER.TCO")
  245. @Delete ("@OutDrive:@SubDir\\FILEVIEW.EXP")
  246. @Delete ("@OutDrive:@SubDir\\FILEVIEW.LSP")
  247. @Delete ("@OutDrive:@SubDir\\FIVILOAD.LSP")
  248. @Delete ("@OutDrive:@SubDir\\FILEVIEW.DCL")
  249. @Delete ("@OutDrive:@SubDir\\FILEVIEW.HLP")
  250. @Delete ("@OutDrive:@SubDir\\FILEVIEW.TCO")
  251. @Delete ("@OutDrive:@SubDir\\pops\\FOCUS.IWC")
  252. @Delete ("@OutDrive:@SubDir\\pops\\FOCUS.ICF")
  253. @Delete ("@OutDrive:@SubDir\\pops\\OEM.BSL")
  254. @Delete ("@OutDrive:@SubDir\\pops\\OEM.IDF")
  255. @Delete ("@OutDrive:@SubDir\\pops\\OEM.ICN")
  256. @Delete ("@acadwindrv:@acadwindir\\CPYDRV.DLL")
  257. @Delete ("@acadwindrv:@acadwindir\\FOCUSDRV.DLL")
  258. @Delete ("@acadwindrv:@acadwindir\\SP3D_16.DLL")
  259. @Delete ("@acadwindrv:@acadwindir\\SP3D_32.DLL")
  260.  
  261. @If(13 [= @Option)
  262. @Delete ("@acadd13drv:@acadd13dir\\drv\\RCS3V.EXP")
  263. @Delete ("@acadd13drv:@acadd13dir\\drv\\RCFIREGL.EXP")
  264. @Endif // 13
  265.  
  266. @If(12 [= @Option)
  267. @Delete ("@acadd12drv:@acadd12dir\\drv\\RCS3V.EXP")
  268. @Delete ("@acadd12drv:@acadd12dir\\drv\\RCFIREGL.EXP")
  269. @Endif // 12
  270.  
  271. @Endif // 'D' || 'W'
  272.  
  273. @If(20 [= @Option)
  274. @If('D' [= @Group && 12 [= @Option)
  275. @If(@Exists "@acadd12drv:@acadd12dir\\support\\DDVPOINT.DCL")
  276.  @System "Copy @acadd12drv:@acadd12dir\\support\\DDVPOINT.DCL @acadd12drv:@acadd12dir\\support\\DDVPOINT.DC2 >nul"
  277. @Endif // Exists
  278. @Endif // 'D' && 12
  279. @Endif // 20
  280.  
  281.  
  282. @DefineDisk
  283.      @Label = "for V7-MERCURY P-64 V, Disk 1 of 2"
  284.  @F     SHOW.EXE
  285.  
  286. @If(@L==2)
  287.  @F BIGFOCUS.GER @O BIGFOCUS.DOC @Group d
  288. // @F  BFOCWIN.GER @O  BFOCWIN.DOC @Group w
  289. @Else
  290.  @F BIGFOCUS.ENG @O BIGFOCUS.DOC @Group d
  291. // @F  BFOCWIN.ENG @O  BFOCWIN.DOC @Group w
  292. @Endif
  293.  
  294. // AutoCAD Common
  295.     @BeginLib COMMON.LIF
  296.  @F V7CLEAR2.EXE @Group d
  297.  @F SPEALOGO.FLC @Group d
  298.  @F  EXAMPLE.DWG @Group d
  299.  @F     WHAT.EXE @Group dw
  300.  @F COU12X20.FNT @O fonts\\COU12X20.FNT @Group d
  301.  @F     SPEA.FNT @O fonts\\SPEA.FNT     @Group d
  302.  @F SPEA1024.FNT @O fonts\\SPEA1024.FNT @Group d
  303.  @F  HUN8X16.FNT @O fonts\\HUN8X16.FNT  @Group d
  304.  @F  ACAD256.VLU @Group d
  305.  @F BFCONF12.EXP @Group d @Option 12
  306.  @F BFCONF13.EXP @Group d @Option 13
  307.  
  308.  @F FILEVIEW.EXP @Group d @Option 12
  309.  @F FILEVIEW.LSP @Group d @Option 12
  310.  @F FIVILOAD.LSP @Group d @Option 12
  311.  @F      OEM.BSL @Group d @Option 12
  312.  @F      OEM.ICN @Group d @Option 12
  313.  @F   OEMDOS.IDF @O OEM.IDF @Group d @Option 12
  314.  @F     SPEA.DCC @Group d
  315.  @F    SPEA2.DCC @Group d
  316.  @F    SPEA3.DCC @Group d
  317.  @F  SPEAVEC.TXT @Group dw
  318.  @F   CFGDOS.ADV @O CFG.ADV @Group d
  319. @If(20 [= @Option)
  320.  @F   DDVPOINT.DCL @O @acadd12drv:@acadd12dir\\support\\DDVPOINT.DCL @Group d @Option 12
  321. @Endif
  322.     @EndLib
  323.  
  324. // AutoCAD Pops
  325.     @BeginLib POPS.LIF
  326.  @F $BIRDEYE.ICN @O pops\\$BIRDEYE.ICN @Group dw
  327.  @F   $COLOR.ICN @O pops\\$COLOR.ICN   @Group d
  328.  @F   $LENSE.ICN @O pops\\$LENSE.ICN   @Group dw
  329.  @F    $TEXT.ICN @O pops\\$TEXT.ICN    @Group d
  330.  @F     HELP.ICN @O pops\\HELP.ICN     @Group d
  331.  @F ICONEDIT.BSL @O pops\\ICONEDIT.BSL @Group d
  332.  @F ICONEDIT.ICN @O pops\\ICONEDIT.ICN @Group d
  333.  @F ICONEDIT.IDF @O pops\\ICONEDIT.IDF @Group d
  334.  @F     LOGO.BSL @O pops\\LOGO.BSL  @Group dw
  335.  @F     LOGO.IDF @O pops\\LOGO.IDF  @Group dw
  336.  @F     SAVE.BSL @O pops\\SAVE.BSL  @Group d
  337.  @F     SAVE.ICN @O pops\\SAVE.ICN  @Group d
  338.  @F     SAVE.IDF @O pops\\SAVE.IDF  @Group d
  339.  @F     SPEA.ICN @O pops\\SPEA.ICN  @Group dw
  340.  @F  SPEADOS.IDF @O pops\\SPEA.IDF  @Group d
  341.  @F  SPEAWIN.IDF @O pops\\SPEA.IDF  @Group w
  342.  @F     SPEA.BSL @O pops\\SPEA.BSL  @Group dw
  343.  @F $ICONWIN.ICW @O pops\\$ICON.ICW @Group w
  344. // 3D:
  345.  @F  $ICON3D.ICW @O pops\\$ICON.ICW   @Group d
  346.  @F    $FLIC.ICN @O pops\\$FLIC.ICN   @Group d
  347.  @F  $VIEW3D.ICN @O pops\\$VIEW3D.ICN @Group d
  348.  @F       3D.BSL @O pops\\3D.BSL      @Group d
  349.  @F       3D.ICN @O pops\\3D.ICN      @Group d
  350.  @F    3DDOS.IDF @O pops\\3D.IDF      @Group d
  351.  @F     FLIC.BSL @O pops\\FLIC.BSL    @Group d
  352.  @F     FLIC.ICN @O pops\\FLIC.ICN    @Group d
  353.  @F     FLIC.IDF @O pops\\FLIC.IDF    @Group d
  354.  @F      FLV.BSL @O pops\\FLV.BSL     @Group d
  355.  @F      FLV.IDF @O pops\\FLV.IDF     @Group d
  356.     @EndLib
  357.  
  358. // AutoCAD German
  359.     @BeginLib GERMAN.LIF
  360.      @If(20 [= @Option)
  361. @F  BFCONFW.LND @O BFOCCONF.LNG @Group w
  362. @F  BFCONFW.DCD @O BFOCCONF.DCL @Group w
  363. @F BFOCCONF.LND @O BFOCCONF.LNG @Group d
  364. @F BFOCCONF.DCD @O BFOCCONF.DCL @Group d
  365. @F FILEVIEW.DCD @O FILEVIEW.DCL @Group d @Option 12
  366.  
  367. @F   FOCUSW.LND @O FOCUS.LNG @Group w
  368. @F  FOCUS12.LND @O FOCUS.LNG @Group d @Option 12
  369. @F  FOCUS13.LND @O FOCUS.LNG @Group d @Option 13
  370.  
  371. @F FILEVIEW.TCD @O FILEVIEW.TCO @Group d @Option 12
  372. @F FILEVIEW.HLD @O FILEVIEW.HLP @Group d @Option 12
  373.  
  374. @F     SPEA.HLD @O SPEA.HLP @Group d @Option 12
  375. @F     SPEA.AHD @O SPEA.AHP @Group d @Option 13
  376.  
  377. @F  BF12WIN.HLD @O BF12WIN.HLP @Group w
  378. // 3D:
  379. @F   VIEWER.DCD @O VIEWER.DCL @Group d
  380.      @Endif // 20
  381.     @EndLib
  382.  
  383. // AutoCAD English
  384.     @BeginLib ENGLISH.LIF
  385.      @If(10 [= @Option)
  386. @F  BFCONFW.LNE @O BFOCCONF.LNG @Group w
  387. @F  BFCONFW.DCE @O BFOCCONF.DCL @Group w
  388. @F BFOCCONF.LNE @O BFOCCONF.LNG @Group d
  389. @F BFOCCONF.DCE @O BFOCCONF.DCL @Group d
  390. @F FILEVIEW.DCE @O FILEVIEW.DCL @Group d @Option 12
  391.  
  392. @F   FOCUSW.LNE @O FOCUS.LNG @Group w
  393. @F  FOCUS12.LNE @O FOCUS.LNG @Group d @Option 12
  394. @F  FOCUS13.LNE @O FOCUS.LNG @Group d @Option 13
  395.  
  396. @F FILEVIEW.TCE @O FILEVIEW.TCO @Group d @Option 12
  397. @F FILEVIEW.HLE @O FILEVIEW.HLP @Group d @Option 12
  398.  
  399. @F     SPEA.HLE @O SPEA.HLP @Group d @Option 12
  400. @F     SPEA.AHE @O SPEA.AHP @Group d @Option 13
  401.  
  402. @F  BF12WIN.HLE @O BF12WIN.HLP @Group w
  403. // 3D:
  404. @F   VIEWER.DCE @O VIEWER.DCL @Group d
  405.      @Endif // 10
  406.     @EndLib
  407.  
  408. // BigFocus Win 2D
  409. /*
  410.     @BeginLib BFOCWIN.LIF
  411. @F BFOCCWIN.EXE @Group w
  412. @F FOCUSDRV.DLL @O @windrv:@windir\\FOCUSDRV.DLL @Group w
  413. @F DSBIGFOC.DLL @O @acadwindrv:@acadwindir\\DSBIGFOC.DLL @Group w
  414.     @EndLib
  415. /**/
  416.  
  417. @EndDisk
  418.  
  419.  @ChDrive @InDrive
  420. @If("@StartupDir" != "\\")
  421.  @ChDir("..\\disk2")
  422.  @Chain("for V7-MERCURY P-64 V, Disk 2 of 2", "..\\disk2\\INSTALL.DAT")
  423. @Else
  424.  @Chain("for V7-MERCURY P-64 V, Disk 2 of 2")
  425. @Endif
  426.