home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 109 / EnigmaAmiga109CD.iso / software / varie / install_digitalalmanac / installation / install < prev   
Encoding:
Text File  |  2000-01-31  |  12.0 KB  |  528 lines
  1. ;$VER:Digital Almanac II Installer Script 1.8.2
  2.  
  3. (procedure P_INSTALL_EXE
  4.     (
  5.     (set #dest-cat-dir (tackon #dest-dir "Catalogs"))
  6.     (set #dest-fonts-dir (tackon #dest-dir "Fonts"))
  7.     (set #dest-icons-dir (tackon #dest-dir "Icons"))
  8.     (set #dest-toolbar-dir (tackon #dest-dir "Toolbar"))
  9.     (set #dest-install-dir (tackon #dest-dir "Installation"))
  10.     (set #dest-pictures-dir (tackon #dest-dir "Pictures"))
  11.     (set #dest-projects-dir (tackon #dest-dir "Projects"))
  12.     (set #dest-user-dir (tackon #dest-dir "User"))
  13.     (set #dest-bin-dir (tackon #dest-dir "Bin"))
  14.     (set #dest-docks-dir (tackon #dest-dir "DockIcons"))
  15.     (set #dest-misc-dir (tackon #dest-dir "Misc"))
  16.     
  17.     (set #langnum
  18.         (askchoice
  19.             (prompt #choose-lang)
  20.             (choices "Deutsch" "English" "Français" "Italiano")
  21.             (help @askchoice-help)
  22.             (default #choose-lang-def)
  23.         )
  24.     )
  25.  
  26.     (set #langcat
  27.         (select #langnum
  28.         "Deutsch" "English" "Français" "Italiano"
  29.         )
  30.     )
  31.     
  32.     (set #langdoc
  33.         (select #langnum
  34.         "Deutsch" "English" "English" "English"
  35.         )
  36.     )
  37.     
  38.     (set #src-lang-dir (tackon "/Catalogs" #langcat))
  39.     (set #src-docs-dir (tackon "/Docs" #langdoc))
  40.     (set #dest-lang-dir (tackon #dest-cat-dir #langcat))
  41.     
  42.     (working #msg-install-exe)
  43.  
  44.     (makedir #dest-dir)
  45.  
  46.     (copyfiles
  47.         (source "//Install_DigitalAlmanac.info")
  48.         (dest #inst-dir)
  49.         (newname (tackon #inst-dir "DigitalAlmanac.info"))
  50.     )
  51.  
  52.     (if (patmatch "68020|68030" (database "cpu"))
  53.         (set #daname "/DigitalAlmanac.020")
  54.         (set #daname "/DigitalAlmanac.040")
  55.     )
  56.  
  57.     (copyfiles
  58.         (source #daname)
  59.         (newname "DigitalAlmanac")
  60.         (dest #dest-dir)
  61.     )
  62.  
  63.     (copyfiles
  64.         (source "/DigitalAlmanac.info")
  65.         (dest #dest-dir)
  66.     )
  67.  
  68.     (copyfiles
  69.         (source (tackon #src-docs-dir "DigitalAlmanac.guide"))
  70.         (dest #dest-dir)
  71.         (infos)
  72.     )
  73.     
  74.     (makedir #dest-cat-dir)
  75.     (makedir #dest-lang-dir)
  76.     (copyfiles
  77.         (source (tackon #src-lang-dir "DigitalAlmanac.catalog"))
  78.         (dest #dest-lang-dir)
  79.     )
  80.     
  81.     (makedir #dest-fonts-dir)
  82.     (copyfiles
  83.         (source "/Fonts")
  84.         (dest #dest-fonts-dir)
  85.         (all)
  86.     )
  87.     
  88.     (makedir #dest-icons-dir)
  89.     (copyfiles
  90.         (source "/Icons.info")
  91.         (dest #dest-dir)
  92.     )
  93.     (copyfiles
  94.         (source "/Icons")
  95.         (dest #dest-icons-dir)
  96.         (all)
  97.     )
  98.  
  99.     (makedir #dest-misc-dir)
  100.     (copyfiles
  101.         (source "/Misc")
  102.         (dest #dest-misc-dir)
  103.         (all)
  104.     )
  105.  
  106.     (makedir #dest-toolbar-dir)
  107.     (copyfiles
  108.         (source "/Toolbar")
  109.         (dest #dest-toolbar-dir)
  110.         (all)
  111.     )
  112.  
  113.     (makedir #dest-install-dir)
  114.     (copyfiles
  115.         (source "/Installation.info")
  116.         (dest #dest-dir)
  117.     )
  118.     (copyfiles
  119.         (source "/Installation")
  120.         (dest #dest-install-dir)
  121.         (all)
  122.     )
  123.     
  124.     (makedir #dest-pictures-dir)
  125.     (copyfiles
  126.         (source "/Pictures.info")
  127.         (dest #dest-dir)
  128.     )
  129.  
  130.     (makedir #dest-projects-dir)
  131.     (copyfiles
  132.         (source "/Projects.info")
  133.         (dest #dest-dir)
  134.     )
  135.     (copyfiles
  136.         (source "/Projects")
  137.         (dest #dest-projects-dir)
  138.         (all)
  139.     )
  140.  
  141.     (makedir #dest-bin-dir)
  142.     (copyfiles
  143.         (source "/Bin")
  144.         (dest #dest-bin-dir)
  145.         (all)
  146.     )
  147.     
  148.     (makedir #dest-user-dir)
  149.     (copyfiles
  150.         (source "/User")
  151.         (pattern "#?.data")
  152.         (dest #dest-user-dir)
  153.     )
  154.     (if (= #langnum 0)
  155.         (copyfiles
  156.             (source "/User/ngcnames.data.deutsch")
  157.             (dest #dest-user-dir)
  158.             (newname "ngcnames.data")
  159.         )
  160.         (copyfiles
  161.             (source "/User/ngcnames.data.english")
  162.             (dest #dest-user-dir)
  163.             (newname "ngcnames.data")
  164.         )
  165.     )
  166.  
  167.     (if (= #langnum 0)
  168.         (copyfiles
  169.             (source "/User/place.data.deutsch")
  170.             (dest #dest-user-dir)
  171.             (newname "place.data")
  172.         )
  173.         (copyfiles
  174.             (source "/User/place.data.english")
  175.             (dest #dest-user-dir)
  176.             (newname "place.data")
  177.         )
  178.     )
  179.  
  180.     (copylib
  181.         (prompt "asyncio.library")
  182.         (help @copylib-help)
  183.         (source "/Libs/asyncio.library")
  184.         (dest "LIBS:")
  185.         (confirm "average")
  186.     )
  187.  
  188.     (if (patmatch "68020|68030" (database "cpu"))
  189.         (set #jpegname "jpeg.library_020881")
  190.         (set #jpegname "jpeg.library_040881")
  191.     )
  192.  
  193.     (copylib
  194.         (prompt "jpeg.library")
  195.         (help @copylib-help)
  196.         (source (tackon "/Libs" #jpegname))
  197.         (dest "LIBS:")
  198.         (newname "jpeg.library")
  199.         (confirm "average")
  200.     )
  201.  
  202.     (copylib
  203.         (prompt "NList.mcc")
  204.         (help @copylib-help)
  205.         (source "/Libs/MUI/NList.mcc")
  206.         (dest "MUI:Libs/MUI")
  207.         (confirm "average")
  208.     )
  209.  
  210.     (copylib
  211.         (prompt "NListview.mcc")
  212.         (help @copylib-help)
  213.         (source "/Libs/MUI/NListview.mcc")
  214.         (dest "MUI:Libs/MUI")
  215.         (confirm "average")
  216.     )
  217.  
  218.     (copylib
  219.         (prompt "NFloattext.mcc")
  220.         (help @copylib-help)
  221.         (source "/Libs/MUI/NFloattext.mcc")
  222.         (dest "MUI:Libs/MUI")
  223.         (confirm "average")
  224.     )
  225.  
  226.     (copylib
  227.         (prompt "NListviews.mcp")
  228.         (help @copylib-help)
  229.         (source "/Libs/MUI/NListviews.mcp")
  230.         (dest "MUI:Libs/MUI")
  231.         (confirm "average")
  232.     )
  233.  
  234.     (copylib
  235.         (prompt "HotkeyString.mcc")
  236.         (help @copylib-help)
  237.         (source "/Libs/MUI/HotkeyString.mcc")
  238.         (dest "MUI:Libs/MUI")
  239.         (confirm "average")
  240.     )
  241.  
  242.     (copylib
  243.         (prompt "TransferAnim.mcc")
  244.         (help @copylib-help)
  245.         (source "/Libs/MUI/TransferAnim.mcc")
  246.         (dest "MUI:Libs/MUI")
  247.         (confirm "average")
  248.     )
  249.  
  250.     (copylib
  251.         (prompt "TransferAnim.mcp")
  252.         (help @copylib-help)
  253.         (source "/Libs/MUI/TransferAnim.mcp")
  254.         (dest "MUI:Libs/MUI")
  255.         (confirm "average")
  256.     )
  257.  
  258.     (copylib
  259.         (prompt "imagepool.library")
  260.         (help @copylib-help)
  261.         (source "/Libs/imagepool.library")
  262.         (dest "LIBS:")
  263.         (confirm "average")
  264.     )
  265.  
  266.     (makedir #dest-docks-dir)
  267.     (copyfiles
  268.         (source "/DockIcons.info")
  269.         (dest #dest-dir)
  270.     )
  271.     (copyfiles
  272.         (source "/DockIcons")
  273.         (dest #dest-docks-dir)
  274.         (all)
  275.     )
  276.  
  277.     (set #dest-arexx-dir (tackon #dest-dir "ARexx"))
  278.     (makedir #dest-arexx-dir)
  279.     (copyfiles
  280.         (source "/ARexx.info")
  281.         (dest #dest-dir)
  282.     )
  283.     (copyfiles
  284.         (source "/ARexx")
  285.         (dest #dest-arexx-dir)
  286.         (all)
  287.     )
  288.  
  289.     (set #dest-developer-dir (tackon #dest-dir "Developer"))
  290.     (makedir #dest-developer-dir)
  291.     (copyfiles
  292.         (source "/Developer.info")
  293.         (dest #dest-dir)
  294.     )
  295.     (copyfiles
  296.         (source "/Developer")
  297.         (dest #dest-developer-dir)
  298.         (all)
  299.     )
  300.     
  301.     )
  302. )
  303.  
  304. (procedure P_INSTALL_DATA
  305.     (
  306.     (set #arc-dir
  307.         (askdir
  308.             (prompt #ask-dir-data)
  309.             (help @askdir-help)
  310.             (default @default-dest)
  311.             (disk)
  312.         )
  313.     )
  314.     (working #msg-install-data)
  315.     (set #arc (tackon #arc-dir "DAlmanac_Data.lha"))
  316.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  317.     (set @default-dest #arc-dir)
  318.     )
  319. )
  320.  
  321. (procedure P_INSTALL_MAPS
  322.     (
  323.     (set #arc-dir
  324.         (askdir
  325.             (prompt #ask-dir-maps)
  326.             (help @askdir-help)
  327.             (default @default-dest)
  328.             (disk)
  329.         )
  330.     )
  331.     (working #msg-install-maps)
  332.     (set #arc (tackon #arc-dir "DAlmanac_Maps.lha"))
  333.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  334.     (set @default-dest #arc-dir)
  335.     )
  336. )
  337.  
  338. (procedure P_INSTALL_AST
  339.     (
  340.     (set #arc-dir
  341.         (askdir
  342.             (prompt #ask-dir-ast)
  343.             (help @askdir-help)
  344.             (default @default-dest)
  345.             (disk)
  346.         )
  347.     )
  348.     (working #msg-install-ast)
  349.     (set #arc (tackon #arc-dir "DAlmanac_Ast.lha"))
  350.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  351.     (set @default-dest #arc-dir)
  352.     )
  353. )
  354.  
  355. (procedure P_INSTALL_DS
  356.     (
  357.     (set #arc-dir
  358.         (askdir
  359.             (prompt #ask-dir-ds)
  360.             (help @askdir-help)
  361.             (default @default-dest)
  362.             (disk)
  363.         )
  364.     )
  365.     (working #msg-install-ds)
  366.     (set #arc (tackon #arc-dir "DAlmanac_DS.lha"))
  367.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  368.     (set @default-dest #arc-dir)
  369.     )
  370. )
  371.  
  372. (procedure P_INSTALL_EXTRA
  373.     (
  374.     (set #arc-dir
  375.         (askdir
  376.             (prompt #ask-dir-extra)
  377.             (help @askdir-help)
  378.             (default @default-dest)
  379.             (disk)
  380.         )
  381.     )
  382.     (working #msg-install-extra)
  383.     (set #arc (tackon #arc-dir "DAlmanac_Extra.lha"))
  384.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  385.     (set @default-dest #arc-dir)
  386.     )
  387. )
  388.  
  389. (if (= @language "deutsch")
  390.     (
  391.     (set #choose-inst "Bitte wählen Sie die Archive aus, welche Sie installieren möchten.\nArchive mit '**' sind für eine Erstinstallation notwendig !!")
  392.     (set #inst-exe "Installation des Hauptarchivs **")
  393.     (set #inst-data "Installation der Hauptdaten **")
  394.     (set #inst-maps "Installation der Oberflächentexturen")
  395.     (set #inst-ast "Installation des Asteroidenkataloges")
  396.     (set #inst-ds "Installation der Deep-Sky Objektkataloge")
  397.     (set #inst-extra "Installation des großen Sternkataloges (Extra)")
  398.     (set #ask-dest1 "Wählen Sie ein Verzeichnis aus,\nwo Digital Almanac II installiert werden soll.\nEine Schublade 'DigitalAlmanac' wird automatisch erzeugt.")
  399.     (set #ask-dest2 "In welchem Verzeichnis befindet sich der Ordner 'DigitalAlmanac' ?")
  400.     (set #ask-dir-lha "In welchem verzeichnis befindet sich 'Lha' ?")
  401.     (set #ask-dir-data "In welchem Verzeichnis befindet sich 'DAlmanac_Data.lha' ?")
  402.     (set #ask-dir-maps "In welchem Verzeichnis befindet sich 'DAlmanac_Maps.lha' ?")
  403.     (set #ask-dir-ast "In welchem Verzeichnis befindet sich 'DAlmanac_Ast.lha' ?")
  404.     (set #ask-dir-ds "In welchem Verzeichnis befindet sich 'DAlmanac_DS.lha' ?")
  405.     (set #ask-dir-extra "In welchem Verzeichnis befindet sich 'DAlmanac_Extra.lha' ?")
  406.     (set #choose-lang "Wählen Sie eine Sprache für Digital Almanac II aus.")
  407.     (set #choose-lang-def 0)
  408.     (set #msg-install-exe "Installiere Digital Almanac II.")
  409.     (set #msg-install-data "Installiere Daten.")
  410.     (set #msg-install-maps "Installiere Oberflächentexturen.")
  411.     (set #msg-install-ast "Installiere Asteroiden.")
  412.     (set #msg-install-ds "Installiere Deep-Sky Objekte.")
  413.     (set #msg-install-extra "Installiere großen Sternenkatalog.")
  414.     (set #msg-nothing-chosen "Es wurde kein Archiv ausgewählt !!")
  415.    (set #msg-ende "Bitte lesen Sie noch das Kapitel Installation im Guide, um noch einige notwendige MUI-Einstellungen durchzuführen. Diese müssen Sie manuell vornehmen.\n\n\
  416. Vergessen Sie nicht in ihrem MUI-Einsteller das Flag Fenster/Refresh auf SMART zu stellen, da sonst Digital Almanac abstürzt !!")
  417.     )
  418. )
  419. (if (= @language "english")
  420.     (
  421.     (set #choose-inst "Please choose the archives, you like to install.\nArchives marked with '**' are necessary for a first installation !!")
  422.     (set #inst-exe "Installation of the main exe archiv")
  423.     (set #inst-data "Installation of the main basic datas")
  424.     (set #inst-maps "Installation of the surface textures")
  425.     (set #inst-ast "Installation of the asteroid catalog")
  426.     (set #inst-ds "Installation of the deep-sky object catalogs")
  427.     (set #inst-extra "Installation of the large star catalog (extra)")
  428.     (set #ask-dest1 "Choose directory to install Digital Almanac II.\nA drawer 'DigitalAlmanac' will automatically be created.")
  429.     (set #ask-dest2 "What is the directory of the folder 'DigitalAlmanac' ?")
  430.     (set #ask-dir-lha "In which drawer is 'Lha' ?")
  431.     (set #ask-dir-data "In which drawer is 'DAlmanac_Data.lha' ?")
  432.     (set #ask-dir-maps "In which drawer is 'DAlmanac_Maps.lha' ?")
  433.     (set #ask-dir-ast "In which drawer is 'DAlmanac_Ast.lha' ?")
  434.     (set #ask-dir-ds "In which drawer is 'DAlmanac_DS.lha' ?")
  435.     (set #ask-dir-extra "In which drawer is 'DAlmanac_Extra.lha' ?")
  436.     (set #choose-lang "Select language you want to use with Digital Almanac II.")
  437.     (set #choose-lang-def 1)
  438.     (set #msg-install-exe "Installing Digital Almanac II.")
  439.     (set #msg-install-data "Installing datas.")
  440.     (set #msg-install-maps "Installing surface textures.")
  441.     (set #msg-install-ast "Installing asteroids.")
  442.     (set #msg-install-ds "Installing deep-sky objects.")
  443.     (set #msg-install-extra "Installing large star catalog.")
  444.     (set #msg-nothing-chosen "No archive has been chosen !!")
  445.    (set #msg-ende "Please read the chapter Installation in the Guide to adjust some necessary MUI settings. These must be done manually.\n\n\
  446. Don't forget to set the flag Windows/Refresh to SMART in your MUI pref !! Otherwise Digital Almanac will crash !")
  447.     )
  448. )
  449.  
  450. (set #install-arc
  451.     (askoptions
  452.         (prompt #choose-inst)
  453.         (choices #inst-exe #inst-data #inst-maps #inst-ast #inst-ds #inst-extra)
  454.         (default 3)
  455.         (help @askchoice-help)
  456.     )
  457. )
  458.  
  459. (if (= #install-arc 0)
  460. (exit #msg-nothing-chosen)
  461. )
  462.  
  463. (if (BITAND #install-arc 1)
  464.     (set #inst-dir
  465.         (askdir
  466.             (prompt #ask-dest1)
  467.             (help @askdir-help)
  468.             (default @default-dest)
  469.             (disk)
  470.         )
  471.     )
  472.     (if (= 0 (exists "//DigitalAlmanac.info"))
  473.         (set #inst-dir
  474.             (askdir
  475.                 (prompt #ask-dest2)
  476.                 (help @askdir-help)
  477.                 (default @default-dest)
  478.                 (disk)
  479.             )
  480.         )
  481.         (set #inst-dir "//")
  482.     )
  483. )
  484.  
  485. (set #dest-dir (tackon #inst-dir "DigitalAlmanac"))
  486.  
  487. (if (BITAND #install-arc 62)
  488.     (
  489.     (set #lha-dir
  490.         (askdir
  491.             (prompt #ask-dir-lha)
  492.             (help @askdir-help)
  493.             (default "C:")
  494.             (disk)
  495.         )
  496.     )
  497.     (set #lha (tackon #lha-dir "Lha"))
  498.     )
  499. )
  500.  
  501. (if (BITAND #install-arc 1)
  502.     (P_INSTALL_EXE)
  503. )
  504.  
  505. (if (BITAND #install-arc 2)
  506.     (P_INSTALL_DATA)
  507. )
  508.  
  509. (if (BITAND #install-arc 4)
  510.     (P_INSTALL_MAPS)
  511. )
  512.  
  513. (if (BITAND #install-arc 8)
  514.     (P_INSTALL_AST)
  515. )
  516.  
  517. (if (BITAND #install-arc 16)
  518.     (P_INSTALL_DS)
  519. )
  520.  
  521. (if (BITAND #install-arc 32)
  522.     (P_INSTALL_EXTRA)
  523. )
  524.  
  525. (set @default-dest #inst-dir)
  526. (message #msg-ende)
  527.  
  528.