home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #3 / amigamamagazinepolishissue1998.iso / bazy / calepin / install < prev    next >
Text File  |  1996-11-13  |  4KB  |  176 lines
  1. ; install Calepin v1.3
  2.  
  3. (SET @default-dest "Work:")
  4. (SET default_lang 0)
  5.  
  6. ; ***** english texts *****
  7.  
  8. (SET #needKick (CAT "\nCalepin need Kickstart Version 39 at least." ) )
  9.  
  10. (SET #startMsg (CAT "\nCalepin 1.3\n\n"
  11.                     "(c)1995/1996 Mathias 'HCL' Delantes\n\n"
  12.                      "Calepin uses MUI, version 3.1 a least.\n\n"
  13.                      "If you were using a previous version of\n"
  14.                      "Calepin then Read the documentation\n"
  15.                      "in order to update your data or you will lost them"))
  16.  
  17. (SET #destPrompt ( CAT "Please choose the destination directory for Calepin.\n"
  18.                        "No extra directory will be created." ) )
  19.  
  20. (SET #copyPFiles "Copying program files")
  21.  
  22. (SET #langPrompt "Select the languages you wish to use with Calepin.")
  23.  
  24. (SET #DocPrompt "Select the directory for the documentation file.")
  25.  
  26. (SET #copyCalepin "Copying Calepin...")
  27.  
  28. (SET #langPromptGuide "Select the language you wish for the documentation.")
  29.  
  30. ; ***** francais texts *****
  31.  
  32. (IF (= @language "français")
  33. (
  34. (SET default_lang 1)
  35.  
  36. (SET #needKick ( CAT "\nCalepin a besoin du Kickstart version 39 au moins." ) )
  37.  
  38. (SET #startMsg (CAT "\nCalepin 1.3\n\n"
  39.                     "(c)1995/1996 Mathias 'HCL' Delantes\n\n"
  40.                     "Calepin utilise MUI, version 3.1 au moins.\n\n"
  41.                     "Si vous utilisez une version anterieur\n"
  42.                     "de Calepin alors Lisez la documentation\n"
  43.                     "afin de mettre a jour vos fichiers ou vous\n"
  44.                     "risquez de les perdre!\n\n"))
  45.  
  46. (SET #destPrompt (CAT "Choissisez un repertoire pour Calepin.\n"
  47.                       "Aucun repertoire ne sera creer pour lui.") )
  48.  
  49. (SET #copyPFiles "Copie des fichiers du programme")
  50.  
  51. (SET #langPrompt "Selectionnez le langage que vous desirez.")
  52.  
  53. (SET #DocPrompt "Selectionnez un repertoire pour la documentation.")
  54.  
  55. (SET #copyCalepin "Copie de Calepin...")
  56.  
  57. (Set #langPromptGuide "Selectionnez la langue pour la la documentation.")
  58.  
  59. )
  60. )
  61.  
  62. ; ***** start installation *****
  63.  
  64. (if (< (/ (GETVERSION) 65536) 39)
  65.     (ABORT #needKick)
  66. )
  67.  
  68. (MESSAGE #startMsg)
  69.  
  70. ; ***** get dest dir for Calepin *****
  71.  
  72. (SET @default-dest
  73.     (ASKDIR (PROMPT  #destPrompt)
  74.             (HELP    askdir-help)
  75.             (DEFAULT @default-dest)
  76.             (NEWPATH)
  77.     )
  78. )
  79.  
  80.     (set prozess (database "cpu"))
  81.         (if (< "68010" prozess)
  82.             (set Calepin-source "Calepin020")
  83.             (set Calepin-source "Calepin")
  84.         )
  85.     (set prozess (database "cpu"))
  86.         (if (< "68010" prozess)
  87.             (set Calepininfo-source "Calepin020.info")
  88.             (set Calepininfo-source "Calepin.info")
  89.         )
  90.         (copyfiles
  91.             (prompt #copy-Calepin)
  92.             (source Calepin-source)
  93.             (newname "Calepin")
  94.             (dest @default-dest)
  95.             (files)
  96.         )
  97.         (copyfiles
  98.             (prompt #copy-Calepin)
  99.             (source Calepininfo-source)
  100.             (newname "Calepin.info")
  101.             (dest @default-dest)
  102.             (files)
  103.         )
  104.  
  105. ; ***** install some languages *****
  106.  
  107. (SET sprachen (ASKOPTIONS (PROMPT #langPrompt)
  108.                           (HELP   askoptions-help)
  109.                           (CHOICES "english"
  110.                                    "français"
  111.                                    "deutsch"
  112.                           )
  113.                           (DEFAULT (+ default_lang 1) )
  114.               )
  115. )
  116.  
  117. (if (IN sprachen 1)
  118.     (COPYFILES (SOURCE "Locale/français/Calepin.catalog")
  119.                (DEST "Locale:Catalogs/français") )
  120. )
  121.  
  122. (if (IN sprachen 2)
  123.     (COPYFILES (SOURCE "Locale/deutsch/Calepin.catalog")
  124.                (DEST "Locale:Catalogs/deutsch") )
  125. )
  126.  
  127.  
  128. ; ***** get dest for doc files *****
  129.  
  130. (SET @DocDir
  131.     (ASKDIR (PROMPT  #DocPrompt)
  132.             (HELP    askdir-help)
  133.             (DEFAULT @default-dest)
  134.             (NEWPATH)
  135.     )
  136. )
  137.  
  138. ; ***** install doc files *****
  139.  
  140. (SET sprachen (ASKOPTIONS (PROMPT #langPromptGuide)
  141.                           (HELP   askoptions-help)
  142.                           (CHOICES "english"
  143.                                    "français"
  144.                           )
  145.                           (DEFAULT (+ default_lang 1) )
  146.               )
  147. )
  148.  
  149. (if (IN sprachen 0)
  150.     (COPYFILES (SOURCE "Docs/english/Calepin.guide")
  151.                (DEST @DocDir ))
  152. )
  153.  
  154. (if (IN sprachen 1)
  155.     (COPYFILES (SOURCE "Docs/français/Calepin.guide")
  156.                (DEST @DocDir ))
  157. )
  158.  
  159.  
  160.  
  161.  
  162. (if (IN sprachen 0)
  163.     (COPYFILES (SOURCE "Docs/english/Calepin.guide.info")
  164.                (DEST @DocDir ))
  165. )
  166.  
  167. (if (IN sprachen 1)
  168.     (COPYFILES (SOURCE "Docs/français/Calepin.guide.info")
  169.                (DEST @DocDir ))
  170. )
  171.  
  172.  
  173. (EXIT #exitMsg )
  174.  
  175.  
  176.