home *** CD-ROM | disk | FTP | other *** search
/ Logiciels PC 22 / LogicielsPC_22.iso / ZoomPro / EVAL.INF < prev    next >
INI File  |  1994-05-11  |  10KB  |  367 lines
  1. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2. ;;
  3. ;; Purpose
  4. ;;   Installation script for MicroSim Design Center
  5. ;;   Evaluation Version under Windows 3.0
  6. ;;
  7. ;; Returned value
  8. ;;
  9. ;; Discussion
  10. ;;   Uses Instalit for Windows, by HPI
  11. ;;
  12. ;; Author
  13. ;;   kws - 07 Feb 92 - created
  14. ;;   kws - 15 Jul 92 - version numbers (52 and 5.2) in directory 
  15. ;;
  16. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  17. do initializeInstall
  18.  
  19. [pointSTART]
  20. getMenuChoice
  21.   Install Design Center Evaluation Version.
  22.   Copy one file from the installation disks.
  23.   Exit Installation program.
  24. endGetMenuChoice
  25.  
  26. inCase choice is
  27.   =1: queAllFiles
  28.       [number1] := 1
  29.   =2: [number1] := 2
  30.       do copyOneFile
  31.   =3: do exitInstall 
  32. endInCase
  33.  
  34. [pointGETDIRECTORY]
  35.  
  36. ;; Check for hard disk A: (NEC) or C:
  37. if driveIsPresent A
  38.   if driveIsRemoveable A
  39.     determineInstallationDirectory C:\MSIMEV60 requireFixed noCreate
  40.   else
  41.     determineInstallationDirectory A:\MSIMEV60 requireFixed noCreate
  42.   endif
  43. else
  44.   determineInstallationDirectory requireFixed noCreate
  45. endif
  46.  
  47. if directoryExists [installationDirectory]
  48.   dialog [yesOrNo1] useHeader "Delete Existing Files"
  49.     The directory [installationDirectory] already exists.
  50.  
  51.     Select 'Yes' to copy new files to this directory,
  52.     overwriting files of the same name, like PSCHED.EXE, etc.
  53.     Select 'No' to specify a different installation directory.
  54.  
  55.   endDialog
  56.  
  57.   if [yesOrNo1] = n 
  58.     goto [pointGETDIRECTORY]
  59.   endif
  60. endIf
  61.  
  62. if [number1] = 1                       
  63.   ;; [number1] always set to installation menu choice (1 == full install)
  64.   if freeSpaceOnDrive installationDrive < queSize 
  65.     dialog [yesOrNo1] useHeader "Installation Error"
  66.       Insufficient space on this disk drive, need at least
  67.       queSize bytes.  Do you wish to select another drive?
  68.     endDialog
  69.     if [yesOrNo1] = y 
  70.       goto [pointGETDIRECTORY]
  71.     else 
  72.       do abortInstall
  73.     endif
  74.   endif
  75. endif  
  76.  
  77. if [number1] = 1
  78.   ;; get readme.* and *.by uncompressed files
  79.   copyFiles
  80.     readme.*
  81.     msim.ini
  82.   endCopyFiles
  83.   if fileExists [installFromDrive]:\distrib.by
  84.     copyFiles
  85.       distrib.by
  86.     endCopyFiles
  87.   endif
  88.  
  89.   createDirectoryIfNecessary [installationDirectory]\BACKUP
  90.  
  91. endif
  92.  
  93. ;; copy all user selected files now
  94. getQuedFiles onePerLine noInsertionPrompt
  95.  
  96. setCompletionStatusTo finished
  97.  
  98. ;; install program groups if in Windows and doing a full install
  99. if Windows
  100.   if [number1] = 1
  101.     dialog [yesOrNo1] useHeader "Design Center 6.0 Group"
  102.       Do you want to create a Design Center group with
  103.       icons for the programs (PSpice, Probe, etc.)?
  104.     endDialog
  105.  
  106.     if [yesOrNo1] = y
  107.       buildProgramGroup "Design Center Eval 6.0" MSIMEV60.GRP replace
  108.         [installationDirectory]\psched.exe  "Schematics"      [installationDirectory]\psched.exe
  109.         [installationDirectory]\pspice.exe  "PSpice A/D"      [installationDirectory]\pspice.exe
  110.         [installationDirectory]\probe.exe   "Probe"           [installationDirectory]\probe.exe
  111.         [installationDirectory]\stmed.exe   "Stimulus Editor" [InstallationDirectory]\stmed.exe
  112.         [installationDirectory]\parts.exe   "Parts"           [windowsDirectory]\progman.exe
  113.         [windowsDirectory]\notepad.exe [installationDirectory]\readme.doc "README" [windowsDirectory]\notepad.exe
  114.       endBuildProgramGroup
  115.     endif
  116.   endif
  117.  
  118.   if protectedMode
  119.   else
  120.     dialog useHeader "Installation Warning"
  121.       You are currently running in real mode.
  122.       The MicroSim Design Center requires
  123.       Windows to be run in protected mode.
  124.     endDialog
  125.   endif
  126. endif
  127.  
  128. ;; noSysFileConfirmation
  129.  
  130. if [number1] = 1
  131.   dialog [yesOrNo1] useHeader "Modify AUTOEXEC.BAT?"
  132.     Do you want the Design Center directory added to your
  133.     path in the AUTOEXEC.BAT file?  (This must be done for 
  134.     the Design Center to execute properly)
  135.   endDialog
  136.   if [yesOrNo1] = y
  137.     modifyAutoexecBat
  138.       addPathComponent [installationDirectory] at beginning
  139.     endModifyAutoexecBat
  140.   endif
  141.  
  142.   ;; install msim.ini in Windows directory, modify LIBPATH and BACKUP
  143.   if Windows
  144. [pointMSIMINI]
  145.     if fileExists [windowsDirectory]\msim.ini
  146.       [string3] := MSIM.BAK
  147.       dialog [string3] useHeader "Modifying MSIM.INI"
  148.         The MSIM.INI file is about to be installed in the
  149.         Windows directory, however a previous version of MSIM.INI 
  150.         has been detected. Please enter a backup file name for
  151.         the previous version of MSIM.INI to be saved as: 
  152.       endDialog  
  153.     endif
  154.   
  155.     if [string3] = blankString
  156.     else
  157.       if fileExists [windowsDirectory]\[string3]
  158.         dialog [yesOrNo1] useHeader "Modifying MSIM.INI"
  159.           The file [windowsDirectory]\[string3] already exists.
  160.           Do you want to write over it?
  161.         endDialog
  162.         if [yesOrNo1] = n
  163.           goto [pointMSIMINI]
  164.         else
  165.           deleteFiles from [windowsDirectory]
  166.             [string3]
  167.           endDeleteFiles
  168.         endif
  169.       endif
  170.       renameFile [windowsDirectory]\msim.ini to [string3]
  171.     endif
  172.   
  173.     copyFiles from [installationDirectory] to [windowsDirectory]
  174.       msim.ini
  175.     endCopyFiles
  176.   
  177.     deleteFiles from [installationDirectory]
  178.       msim.ini
  179.     endDeleteFiles
  180.   
  181.     [array1][1] := MICROSIM
  182.     [array1][2] := LIBPATH
  183.     [array1][3] := [installationDirectory]\LIB
  184.     [array1][4] := [windowsDirectory]\MSIM.INI
  185.     writePrivateProfileString using [array1]
  186.   
  187.     [array1][1] := MICROSIM
  188.     [array1][2] := BACKUP
  189.     [array1][3] := [installationDirectory]\BACKUP
  190.     [array1][4] := [windowsDirectory]\MSIM.INI
  191.     writePrivateProfileString using [array1]
  192.  
  193.   endif  ;; if windows
  194. endif  ;; if [number1] = 1
  195.  
  196. if [number1] = 1
  197.   dialog [yesOrNo1] useHeader "Run SETUPDEV.EXE"
  198.     Do you want to run the DOS SETUPDEV.EXE program to 
  199.     create a PSPICE.DEV file that sets up the monitor and 
  200.     printer for the DOS program PARTS.EXE?
  201.   endDialog
  202.   if [yesOrNo1] = y
  203.     run  [installationDirectory]\setupdev.exe -d [installationDirectory]\pspice.dev
  204.   endif  
  205.  
  206.   ;; [number1] always set to installation menu choice (1 == full install)
  207.   dialog useHeader "Design Center Installation"
  208.     Your Evaluation Design Center installation is now complete.
  209.     You must reboot the computer for changes to your AUTOEXEC.BAT
  210.     file to take effect.  
  211.  
  212.     Please use Notepad to view the README file.
  213.  
  214.   endDialog
  215. else
  216.   dialog useHeader "Partial Installation"
  217.     Your partial installation is now complete.
  218.   endDialog
  219.   goto [pointSTART]
  220. endif
  221.  
  222. soLong                                 ;; exit installation pgm
  223.  
  224.  
  225.  
  226. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  227. ;;
  228. ;; Purpose
  229. ;;   Allow user to copy one file from compressed disks.
  230. ;;
  231. ;; Returned value
  232. ;;
  233. ;; Discussion
  234. ;;   File is only put in queue, must still be a 'getQuedFiles' call
  235. ;;
  236. ;; Author
  237. ;;   kws - 03 Dec 90 - created
  238. ;;
  239. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  240. procedure copyOneFile
  241. [pointCOPYFILE]
  242.   dialog [string1] useHeader "Extracting a file from installation Disks"
  243.     Please enter the name of the file you wish to copy
  244.     from the installation disks (press ENTER to exit):
  245.   endDialog
  246.  
  247.   if [string1] = blankString
  248.     exit
  249.   endif
  250.  
  251.   if [string1] contains \
  252.     popup Please enter just the file name with no path.
  253.     goto [pointCOPYFILE]
  254.   endif
  255.  
  256.   if lengthOf [string1] > 12
  257.     popup The file name is too long.
  258.     goto [pointCOPYFILE]
  259.   endif
  260.  
  261.   if fileIsInLibrary [string1]
  262.   else
  263.     popup Can't find that file name on the installation disks.
  264.     goto [pointCOPYFILE]
  265.   endif
  266.  
  267.   queFiles
  268.     [string1]
  269.   endQueFiles
  270.  
  271. endProcedure
  272.  
  273.  
  274.  
  275. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  276. ;;
  277. ;; Purpose
  278. ;;   Initialize windows at start of install
  279. ;;
  280. ;; Returned value
  281. ;;
  282. ;; Discussion
  283. ;;
  284. ;; Author
  285. ;;   kws - 03 Dec 90 - created
  286. ;;
  287. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  288. procedure initializeInstall
  289.   setTopLineTo MicroSim Design Center Installation (ESC to quit)
  290.  
  291.   setBackdrop off
  292.   setDefaultBitmap off
  293.  
  294.   if windows
  295.     setAttentionAttrTo blackOnWhite
  296.     setScreenAttrTo blackOnWhite
  297.     setBackgroundColor 192 192 192 192 192 192
  298.     setDithering off
  299.   endif
  300.  
  301.   showWindow maximize
  302.   clearScreen
  303.  
  304.   setSupportInformation
  305.     For assistance please call the MicroSim Product
  306.     Support Group or the MicroSim Technical Support
  307.     group at (714) 837-0790
  308.  
  309.     MicroSim Corporation
  310.     20 Fairbanks
  311.     Irvine, CA   92718
  312.  
  313.     Fax: (714) 455-0554
  314.   endSetSupportInformation
  315.  
  316. endProcedure
  317.  
  318.  
  319.  
  320. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  321. ;;
  322. ;; Purpose
  323. ;;   Abort installation
  324. ;;
  325. ;; Returned value
  326. ;;
  327. ;; Discussion
  328. ;;   Put any cleanup funcs here.
  329. ;;
  330. ;; Author
  331. ;;   kws - 03 Dec 90 - created
  332. ;;
  333. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  334. procedure abortInstall
  335.   popup Evaluation Design Center installation aborted.
  336.   soLong
  337. endProcedure
  338.  
  339.  
  340.  
  341. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  342. ;;
  343. ;; Purpose
  344. ;;   Exit installation
  345. ;;
  346. ;; Returned value
  347. ;;
  348. ;; Discussion
  349. ;;   Put any cleanup funcs here.
  350. ;;
  351. ;; Author
  352. ;;   kws - 03 Dec 90 - created
  353. ;;
  354. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  355. procedure exitInstall
  356.   soLong
  357. endProcedure
  358.  
  359.  
  360.  
  361. endScript
  362.  
  363.  
  364.  
  365.  
  366.  
  367.