home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga Shareware Floppies / ma48.dms / ma48.adf / XPKatana / Install / Français < prev    next >
Encoding:
Text File  |  1995-12-20  |  3.6 KB  |  162 lines
  1. ; XPKatana Installer Script
  2. ; $Ver: 1.0 (28.11.95)
  3. ; Written by Philip A. Vedovatti
  4. ; Traduction française par Eric Sauvageau
  5.  
  6. (set #bad-kick
  7.    (cat "\n\nDésolé !  Vous devez avoir le Workbench 2.0 ou"
  8.         "mieux pour utiliser XPKatana."))
  9.  
  10. (set #hello-message
  11.    (cat "\n\n\"Découpez la taille de vos fichiers en pièces!\""
  12.         "\n\nBienvenue dans le script d'installation de"
  13.         "\n\nXPKatana."
  14.         "\n\nVeuillez lire la documentation pour tirer le"
  15.         "\nmaximum de ce logiciel."
  16.         "\n\n\nCLIQUEZ POUR CONTINUER"))
  17.  
  18. (set #install-which
  19.    (cat "\nQuelle(s) partie(s) de XPKatana désirez-vous"
  20.         "\ninstaller sur le disque ?\n"))
  21.  
  22. (set #tools-dest
  23.    (cat "\nDans quel répertoire désirez-vous installer"
  24.         "\nle programme principal de XPKatana ?\n"))
  25.  
  26. (set #docs-dest
  27.    (cat "\nDans quel répertoire désirez-vous installer"
  28.         "\nla documentation de XPKatana ?\n"))
  29.  
  30. (set #rexx-dest
  31.    (cat "\nDans quel répertoire désirez-vous installer"
  32.         "\nles scripts ARexx pour XPKatana ?\n"))
  33.  
  34. (set #install-arexx-help
  35.    (cat "\nCeci installera quelques scripts ARexx"
  36.         "\npouvant etre utilisés avec XPKatana."))
  37.  
  38. (set #exit-message
  39.    (cat "\nInstallation terminée !"))
  40.  
  41. (set #install-library
  42.    ("\nCopie de la FileID.library dans Libs:"))
  43.  
  44. ; ------------------------------
  45. ; Check Kickstart Version
  46. ; ------------------------------
  47.  
  48.  (if (< (getversion "LIBS:version.library") (* 37 65536))
  49.         (abort #bad-kick)
  50.  )
  51.  
  52. (message #hello-message)
  53.  
  54. ; ------------------------------
  55. ; What should I install?
  56. ; ------------------------------
  57.  
  58. (set InstallOpt
  59.       (askoptions (prompt #install-which)
  60.                   (help @askoptions-help)
  61.                   (choices "XPKatana" "Scripts Arexx" "FileID.library"
  62.                            "Documentation")
  63.       )
  64. )
  65.  
  66. (if (= InstallOpt 0)
  67.       (abort (cat "\n\nInstallation Avortée :(")
  68.                   "\n\nAucun fichier à installer!")
  69. )
  70.  
  71.  
  72. ;-------------------------------------------------------
  73. ;Install binary, Icons, and support files
  74. ;-------------------------------------------------------
  75.  
  76.  
  77. (if (BITAND InstallOpt 1)
  78.  
  79.   ((set destdir
  80.       (askdir
  81.             (prompt #tools-dest)
  82.             (help @askdir-help)
  83.             (default "Sys:Utilities")
  84.       )
  85.    )
  86.  
  87.    (set @default-dest destdir)
  88.    (copyfiles
  89.       (source "/XPKatana")
  90.       (dest destdir)
  91.       (infos)
  92.    )
  93.   )
  94. )
  95.  
  96. ;-------------------------------------------------------
  97. ;Insall Arexx scripts
  98. ;-------------------------------------------------------
  99.  
  100.  
  101.  
  102. (if (BITAND InstallOpt 2)
  103.  
  104.   ((set destdir
  105.       (askdir
  106.             (prompt #rexx-dest)
  107.             (help #install-arexx-help)
  108.             (default "REXX:")
  109.       )
  110.    )
  111.  
  112.    (copyfiles
  113.       (source "/ARexx")
  114.       (dest destdir)
  115.       (all)
  116.    )
  117.   )
  118. )
  119.  
  120. ;-------------------------------------------------------
  121. ;Install FileID.library files
  122. ;-------------------------------------------------------
  123.  
  124. (if (BITAND InstallOpt 4)
  125.  
  126.   ((copylib
  127.       (prompt #install-library)
  128.       (source "/Libs/FileID.library")
  129.       (dest "Libs:")
  130.    )
  131.  
  132.    (if (exists "Locale:catalogs/deutsch")
  133.        (copyfiles
  134.           (source "/Locale/catalogs/deutsch/FileID_lib.catalog")
  135.           (dest "Locale:catalogs/deutsch")
  136.        )
  137.    )
  138.   )
  139. )
  140.  
  141. ;-------------------------------------------------------
  142. ;Install FileID.library files
  143. ;-------------------------------------------------------
  144.  
  145. (if (BITAND InstallOpt 8)
  146.  
  147.   ((set destdir
  148.       (askdir
  149.             (prompt #docs-dest)
  150.             (help @askdir-help)
  151.             (default "Help:")
  152.       )
  153.    )
  154.    (copyfiles
  155.       (source "/Docs/XPKatana_eng.guide")
  156.       (dest destdir)
  157.       (newname "XPKatana.guide")
  158.       (infos)
  159.    )
  160.   )
  161. )
  162. (exit #exit-message)