home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #3 / Amiga Plus CD - 2002 - No. 03.iso / AmiSoft / Text / Edit / Mynotes.lha / MyNotes / MyNotes.install < prev    next >
Encoding:
Text File  |  2002-12-23  |  10.7 KB  |  428 lines
  1. ; $VER: Installation script for MyNotes 0.5 (22.12.02)
  2. ; © 2002 Jean Holzammer
  3. ; Created with GoldED 6.16
  4.  
  5. (if (= @language "Deutsch")
  6.  
  7.             (
  8.  
  9.                (set #osversion_msg                       "Falsche Betriebssystemversion (Software benötigt OS 39 oder besser) !")
  10.  
  11.                (set #onerror_msg                         "Während der Installation ist ein Fehler aufgetreten. Bitte Log-Datei überprüfen für ein besseres Verständnis des Fehlers.")
  12.  
  13.                (set #general_copyfiles_prompt            "Bitte zu kopierende Datei(en) auswählen...")
  14.  
  15.                (set #general_askbool_yes                 "Ja")
  16.  
  17.                (set #general_askbool_no                  "Nein")
  18.  
  19.                (set #executable_askdir_prompt            "Bitte Zielpfad für das Programm MyNotes wählen. Ein eigenes Verzeichnis wird nicht erstellt.")
  20.  
  21.                (set #executable_askdir_help              "Es wird empfohlen, ein Ziel zu wählen, das im Pfad liegt, am sinnvollsten C: .")
  22.  
  23.                (set #documentation_askbool_prompt        "Soll die AmigaGuide/PowerGuide Dokumentation installiert werden ?")
  24.  
  25.                (set #documentation_askbool_help          "Momentan ist nur eine englische und duetsche Dokumentation verfügbar.")
  26.  
  27.                (set #german_doc_askdir_prompt            "Bitte Zielpfad für die deutsche Dokumentation wählen...")
  28.  
  29.                (set #german_doc_askdir_help              #documentation_askbool_help)
  30.  
  31.                (set #english_doc_askdir_prompt           "Bitte Zielpfad für die englische Dokumentation wählen...")
  32.  
  33.                (set #english_doc_askdir_help             #documentation_askbool_help)
  34.  
  35.                (set #documentation_copyfiles_help        #documentation_askbool_help)
  36.  
  37.                (set #documentation_askoptions_prompt     "Bitte zu installierende Sprache(n) auswählen")
  38.  
  39.                (set #documentation_askoptions_help       #documentation_askbool_help)
  40.  
  41.                (set #catalogs_askbool_prompt             "Sollen Katalog-Dateien installiert werden ?")
  42.  
  43.                (set #catalogs_askbool_help               "Momentan ist nur eine deutsche Lokalisation verfügbar.")
  44.  
  45.                (set #catalogs_askoptions_prompt          "Bitte zu installierende Sprache(n) auswählen")
  46.  
  47.                (set #catalogs_askoptions_help            #catalogs_askbool_help)
  48.  
  49.                (set #german_catalog_askdir_prompt        "Bitte Zielpfad für den deutschen Katalog wählen...")
  50.  
  51.                (set #german_catalog_askdir_help          "Sollte in LOCALE:Catalogs/Deutsch sein.")
  52.  
  53.                (set #german_catalog_copyfiles_prompt     #catalogs_askbool_help)
  54.  
  55.                (set #translation_msg                     "Wer Interesse am Erzeugen einer Katalog-Datei für eine andere Sprache hat, kann MyNotes.ct als Ausgangsbasis verwenden oder mich kontakten.")
  56.  
  57.             )
  58.  
  59.             ; else use English version
  60.  
  61.             (
  62.  
  63.                (set #osversion_msg                       "Incorrect OS version (software requires OS 39 or better) !")
  64.  
  65.                (set #onerror_msg                         "An error has occurred during installation. Please check the log file to understand the error.")
  66.  
  67.                (set #general_copyfiles_prompt            "Select file(s) to be copied to...")
  68.  
  69.                (set #general_askbool_yes                 "Yes")
  70.  
  71.                (set #general_askbool_no                  "No")
  72.  
  73.                (set #executable_askdir_prompt            "Please choose the destination path for the MyNotes executable. A separate directory will not be created.")
  74.  
  75.                (set #executable_askdir_help              "It's recommended that you choose a destination that is in your path, most reasonably C: .")
  76.  
  77.                (set #documentation_askbool_prompt        "Would you like the AmigaGuide/PowerGuide documentation to be installed ?")
  78.  
  79.                (set #documentation_askbool_help          "Only English and German documentation available for now.")
  80.  
  81.                (set #german_doc_askdir_prompt            "Please choose the destination path for the German documentation...")
  82.  
  83.                (set #german_doc_askdir_help              #documentation_askbool_help)
  84.  
  85.                (set #english_doc_askdir_prompt           "Please choose the destination path for the English documentation...")
  86.  
  87.                (set #english_doc_askdir_help             #documentation_askbool_help)
  88.  
  89.                (set #documentation_copyfiles_help        #documentation_askbool_help)
  90.  
  91.                (set #documentation_askoptions_prompt     "")
  92.  
  93.                (set #documentation_askoptions_help       #documentation_askbool_help)
  94.  
  95.                (set #catalogs_askbool_prompt             "Would you like catalogs to be installed ?")
  96.  
  97.                (set #catalogs_askbool_help               "Only German localisation available for now.")
  98.  
  99.                (set #catalogs_askoptions_prompt          "Select the language(s) you'd like to install")
  100.  
  101.                (set #catalogs_askoptions_help            #catalogs_askbool_help)
  102.  
  103.                (set #german_catalog_askdir_prompt        "Please choose the destination path for the German catalog...")
  104.  
  105.                (set #german_catalog_askdir_help          "Should be in LOCALE:Catalogs/Deutsch.")
  106.  
  107.                (set #german_catalog_copyfiles_prompt     #catalogs_askbool_help)
  108.  
  109.                (set #translation_msg                     "If you are interested in creatung a catalog file for another language you can use MyNotes.ct as a basis or contact me.")
  110.  
  111.             )
  112.  
  113. )
  114.  
  115. ; check if we are running under correct OS
  116.  
  117. (if (< (/ (getversion) 65536) 39)
  118.  
  119.     (
  120.         (abort #osversion_msg)
  121.     )
  122. )
  123.  
  124. ; error handling
  125.  
  126. (onerror
  127.  
  128.     (if (> @ioerr 0)
  129.  
  130.         (
  131.             (message
  132.  
  133.                 (#onerror_msg)
  134.  
  135.                 (set @default-dest "")
  136.  
  137.             )
  138.         )
  139.     )
  140.  
  141.     (exit (quiet))
  142. )
  143.  
  144.  
  145.  
  146.  
  147.  
  148.     ; normal installation
  149.  
  150.     (
  151.         (welcome)
  152.  
  153.         ; --- insert your code below ---
  154.  
  155.         
  156.  
  157.  
  158.         (set @default-dest
  159.  
  160.             (askdir
  161.  
  162.                 (prompt #executable_askdir_prompt)
  163.  
  164.                 (help   #executable_askdir_help)
  165.  
  166.                 (default "C:")
  167.             )
  168.         )
  169.  
  170.         (copyfiles
  171.  
  172.             (prompt #general_copyfiles_prompt @default-dest)
  173.  
  174.             (help   "")
  175.  
  176.             (source "MyNotes")
  177.  
  178.             (infos)
  179.  
  180.             (dest @default-dest)
  181.  
  182.             (confirm)
  183.  
  184.             (optional "fail")
  185.         )
  186.  
  187.         (set #result
  188.  
  189.             (askbool
  190.  
  191.                 (prompt #documentation_askbool_prompt)
  192.  
  193.                 (help   #documentation_askbool_help)
  194.  
  195.                 (choices
  196.  
  197.                     #general_askbool_yes         ;1
  198.  
  199.                     #general_askbool_no          ;0
  200.                 )
  201.  
  202.                 (default 1)
  203.             )
  204.         )
  205.         
  206.         (if (= #result 1)  ;Yes
  207.  
  208.             (
  209.  
  210.              (set #result
  211.  
  212.                   (askoptions
  213.  
  214.                    (prompt #documentation_askoptions_prompt)
  215.  
  216.                    (help   #documentation_askoptions_help)
  217.  
  218.                    (choices
  219.  
  220.                       "Deutsch"
  221.  
  222.                       "English"
  223.  
  224.                    )
  225.  
  226.                    (default 0)
  227.  
  228.                   )
  229.              )
  230.  
  231.  
  232.              (set #firstchoice  (NOT (IN #result 0)))
  233.  
  234.              (set #secondchoice (NOT (IN #result 1)))
  235.  
  236.  
  237.              (if #firstchoice then
  238.  
  239.               (
  240.  
  241.                 (set @default-dest
  242.  
  243.                    (askdir
  244.  
  245.                      (prompt #german_doc_askdir_prompt)
  246.  
  247.                      (help   #german_doc_askdir_help)
  248.  
  249.                      (default "HELP:Deutsch")
  250.  
  251.                    )
  252.  
  253.                 )
  254.  
  255.                 (copyfiles
  256.  
  257.                    (prompt #general_copyfiles_prompt @default-dest)
  258.  
  259.                    (help   #documentation_copyfiles_help)
  260.  
  261.                    (source "Help/Deutsch")
  262.  
  263.                    (all)
  264.  
  265.                    (dest @default-dest)
  266.  
  267.                    (confirm)
  268.  
  269.                    (optional "fail")
  270.  
  271.                 )
  272.               )
  273.  
  274.              )
  275.  
  276.  
  277.  
  278.  
  279.  
  280.              (if #secondchoice then
  281.  
  282.               (
  283.  
  284.                 (set @default-dest
  285.  
  286.                    (askdir
  287.  
  288.                      (prompt #english_doc_askdir_prompt)
  289.  
  290.                      (help   #english_doc_askdir_help)
  291.  
  292.                      (default "HELP:English")
  293.  
  294.                    )
  295.  
  296.                 )
  297.  
  298.                 (copyfiles
  299.  
  300.                    (prompt #general_copyfiles_prompt @default-dest)
  301.  
  302.                    (help   #documentation_copyfiles_help)
  303.  
  304.                    (source "Help/English")
  305.  
  306.                    (all)
  307.  
  308.                    (dest @default-dest)
  309.  
  310.                    (confirm)
  311.  
  312.                    (optional "fail")
  313.  
  314.                 )
  315.               )
  316.  
  317.              )
  318.  
  319.           )
  320.  
  321.         )
  322.  
  323.         (set #result
  324.  
  325.             (askbool
  326.  
  327.                 (prompt #catalogs_askbool_prompt)
  328.  
  329.                 (help   #catalogs_askbool_help)
  330.  
  331.                 (choices
  332.  
  333.                     #general_askbool_yes ;1
  334.                     #general_askbool_no  ;0
  335.                 )
  336.  
  337.                 (default 1)
  338.             )
  339.         )
  340.  
  341.         (if (= #result 1) ;Yes
  342.  
  343.             (
  344.              (set #result
  345.  
  346.                  (askoptions
  347.  
  348.                      (prompt #catalogs_askoptions_prompt)
  349.  
  350.                      (help   #catalogs_askoptions_help)
  351.  
  352.                      (choices
  353.  
  354.                          "Deutsch"
  355.  
  356.                          ;"Zwei"
  357.  
  358.                          ;"Drei"
  359.  
  360.                      )
  361.  
  362.                      (default 0)
  363.                  )
  364.              )
  365.  
  366.              (set #firstchoice  (NOT (IN #result 0)))
  367.              ;(set #secondchoice (NOT (IN #result 1)))
  368.              ;(set #thirdchoice  (NOT (IN #result 2)))
  369.  
  370.              ;(if #firstchoice  then (message "Nr.1 selektiert !"))
  371.              ;(if #secondchoice then (message "Nr.2 selektiert !"))
  372.              ;(if #thirdchoice  then (message "Nr.3 selektiert !"))
  373.  
  374.              (if #firstchoice then  ; word ´then must be provided ! else error
  375.  
  376.                  (
  377.  
  378.                     (set @default-dest
  379.  
  380.                        (askdir
  381.  
  382.                           (prompt #german_catalog_askdir_prompt)
  383.  
  384.                           (help   #german_catalog_askdir_help)
  385.  
  386.                           (default "LOCALE:Catalogs/Deutsch")
  387.  
  388.                        )
  389.  
  390.                     )
  391.  
  392.                     (copyfiles
  393.  
  394.                        (prompt #general_copyfiles_prompt @default-dest)
  395.  
  396.                        (help   #german_catalog_copyfiles_help)
  397.  
  398.                        (source "Catalogs/Deutsch/MyNotes.catalog")
  399.  
  400.                        (dest @default-dest)
  401.  
  402.                        (confirm)
  403.  
  404.                        (optional "fail")
  405.  
  406.                     )
  407.  
  408.                  )
  409.  
  410.              )
  411.  
  412.  
  413.             )
  414.  
  415.         )
  416.  
  417.  
  418.         (set @default-dest "")
  419.  
  420.         (message #translation_msg)
  421.  
  422.         ; --- end of your code ---
  423.  
  424.         (exit)
  425.  
  426. )
  427.  
  428.