home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 April (Special) / Chip-Special_1997-04_cd.bin / spea / storm / bf18st / bf18st1.exe / INSTALL.DAT < prev    next >
Text File  |  1995-11-24  |  13KB  |  421 lines
  1.  
  2. @DefineProject
  3.     @Name           = "BigFocus"
  4.     @Version        = "Release 1195"
  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. @GetGroups @Cls
  86.  @TQWhichPart
  87.  @TSelect @TDoReturn
  88. @Set D = "SPEA BigFocus @TDriver @Tfor AutoCAD 12 / 13 @Tfor DOS"
  89. @Set W = "SPEA BigFocus @TDriver @Tfor AutoCAD 12 @Tfor Windows"
  90. @LocalWindow(13,39)
  91. @EndGroups
  92.  
  93. @MaxListSize(8)
  94. @GetOutDrive @Cls @LocalWindow (20, 39)
  95.  @TQDrvFor @Name @TQDrvForT
  96.  @TSelectDrive @TDoReturn
  97. @EndOutDrive
  98. @MaxListSize()
  99.  
  100. @GetSubDir
  101.  @TQDirFor @Name @TQDirForT
  102. @Prompt = "([─┘] = @SubDir)? "
  103. @LocalWindow (13, 39)
  104. @EndSubdir
  105.  
  106. @If('D' [= @Group)
  107. @FlushOptions
  108. @GetOption
  109.  @TQWhichPart
  110.  @TSelect @TDoReturn
  111. @Option 12 = "SPEA BigFocus @TDriver @Tfor AutoCAD 12 @Tfor DOS"
  112. @Option 13 = "SPEA BigFocus @TDriver @Tfor AutoCAD 13 @Tfor DOS"
  113. @LocalWindow(13,39)
  114. @EndOption
  115. @Endif // 'D'
  116.  
  117. ACADDOS:
  118. @If('D' [= @Group)
  119. @If(12 [= @Option)
  120. @GetOutDrive @acadd12drv @LocalWindow (20, 39)
  121.  @TQDrvOf AutoCAD 12 @Tfor DOS @TQDrvOfT
  122.  @TSelectDrive @TDoReturn
  123. @EndOutDrive
  124.  
  125. @GetSubdir @acadd12dir
  126.  @TQDirOf AutoCAD 12 @Tfor DOS @TQDirOfT
  127. @Prompt = "([─┘] = @acadd12dir)? "
  128. @LocalWindow (13, 39)
  129. @EndSubdir
  130.  
  131. @If(@Exists "@acadd12drv:@acadd12dir\\acad.exe") @Else
  132.  @ClearOption(0)
  133.  @GetOption @Checkbox @LocalWindow (13, 39)
  134.  AutoCAD 12 @Tfor DOS @TNotIn @acadd12drv:@acadd12dir.@N
  135.  @TQContThisDir
  136.  @TYesOrNoBySpace @TDoReturn
  137.  @Option 0 = ""
  138.  @EndOption
  139.  @If(0 [! @Option) @Goto ACADDOS @Endif
  140. @Endif // @Exists
  141. @Endif // 12
  142.  
  143. @If(13 [= @Option)
  144. @GetOutDrive @acadd13drv @LocalWindow (20, 39)
  145.  @TQDrvOf AutoCAD 13 @Tfor DOS @TQDrvOfT
  146.  @TSelectDrive @TDoReturn
  147. @EndOutDrive
  148.  
  149. @GetSubdir @acadd13dir
  150.  @TQDirOf AutoCAD 13 @Tfor DOS @TQDirOfT
  151. @Prompt = "([─┘] = @acadd13dir)? "
  152. @LocalWindow (13, 39)
  153. @EndSubdir
  154.  
  155. @If(@Exists "@acadd13drv:@acadd13dir\\acad.exe") @Else
  156.  @ClearOption(0)
  157.  @GetOption @Checkbox @LocalWindow (13, 39)
  158.  AutoCAD 13 @Tfor DOS @TNotIn @acadd13drv:@acadd13dir.@N
  159.  @TQContThisDir
  160.  @TYesOrNoBySpace @TDoReturn
  161.  @Option 0 = ""
  162.  @EndOption
  163.  @If(0 [! @Option) @Goto ACADDOS @Endif
  164. @Endif // @Exists
  165. @Endif // 13
  166. @Endif // 'D'
  167.  
  168. ACADWIN:
  169. @If('W' [= @Group)
  170. @GetOutDrive @acadwindrv @LocalWindow (20, 39)
  171.  @TQDrvOf AutoCAD @Tfor WINDOWS @TQDrvOfT
  172.  @TSelectDrive @TDoReturn
  173. @EndOutDrive
  174.  
  175. @GetSubdir @acadwindir
  176.  @TQDirOf AutoCAD @Tfor WINDOWS @TQDirOfT
  177. @Prompt = "([─┘] = @acadwindir)? "
  178. @LocalWindow (13, 39)
  179. @EndSubdir
  180.  
  181. @If(@Exists "@acadwindrv:@acadwindir\\acad.exe") @Else
  182.  @ClearOption(0)
  183.  @GetOption @Checkbox @LocalWindow (13, 39)
  184.  AutoCAD @Tfor Windows @TNotIn @acadwindrv:@acadwindir.@N
  185.  @TQContThisDir
  186.  @TYesOrNoBySpace @TDoReturn
  187.  @Option 0 = ""
  188.  @EndOption
  189.  @If(0 [! @Option) @Goto ACADWIN @Endif
  190. @Endif
  191.  
  192. WINDOWS:
  193. @GetOutDrive @windrv @LocalWindow (20, 39)
  194.  @TQDrvOf WINDOWS @TQDrvOfT
  195.  @TSelectDrive @TDoReturn
  196. @EndOutDrive
  197.  
  198. @GetSubdir @windir
  199.  @TQDirOf WINDOWS @TQDirOfT
  200. @Prompt = "([─┘] = @windir)? "
  201. @LocalWindow (13, 39)
  202. @EndSubdir
  203.  
  204. @If(@Exists "@windrv:@windir\\win.com") @Else
  205.  @ClearOption(0)
  206.  @GetOption @Checkbox @LocalWindow (13, 39)
  207.  Windows @TNotIn @windrv:@windir.@N
  208.  @TQContThisDir
  209.  @TYesOrNoBySpace @TDoReturn
  210.  @Option 0 = ""
  211.  @EndOption
  212.  @If(0 [! @Option) @Goto WINDOWS @Endif
  213. @Endif 
  214. @Endif // 'W'
  215.  
  216. @If('W' [= @Group || 'D' [= @Group)
  217. @GetOption @LocalWindow (13, 39)
  218.  @TQAcadLang
  219.  @TSelect @TDoReturn
  220. @If(@L==1) @Option 10 = "English" @ElseIf(@L==2) @Option 20 = "Deutsch" @Endif
  221. @If(@L==1) @Option 20 = "German"  @ElseIf(@L==2) @Option 10 = "Englisch" @Endif
  222. @EndOption
  223. @Endif // 'W' || 'D'
  224.  
  225.  
  226. @If('D' [= @Group || 'W' [= @Group)
  227.  
  228. @If('W' [= @Group)
  229.  @Delete ("@OutDrive:@SubDir\\CFG.ADV")
  230. @Endif // 'W'
  231.  
  232. @If('D' [= @Group)
  233.  @Delete ("@OutDrive:@SubDir\\BFOCCONF.EXP")
  234.  @Delete ("@OutDrive:@SubDir\\VIEWER.TCO")
  235. @Endif // 'D'
  236.  
  237. @If(13 [= @Option) @Delete ("@OutDrive:@SubDir\\SPEA.HDX") @Endif
  238. @Delete ("@OutDrive:@SubDir\\AUTOCAD.XLI")
  239. @Delete ("@OutDrive:@SubDir\\FOCUS.IWC")
  240. @Delete ("@OutDrive:@SubDir\\FOCUS.ICF")
  241. @Delete ("@OutDrive:@SubDir\\VIEWER.TCO")
  242. @Delete ("@OutDrive:@SubDir\\FILEVIEW.EXP")
  243. @Delete ("@OutDrive:@SubDir\\FILEVIEW.LSP")
  244. @Delete ("@OutDrive:@SubDir\\FIVILOAD.LSP")
  245. @Delete ("@OutDrive:@SubDir\\FILEVIEW.DCL")
  246. @Delete ("@OutDrive:@SubDir\\FILEVIEW.HLP")
  247. @Delete ("@OutDrive:@SubDir\\FILEVIEW.TCO")
  248. @Delete ("@OutDrive:@SubDir\\pops\\FOCUS.IWC")
  249. @Delete ("@OutDrive:@SubDir\\pops\\FOCUS.ICF")
  250. @Delete ("@OutDrive:@SubDir\\pops\\OEM.BSL")
  251. @Delete ("@OutDrive:@SubDir\\pops\\OEM.IDF")
  252. @Delete ("@OutDrive:@SubDir\\pops\\OEM.ICN")
  253. @Delete ("@acadwindrv:@acadwindir\\CPYDRV.DLL")
  254. @Delete ("@acadwindrv:@acadwindir\\FOCUSDRV.DLL")
  255. @Delete ("@acadwindrv:@acadwindir\\SP3D_16.DLL")
  256. @Delete ("@acadwindrv:@acadwindir\\SP3D_32.DLL")
  257.  
  258. @If(13 [= @Option)
  259. //@Delete ("@acadd13drv:@acadd13dir\\drv\\RCS3V.EXP")
  260. //@Delete ("@acadd13drv:@acadd13dir\\drv\\RCFIREGL.EXP")
  261. @Endif // 13
  262.  
  263. @If(12 [= @Option)
  264. //@Delete ("@acadd12drv:@acadd12dir\\drv\\RCS3V.EXP")
  265. //@Delete ("@acadd12drv:@acadd12dir\\drv\\RCFIREGL.EXP")
  266. @Endif // 12
  267.  
  268. @Endif // 'D' || 'W'
  269.  
  270. @If(20 [= @Option)
  271. @If('D' [= @Group && 12 [= @Option)
  272. @If(@Exists "@acadd12drv:@acadd12dir\\support\\DDVPOINT.DCL")
  273.  @System "Copy @acadd12drv:@acadd12dir\\support\\DDVPOINT.DCL @acadd12drv:@acadd12dir\\support\\DDVPOINT.DC2 >nul"
  274. @Endif // Exists
  275. @Endif // 'D' && 12
  276. @Endif // 20
  277.  
  278.  
  279. @DefineDisk
  280.      @Label = "for V7-STORM PRO, Disk 1 of 2"
  281.  @F     SHOW.EXE
  282.  
  283. @If(@L==2)
  284.  @F BIGFOCUS.GER @O BIGFOCUS.DOC @Group d
  285.  @F  BFOCWIN.GER @O  BFOCWIN.DOC @Group w
  286. @Else
  287.  @F BIGFOCUS.ENG @O BIGFOCUS.DOC @Group d
  288.  @F  BFOCWIN.ENG @O  BFOCWIN.DOC @Group w
  289. @Endif
  290.  
  291. // AutoCAD Common
  292.     @BeginLib COMMON.LIF
  293.  @F V7CLEAR2.EXE @Group d
  294.  @F SPEALOGO.FLC @Group d
  295.  @F  EXAMPLE.DWG @Group d
  296.  @F     WHAT.EXE @Group dw
  297.  @F COU12X20.FNT @O fonts\\COU12X20.FNT @Group d
  298.  @F     SPEA.FNT @O fonts\\SPEA.FNT     @Group d
  299.  @F SPEA1024.FNT @O fonts\\SPEA1024.FNT @Group d
  300.  @F  HUN8X16.FNT @O fonts\\HUN8X16.FNT  @Group d
  301.  @F  ACAD256.VLU @Group d
  302.  @F BFCONF12.EXP @Group d @Option 12
  303.  @F BFCONF13.EXP @Group d @Option 13
  304.  
  305.  @F FILEVIEW.EXP @Group d @Option 12
  306.  @F FILEVIEW.LSP @Group d @Option 12
  307.  @F FIVILOAD.LSP @Group d @Option 12
  308.  @F      OEM.BSL @Group d @Option 12
  309.  @F      OEM.ICN @Group d @Option 12
  310.  @F   OEMDOS.IDF @O OEM.IDF @Group d @Option 12
  311.  @F     SPEA.DCC @Group d
  312.  @F    SPEA2.DCC @Group d
  313.  @F    SPEA3.DCC @Group d
  314.  @F  SPEAVEC.TXT @Group dw
  315.  @F   CFGDOS.ADV @O CFG.ADV @Group d
  316. @If(20 [= @Option)
  317.  @F   DDVPOINT.DCL @O @acadd12drv:@acadd12dir\\support\\DDVPOINT.DCL @Group d @Option 12
  318. @Endif
  319.     @EndLib
  320.  
  321. // AutoCAD Pops
  322.     @BeginLib POPS.LIF
  323.  @F $BIRDEYE.ICN @O pops\\$BIRDEYE.ICN @Group dw
  324.  @F   $COLOR.ICN @O pops\\$COLOR.ICN   @Group d
  325.  @F   $LENSE.ICN @O pops\\$LENSE.ICN   @Group dw
  326.  @F    $TEXT.ICN @O pops\\$TEXT.ICN    @Group d
  327.  @F     HELP.ICN @O pops\\HELP.ICN     @Group d
  328.  @F ICONEDIT.BSL @O pops\\ICONEDIT.BSL @Group d
  329.  @F ICONEDIT.ICN @O pops\\ICONEDIT.ICN @Group d
  330.  @F ICONEDIT.IDF @O pops\\ICONEDIT.IDF @Group d
  331.  @F     LOGO.BSL @O pops\\LOGO.BSL  @Group dw
  332.  @F     LOGO.IDF @O pops\\LOGO.IDF  @Group dw
  333.  @F     SAVE.BSL @O pops\\SAVE.BSL  @Group d
  334.  @F     SAVE.ICN @O pops\\SAVE.ICN  @Group d
  335.  @F     SAVE.IDF @O pops\\SAVE.IDF  @Group d
  336.  @F     SPEA.ICN @O pops\\SPEA.ICN  @Group dw
  337.  @F  SPEADOS.IDF @O pops\\SPEA.IDF  @Group d
  338.  @F  SPEAWIN.IDF @O pops\\SPEA.IDF  @Group w
  339.  @F     SPEA.BSL @O pops\\SPEA.BSL  @Group dw
  340.  @F $ICONWIN.ICW @O pops\\$ICON.ICW @Group w
  341. // 3D:
  342.  @F  $ICON3D.ICW @O pops\\$ICON.ICW   @Group d
  343.  @F    $FLIC.ICN @O pops\\$FLIC.ICN   @Group d
  344.  @F  $VIEW3D.ICN @O pops\\$VIEW3D.ICN @Group d
  345.  @F       3D.BSL @O pops\\3D.BSL      @Group d
  346.  @F       3D.ICN @O pops\\3D.ICN      @Group d
  347.  @F    3DDOS.IDF @O pops\\3D.IDF      @Group d
  348.  @F     FLIC.BSL @O pops\\FLIC.BSL    @Group d
  349.  @F     FLIC.ICN @O pops\\FLIC.ICN    @Group d
  350.  @F     FLIC.IDF @O pops\\FLIC.IDF    @Group d
  351.  @F      FLV.BSL @O pops\\FLV.BSL     @Group d
  352.  @F      FLV.IDF @O pops\\FLV.IDF     @Group d
  353.     @EndLib
  354.  
  355. // AutoCAD German
  356.     @BeginLib GERMAN.LIF
  357.      @If(20 [= @Option)
  358. @F  BFCONFW.LND @O BFOCCONF.LNG @Group w
  359. @F  BFCONFW.DCD @O BFOCCONF.DCL @Group w
  360. @F BFOCCONF.LND @O BFOCCONF.LNG @Group d
  361. @F BFOCCONF.DCD @O BFOCCONF.DCL @Group d
  362. @F FILEVIEW.DCD @O FILEVIEW.DCL @Group d @Option 12
  363.  
  364. @F   FOCUSW.LND @O FOCUS.LNG @Group w
  365. @F  FOCUS12.LND @O FOCUS.LNG @Group d @Option 12
  366. @F  FOCUS13.LND @O FOCUS.LNG @Group d @Option 13
  367.  
  368. @F FILEVIEW.TCD @O FILEVIEW.TCO @Group d @Option 12
  369. @F FILEVIEW.HLD @O FILEVIEW.HLP @Group d @Option 12
  370.  
  371. @F     SPEA.HLD @O SPEA.HLP @Group d @Option 12
  372. @F     SPEA.AHD @O SPEA.AHP @Group d @Option 13
  373.  
  374. @F  BF12WIN.HLD @O BF12WIN.HLP @Group w
  375. // 3D:
  376. @F   VIEWER.DCD @O VIEWER.DCL @Group d
  377.      @Endif // 20
  378.     @EndLib
  379.  
  380. // AutoCAD English
  381.     @BeginLib ENGLISH.LIF
  382.      @If(10 [= @Option)
  383. @F  BFCONFW.LNE @O BFOCCONF.LNG @Group w
  384. @F  BFCONFW.DCE @O BFOCCONF.DCL @Group w
  385. @F BFOCCONF.LNE @O BFOCCONF.LNG @Group d
  386. @F BFOCCONF.DCE @O BFOCCONF.DCL @Group d
  387. @F FILEVIEW.DCE @O FILEVIEW.DCL @Group d @Option 12
  388.  
  389. @F   FOCUSW.LNE @O FOCUS.LNG @Group w
  390. @F  FOCUS12.LNE @O FOCUS.LNG @Group d @Option 12
  391. @F  FOCUS13.LNE @O FOCUS.LNG @Group d @Option 13
  392.  
  393. @F FILEVIEW.TCE @O FILEVIEW.TCO @Group d @Option 12
  394. @F FILEVIEW.HLE @O FILEVIEW.HLP @Group d @Option 12
  395.  
  396. @F     SPEA.HLE @O SPEA.HLP @Group d @Option 12
  397. @F     SPEA.AHE @O SPEA.AHP @Group d @Option 13
  398.  
  399. @F  BF12WIN.HLE @O BF12WIN.HLP @Group w
  400. // 3D:
  401. @F   VIEWER.DCE @O VIEWER.DCL @Group d
  402.      @Endif // 10
  403.     @EndLib
  404.  
  405. // BigFocus Win 2D
  406.     @BeginLib BFOCWIN.LIF
  407. @F BFOCCWIN.EXE @Group w
  408. @F FOCUSDRV.DLL @O @windrv:@windir\\FOCUSDRV.DLL @Group w
  409. @F DSBIGFOC.DLL @O @acadwindrv:@acadwindir\\DSBIGFOC.DLL @Group w
  410.     @EndLib
  411.  
  412. @EndDisk
  413.  
  414.  @ChDrive @InDrive
  415. @If("@StartupDir" != "\\")
  416.  @ChDir("..\\disk2")
  417.  @Chain("for V7-STORM PRO, Disk 2 of 2", "..\\disk2\\INSTALL.DAT")
  418. @Else
  419.  @Chain("for V7-STORM PRO, Disk 2 of 2")
  420. @Endif
  421.