home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga Shareware Floppies / ma83.dms / ma83.adf / ArtPro.lha / ArtPRO_Install / Install < prev    next >
Encoding:
Text File  |  1997-03-23  |  4.0 KB  |  222 lines
  1. ; ArtPRO installations Script
  2. ; © 1997 Defect Softworks All rights reserved.
  3. ; May only be distributed within the ArtPRO package
  4. ; 
  5. ; Written by Frank Pagels /DFT
  6. ; Date: 12/Feb/97
  7.  
  8. (set falsekickmsg    "You need at least OS 2.04 to run ArtPRO!")    ;!!!
  9.  
  10. (set OS_VER (/ (getversion) 65536) )
  11.  
  12. (if(< OS_VER 37)
  13.   (abort falsekickmsg)
  14. )
  15.  
  16. (set cpu (database "cpu"))    ;check CPU Type
  17.  
  18. (if (or (= cpu 68020) (= cpu 68030)) (set #cpu 0))
  19. (if (= cpu 68040) (set #cpu 1))
  20. (if (> (exists ("libs:68060.library")) 0) (set #cpu 2) )
  21.  
  22. (set #doclang 0)
  23. ;(if (= @language "deutsch") (set #doclang 1))
  24.  
  25. (set progdir1
  26.  (askdir (prompt "In wich drawer should ArtPRO be installed?\n (a drawer will be created)")
  27.    (help @askdir-help)
  28.    (DEFAULT @default-dest)))
  29.  
  30. (    (makedir (tackon progdir1 "ArtPRO")) 
  31.     (copyfiles (source "Icons/ArtPRO.info")
  32.     (dest progdir1))
  33.  
  34.     (set progdir (tackon progdir1 "ArtPRO"))
  35. )
  36. ;--------------------------------------------------------------------------
  37. (
  38.     (copyfiles (source "ArtPRO")
  39.     (dest progdir))
  40.  
  41.     (copyfiles (source "installdata/ArtPRO.info")    ;!!!
  42.     (dest progdir))
  43.  
  44. )
  45.  
  46. ;------ Install Loader -------
  47. (
  48.     (makedir (tackon progdir "ALoaders"))
  49.     (copyfiles (source "Aloaders")
  50.     (dest (tackon progdir "ALoaders"))
  51.     (all))
  52. )
  53.  
  54. ;------ Install Saver --------
  55. (
  56.     (makedir (tackon progdir "ASavers"))
  57.     (copyfiles (source "ASavers")
  58.            (dest (tackon progdir "ASavers"))
  59.            (all)
  60.     )
  61.  
  62. )
  63.  
  64. ;----- Copy needed Librarys 
  65.  
  66.     (copylib
  67.     (prompt "Copy ReqTools.library")
  68.     (help @copylib-help)
  69.     (source "libs/reqtools.library")
  70.     (dest "Libs:")
  71.     (confirm)
  72.     )
  73.  
  74.     
  75.     (Set #WhatLib
  76.     (cat  "Which version of the render.library do you want to install now ?"))
  77.  
  78.     (set InstallLib
  79.         (askchoice
  80.             (prompt #WhatLib)
  81.             (help @askoptions-help)
  82.             (choices
  83.                 "020"        ;Bit 0
  84.                 "040"        ;Bit 1
  85.                 "060")        ;Bit 2
  86.             (default #cpu)
  87.         )
  88.     )
  89.    
  90. (
  91.     (if (= InstallLib 0)
  92.  
  93.        (copylib 
  94.            (prompt "Copy Render.library")
  95.         (help @copylib-help)
  96.              (source "RenderLib/libs/render.library_68020")
  97.         (dest "Libs:")
  98.         (newname "render.library")
  99.         (confirm)
  100.        )
  101.     )
  102.  
  103.  
  104.  
  105.     (if (= InstallLib 1)
  106.  
  107.        (copylib 
  108.            (prompt "Copy Render.library")
  109.         (help @copylib-help)
  110.              (source "RenderLib/libs/render.library_68040")
  111.         (dest "Libs:")
  112.         (newname "render.library")
  113.         (confirm)
  114.        )
  115.     )
  116.          
  117.  
  118.  
  119.     (if (= InstallLib 2)
  120.  
  121.        (copylib 
  122.            (prompt "Copy Render.library")
  123.         (help @copylib-help)
  124.              (source "RenderLib/libs/render.library_68060")
  125.         (dest "Libs:")
  126.         (newname "render.library")
  127.         (confirm)
  128.        )
  129.     )
  130.     
  131. )
  132.  
  133. ;----- copy Dokumentation ------
  134.  
  135. (
  136.     (Set #Whatdoc
  137.     (cat  "What ArtPRO documentation would you like to install?\n"))
  138.  
  139.     (set Installdoc
  140.         (askchoice
  141.             (prompt #Whatdoc)
  142.             (help @askoptions-help)
  143.             (choices
  144.                 "English")        ;Bit 0
  145.             ;    "German")        ;Bit 1
  146.             (default #doclang)
  147.         )
  148.     )
  149.    
  150.     (set docdir
  151.         (askdir (prompt "Select a drawer for the Guide:")
  152.         (help @askdir-help)
  153.         (DEFAULT progdir)))
  154.  
  155.  
  156.     (if (= Installdoc 0)
  157.         (
  158.             (copyfiles (source "docs/english/ArtPRO.guide")        ;!!!
  159.                    (dest docdir))
  160.  
  161.             (copyfiles (source "installdata/ArtPRO.guide.info")    ;!!!
  162.                    (dest docdir))
  163.         )
  164.     )
  165.  
  166. ;    (if (= Installdoc 1)
  167. ;
  168. ;       (copyfiles (source "docs/deutsch/ArtPRO.guide")
  169. ;        (dest docdir))
  170. ;
  171. ;       (copyfiles (source "docs/deutsch/ArtPRO.guide.info")
  172. ;        (dest docdir))
  173. ;
  174. ;    )
  175.  
  176.  
  177. )
  178.  
  179. ;---- Kopiere Icons ----
  180.  
  181. (
  182.     (makedir (tackon progdir "Icons"))
  183.     (copyfiles (source "Icons")
  184.         (dest (tackon progdir "Icons"))
  185.         (all))
  186.     (copyfiles (source "installdata/Icons.info")    ;!!!
  187.         (dest progdir))
  188.  
  189. )
  190.  
  191.  
  192. (
  193.   (set appdir
  194.   (askdir (prompt "In wich drawer should the external AppIcon be installed?")
  195.    (help @askdir-help)
  196.    (DEFAULT progdir)))
  197.  
  198.      (copyfiles (source "Installdata/AppIcon.info")
  199.         (dest appdir)
  200.     )
  201.         (Tooltype (dest (tackon progdir "ArtPRO"))
  202.         (Settooltype "APPICON" (tackon appdir "AppIcon"))
  203.     )
  204. )
  205.  
  206. (set @default-dest progdir)
  207.  
  208.  
  209. (copyfiles (source "Orderform.doc")
  210.     (dest progdir)
  211. )
  212.  
  213. (copyfiles (source "Orderform.dok")
  214.     (dest progdir)
  215. )
  216.  
  217. (makedir "ENV:ArtPRO")
  218. (makedir "ENVARC:ArtPRO")
  219.  
  220. (exit "Note: ArtPRO is Shareware!\n\n"
  221.       "Enjoy this!") 
  222.