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