home *** CD-ROM | disk | FTP | other *** search
/ Software 2000 / Software 2000 Volume 1 (Disc 1 of 2).iso / aga / aga174b.dms / in.adf / MagicExpansion / Install / Install_ME12_English < prev   
Encoding:
Text File  |  1994-06-25  |  6.8 KB  |  336 lines
  1. ;
  2. ; Installation script for...
  3. ;
  4. ; +*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*
  5. ;
  6. ;                         MagicExpansion 1.2
  7. ;                            - Shareware -
  8. ;                  Copyright © 1994 by Johannes Beigel
  9. ;
  10. ; *+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+
  11. ;
  12.  
  13. ( set @default-dest "SYS:" )
  14. ( set vernum ( getversion "exec.library" ( resident ) ) )
  15. ( set ver ( / vernum 65536 ) )
  16.  
  17. ( complete 0 )
  18.  
  19. ; --------------------
  20. ; Ask what to install
  21. ; --------------------
  22.  
  23. ( set parts
  24.  ( askoptions
  25.   ( prompt "Choose the items you would like installed." )
  26.   ( choices "C include file"
  27.             "MUI image sets"
  28.             "Palettes"
  29.             "Patterns"
  30.             "OS 2.x window patterns"
  31.             "Mouse pointers" )
  32.   ( help "C include file: Useful new definitions for MUI programming\n\n"
  33.          "MUI image sets: New MUI image sets\n\n"
  34.          "Palettes: A few new palettes (alternatives to the original MagicWB palette)\n\n"
  35.          "Patterns: New Workbench background patterns\n\n"
  36.          "OS 2.x window patterns: old-style window patterns for the \"WBPattern\" prefs-ed\n\n"
  37.          "Mouse pointers: Several normal and busy mouse pointers.\n\n" )
  38.  )
  39. )
  40.  
  41. ( complete 14 )
  42.   
  43. ; --------------------
  44. ; Install the include file
  45. ; --------------------
  46.  
  47. ( if( IN parts 0 )
  48. (
  49.  
  50.  ( set includedest
  51.   ( askdir
  52.    ( prompt "Please select a place for the include file." )
  53.    ( default "INCLUDE:libraries/" )
  54.    ( help "Choose a directory where the include file should be copied to. The best place is"
  55.           "INCLUDE:libraries/." )
  56.   )
  57.  )
  58.  
  59.  ( makedir includedest )
  60.  ( working "Installing include file" )
  61.  ( copyfiles ( source "/include/libraries/muidefs.h" ) ( dest includedest ) )
  62.  
  63. )
  64. )
  65.  
  66. ( complete 28 )
  67.  
  68. ; --------------------
  69. ; Install the MUI image sets
  70. ; --------------------
  71.  
  72. ( if( IN parts 1 )
  73. (
  74.  
  75.  (set imgsetsdest
  76.   ( askdir
  77.    ( prompt "Please select a place for the MUI image sets." )
  78.    ( default "SYS:Prefs/MUI-Images" )
  79.    ( help "Choose a directory where the MUI image sets will be copied to. You should use the same "
  80.           "directory as you selected during installation of MUI (default: SYS:Prefs/Mui-Images/)." )
  81.   )
  82.  )
  83.  
  84.  ( makedir imgsetsdest )
  85.  
  86.  ( set imgsets
  87.   ( askoptions
  88.    ( prompt "Choose the MUI image sets you would like installed.\n" )
  89.    ( choices "Jojo_Black_11pt (You MUST have this one)"
  90.              "Jojo_Black_13pt"
  91.              "Jojo_3D_11pt"
  92.              "Jojo_3D_13pt"
  93.              "Jojo_Outline_11pt"
  94.              "Jojo_Outline_13pt" )
  95.    ( help "You should install at least Jojo_Black_11pt because this set contains all images.\n\n"
  96.           "The best way is, to install all the sets. Later you can delete the sets you don't like." )
  97.   )
  98.  )
  99.  
  100.  ( working "Installing MUI image sets" )
  101.  
  102.  ( if( IN imgsets 0 )
  103.  (
  104.  
  105.   ( copyfiles
  106.    ( prompt "Installing MUI image set Jojo_Black_11pt.." )
  107.    ( source "/MUI-Images/Jojo_Black_11pt" )
  108.    ( all )
  109.    ( dest ( tackon imgsetsdest "Jojo_Black_11pt" ) )
  110.   )
  111.  
  112.  )
  113.  )
  114.  
  115.  ( if( IN imgsets 1 )
  116.  (
  117.  
  118.   ( copyfiles
  119.    ( prompt "Installing MUI image set Jojo_Black_13pt.." )
  120.    ( source "/MUI-Images/Jojo_Black_13pt" )
  121.    ( all )
  122.    ( dest ( tackon imgsetsdest "Jojo_Black_13pt" ) )
  123.   )
  124.  
  125.  )
  126.  )
  127.  
  128.  ( if( IN imgsets 2 )
  129.  (
  130.  
  131.   ( copyfiles
  132.    ( prompt "Installing MUI image set Jojo_3D_11pt.." )
  133.    ( source "/MUI-Images/Jojo_3D_11pt" )
  134.    ( all )
  135.    ( dest ( tackon imgsetsdest "Jojo_3D_11pt" ) )
  136.   )
  137.  
  138.  )
  139.  )
  140.  
  141.  ( if( IN imgsets 3 )
  142.  (
  143.  
  144.   ( copyfiles
  145.    ( prompt "Installing MUI image set Jojo_3D_13pt.." )
  146.    ( source "/MUI-Images/Jojo_3D_13pt" )
  147.    ( all )
  148.    ( dest ( tackon imgsetsdest "Jojo_3D_13pt" ) )
  149.   )
  150.  
  151.  )
  152.  )
  153.  
  154.  ( if( IN imgsets 4 )
  155.  (
  156.  
  157.   ( copyfiles
  158.    ( prompt "Installing MUI image set Jojo_Outline_11pt.." )
  159.    ( source "/MUI-Images/Jojo_Outline_11pt" )
  160.    ( all )
  161.    ( dest ( tackon imgsetsdest "Jojo_Outline_11pt" ) )
  162.   )
  163.  
  164.  )
  165.  )
  166.  
  167.  ( if( IN imgsets 5 )
  168.  (
  169.  
  170.   ( copyfiles
  171.    ( prompt "Installing MUI image set Jojo_Outline_13pt.." )
  172.    ( source "/MUI-Images/Jojo_Outline_13pt" )
  173.    ( all )
  174.    ( dest ( tackon imgsetsdest "Jojo_Outline_13pt" ) )
  175.   )
  176.  
  177.  )
  178.  )
  179.  
  180. )
  181. )
  182.  
  183. ( complete 42 )
  184.  
  185. ; --------------------
  186. ; Install the palettes
  187. ; --------------------
  188.  
  189. ( if( IN parts 2 )
  190. (
  191.  
  192.  ( set palettedest
  193.   ( askdir
  194.    ( prompt "Please select a place for the color palettes." )
  195.    ( default "SYS:Prefs/Presets" )
  196.    ( help "Choose a directory where the palettes should be copied to." )
  197.   )
  198.  )
  199.  
  200.  ( working "Installing color palettes" )
  201.  ( makedir palettedest )
  202.  
  203.  ( if ( < ver 39 )
  204.  (
  205.  
  206.   ( copyfiles
  207.    ( prompt "Installing OS 2.x palettes.." )
  208.    ( source "/OS2Palettes" )
  209.    ( all )
  210.    ( dest palettedest )
  211.    ( confirm )
  212.    ( help @copyfiles-help )
  213.   )
  214.  
  215.  )
  216.  (
  217.  
  218.   ( copyfiles
  219.    ( prompt "Installing OS 3.x palettes.." )
  220.    ( source "/OS3Palettes" )
  221.    ( all )
  222.    ( dest palettedest )
  223.    ( confirm )
  224.    ( help @copyfiles-help )
  225.   )
  226.  
  227.  )
  228.  )
  229.  
  230. )
  231. )
  232.  
  233. ( complete 56 )
  234.  
  235. ; --------------------
  236. ; Install the background patterns
  237. ; --------------------
  238.  
  239. ( if( IN parts 3 )
  240. (
  241.  
  242.  ( set patdest
  243.   ( askdir
  244.    ( prompt "Please select a place for the background patterns." )
  245.    ( default "SYS:Prefs/Patterns" )
  246.    ( help "Choose a directory where the background patterns should be copied to. This should be "
  247.           "the same directory as your old directory with the MagicWB patterns in it." )
  248.   )
  249.  )
  250.  
  251.  ( working "Installing background patterns" )
  252.  ( makedir patdest )
  253.  
  254.  ( copyfiles
  255.   ( prompt "Installing background patterns.." )
  256.   ( source "/Patterns" )
  257.   ( all )
  258.   ( dest patdest )
  259.   ( confirm )
  260.   ( help @copyfiles-help )
  261.  )
  262.  
  263. )
  264. )
  265.  
  266. ( complete 70 )
  267.  
  268. ; --------------------
  269. ; Install the 2.x background patterns
  270. ; --------------------
  271.  
  272. ( if( IN parts 4 )
  273. (
  274.  
  275.  ( set winpatdest
  276.   ( askdir
  277.    ( prompt "Please select a place for the OS 2.x window background patterns." )
  278.    ( default "SYS:Prefs/Presets" )
  279.    ( help "Choose a directory where the window patterns should be copied to. This is normally "
  280.           "SYS:Prefs/Presets/." )
  281.   )
  282.  )
  283.  
  284.  ( working "Installing OS 2.x window background patterns" )
  285.  ( makedir winpatdest )
  286.  
  287.  ( copyfiles
  288.   ( prompt "Installing OS 2.x window patterns.." )
  289.   ( source "/OS2WinPatterns" )
  290.   ( all )
  291.   ( dest winpatdest )
  292.   ( confirm )
  293.   ( help @copyfiles-help )
  294.  )
  295.  
  296. )
  297. )
  298.  
  299. ( complete 84 )
  300.  
  301. ; --------------------
  302. ; Install the mouse pointers
  303. ; --------------------
  304.  
  305. ( if( IN parts 5 )
  306. (
  307.  
  308.  ( set ptrdest
  309.   ( askdir
  310.    ( prompt "Please select a place for the mouse pointers." )
  311.    ( default "SYS:Prefs/Presets" )
  312.    ( help "Choose a directory where the mouse pointers should be copied to. This is normally "
  313.           "SYS:Prefs/Presets/." )
  314.   )
  315.  )
  316.  
  317.  ( working "Installing mouse pointers" )
  318.  ( makedir ptrdest )
  319.  
  320.  ( copyfiles
  321.   ( prompt "Installing mouse pointers.." )
  322.   ( source "/Pointers" )
  323.   ( all )
  324.   ( dest ptrdest )
  325.   ( confirm )
  326.   ( help @copyfiles-help )
  327.  )
  328.  
  329. )
  330. )
  331.  
  332. ( complete 100 )
  333.  
  334. ( exit "Installation of MagicExpansion 1.2 complete. Hope you'll have fun with it. "
  335.        "And don't forget this:\n\nMagicExpansion is Shareware." )
  336.