home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 28 / amigaformatcd28.iso / -seriously_amiga- / comms / other / yam2p / install / install_yam < prev   
Text File  |  1998-05-05  |  8KB  |  200 lines
  1. ;
  2. ; $VER: Installer script 1.1 for YAM 2.0 German Preview (15.2.98) © Marcel Beck
  3. ;
  4.  
  5. (set #def_lang_English       0)
  6. (set #def_lang_Deutsch       1)
  7. (set #def_doc_English   0)
  8. (set #def_doc_Deutsch   1)
  9.  
  10. ;----------------------------------------------------------------------------
  11.  
  12. ; ***** English
  13. (set #def_cat_lang #def_lang_English)
  14. (set #def_doc_lang #def_doc_English)
  15. (set #wrongOS  "YAM needs at least OS3.0 to run\n")
  16. (set #wrongMUI "YAM needs at least MUI3.8 to run\n")
  17. (set #wrongCPU "YAM needs at least a 68020 CPU to run\n")
  18. (set #YAM_dir  (cat "Choose YAM home directory\n"
  19.                     "(NO extra drawer will be created!)"))
  20. (set #lang_catalog (cat "Which catalog file do you want to install?\n"
  21.                         "(English language is built-in)"))
  22. (set #lang_manual "Select language for on-line AmigaGuide help")
  23. (set #arexx_prompt "Where do you want to install ARexx scripts?")
  24. (set #assign_prompt (cat "YAM: assign should be added to your S:USER-STARTUP\n"
  25.                          "Do you mind?"))
  26. (set #assign_help (cat "When the Installer program asks if you want to place this "
  27.                        "assignment into your S:user-startup file, you should select "
  28.                        "the \"Proceed\" button; otherwise, the next time you boot up your "
  29.                        "machine, the program won't be able to find the necessary files "
  30.                        "and drawers it needs to run.\n"))
  31. (set #done_1   (cat "\nYAM has been succesfuly installed.\n\n"
  32.                     "Click the \"YAM\" icon in the\n"))
  33. (set #done_2        "\ndirectory to taste it.\n\nHave fun...")
  34.  
  35. ; ***** Deutsch
  36. (IF (= @language "deutsch")
  37. (
  38. (set #def_cat_lang #def_lang_Deutsch)
  39. (set #def_doc_lang #def_doc_Deutsch)
  40. (set #wrongOS  "YAM benötigt OS2.04 oder höher\n")
  41. (set #wrongMUI "YAM benötigt MUI3.8 oder höher\n")
  42. (set #wrongCPU "YAM läuft nur ab einer 68020 CPU\n")
  43. (set #YAM_dir  (cat"Wählen Sie ein Verzeichnis für YAM\n"
  44.                    "(es wird KEIN eigenes Verzeichnis erstellt!)"))
  45. (set #lang_catalog (cat "Welche catalog-Datei wollen Sie installieren?\n"
  46.                         "(Englisch ist eingebaut)"))
  47. (set #lang_manual "Wählen Sie eine Sprache für die Online-AmigaGuide-Hilfe")
  48. (set #arexx_prompt "Wohin wollen Sie die ARexx-Beispiele kopieren?")
  49. (set #assign_prompt (cat "In S:USER-STARTUP sollte ein Assign YAM: eingefügt werden.\n"
  50.                          "Sind Sie damit einverstanden?"))
  51. (set #assign_help (cat "Wenn Sie vom Installer gefragt werden, ob er diese Zuweisung "
  52.                        "in der Datei s:user-startup vornehmen darf, sollten Sie den "
  53.                        "Knopf \"Weiter\" drücken; andernfalls kann das Programm nach "
  54.                        "dem nächsten Booten die benötigten Dateien und Verzeichnisse "
  55.                        "nicht finden.\n"))
  56. (set #done_1   (cat "\nYAM wurde erfolgreich installiert.\n\n"
  57.                     "Klicken Sie auf das \"YAM\"-Icon im Verzeichnis\n"))
  58. (set #done_2        "\nund es kann losgehen.\n\nViel Spass!")
  59. )
  60. )
  61. ;----------------------------------------------------------------------------
  62.  
  63. ;**** Checking environment
  64. (set OS_ver (getversion "exec.library" (resident)))
  65. (if (< OS_ver (* 39 65536)) (abort #wrongOS))
  66.  
  67. (set MUI_ver (getversion "MUI:libs/muimaster.library"))
  68. (if (AND (< MUI_ver (* 19 65536)) (<> MUI_ver 0)) (abort #wrongMUI))
  69.  
  70. (set cpu_type (database "cpu"))
  71. (if (< cpu_type "68020") (abort #wrongCPU))
  72.  
  73. ;----------------------------------------------------------------------------
  74.  
  75. (complete 0)
  76.  
  77. (if (<> 0 (exists "YAM:" (noreq)))
  78.         (set YAM_def_dir (getassign "YAM"))
  79.         (set YAM_def_dir @default-dest)
  80. )
  81.  
  82. (set YAM_dir
  83.         (askdir
  84.                 (default YAM_def_dir)
  85.                 (prompt  #YAM_dir)
  86.                 (help    @askdir-help)
  87.         )
  88. )
  89.  
  90. (complete 10)
  91.  
  92. (set Catalog_lang
  93.         (askoptions
  94.                 (prompt  #lang_catalog)
  95.                 (help @askoptions-help)
  96.                 (choices "Deutsch"
  97.                 )
  98.                 (default #def_cat_lang)
  99.         )
  100. )
  101.  
  102. (complete 20)
  103.  
  104. (set Docs_lang
  105.         (askchoice
  106.                 (prompt  #lang_manual)
  107.                 (help    @askoptions-help)
  108.                 (choices "English" "Deutsch"
  109.                 )
  110.                 (default #def_doc_lang)
  111.         )
  112. )
  113.  
  114. (complete 30)
  115.  
  116. (set ARexx_dir
  117.                         (askdir
  118.                                         (default "REXX:")
  119.                                         (prompt  #arexx_prompt)
  120.                                         (help    @askdir-help)
  121.                         )
  122. )
  123.  
  124. ;-------------------------- here we go... -----------------------------------
  125.  
  126. (complete 40)
  127.  
  128. (makedir YAM_dir (infos))
  129.  
  130. (copyfiles (source "/YAM") (dest YAM_dir) (infos) (help @copyfiles-help))
  131.  
  132. (complete 50)
  133.  
  134. (copyfiles (source "/.taglines") (dest YAM_dir) (help @copyfiles-help))
  135.  
  136. (complete 60)
  137.  
  138. (if (> Catalog_lang 0)
  139.       (
  140.          (set Cat_dir (tackon YAM_dir "Catalogs"))
  141.          (if (not (exists Cat_dir))  (makedir Cat_dir))
  142.          (if (bitand Catalog_lang #def_lang_Deutsch   ) ((set lang "deutsch") (copyfiles (source (tackon "/Catalogs" lang)) (choices "YAM.catalog") (dest (tackon Cat_dir lang)))))
  143.          )
  144. )
  145.  
  146. (if (= Docs_lang #def_doc_english ) (copyfiles (source "/YAM_english.guide")  (dest YAM_dir) (newname "YAM.guide") (infos)))
  147. (if (= Docs_lang #def_doc_deutsch ) (copyfiles (source "/YAM_deutsch.guide")  (dest YAM_dir) (newname "YAM.guide") (infos)))
  148.  
  149. (complete 70)
  150.  
  151. (set Icons_dir (tackon YAM_dir "Icons"))
  152. (if (not (exists Icons_dir))
  153.  (
  154.    (makedir Icons_dir)
  155.    (copyfiles (source "/Icons.info") (dest YAM_dir) (help @copyfiles-help))
  156.  )
  157. )
  158. (copyfiles (source "/Icons/") (dest Icons_dir) (all))
  159.  
  160. (set Charset_dir (tackon YAM_dir "Charsets"))
  161. (if (not (exists Charset_dir)) (makedir Charset_dir))
  162. (copyfiles (source "/Charsets/") (dest Charset_dir) (all))
  163.  
  164. (copyfiles (source "/Rexx/") (dest ARexx_dir) (all))
  165.  
  166. (complete 80)
  167.  
  168. (copylib (prompt "MUI - BetterString.mcc") (source "/MUI/BetterString.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  169. (copylib (prompt "MUI - BetterString.mcp") (source "/MUI/BetterString.mcp") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  170. (copylib (prompt "MUI - HotkeyString.mcc") (source "/MUI/HotkeyString.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  171. (copylib (prompt "MUI - InfoText.mcc")     (source "/MUI/InfoText.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  172. (copylib (prompt "MUI - ListTree.mcc")     (source "/MUI/ListTree.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  173. (copylib (prompt "MUI - ListTree.mcp")     (source "/MUI/ListTree.mcp") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  174. (copylib (prompt "MUI - NFloattext.mcc")   (source "/MUI/NFloattext.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  175. (copylib (prompt "MUI - NList.mcc")        (source "/MUI/NList.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  176. (copylib (prompt "MUI - NListview.mcc")    (source "/MUI/NListview.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  177. (copylib (prompt "MUI - NListviews.mcp")   (source "/MUI/NListviews.mcp") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  178. (copylib (prompt "MUI - TextEditor.mcc")   (source "/MUI/TextEditor.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  179. (copylib (prompt "MUI - TextEditor.mcp")   (source "/MUI/TextEditor.mcp") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  180. (copylib (prompt "MUI - Toolbar.mcc")      (source "/MUI/Toolbar.mcc") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  181. (copylib (prompt "MUI - Toolbar.mcp")      (source "/MUI/Toolbar.mcp") (dest "MUI:Libs/MUI/") (confirm) (help @copylib-help))
  182.  
  183. (complete 90)
  184.  
  185. (startup "YAM - Amiga mailer © Marcel Beck"
  186.         (prompt #assign_prompt)
  187.         (help   #assign_help)
  188.         (command "C:Assign YAM: \"" YAM_dir "\"\n")
  189. )
  190.  
  191. (makeassign "YAM" YAM_dir)
  192.  
  193. (complete 100)
  194. (message #done_1 "\"" YAM_dir "\"" #done_2)
  195.  
  196. ;********************
  197.  
  198. (exit (QUIET))
  199.  
  200.