home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 109 / EnigmaAmiga109CD.iso / software / utilities / deficons44 / install < prev    next >
Encoding:
Text File  |  2000-01-01  |  2.2 KB  |  110 lines
  1. ; $VER: Installer script for DefIcons44 1.1 (01.01.00) © 1999/2000 by Stephan Rupprecht
  2.  
  3. ;--- localize strings ----
  4. (if (= @language "deutsch")
  5. (
  6.     (set #wrongver "DefIcons44 benötigt OS3.5 oder besser !!!")
  7.     (set #askdir_mainprg "Wohin soll das Hauptprogramm (DefIcons44) kopiert werden?")
  8.     (set #askdir_prefs "Bitte wählen Sie das Zielverzeichnis für das Voreinstellungsprogramm")
  9.     (set #copy_config "Soll die mitgelieferte deficons.prefs Datei installiert werden?")
  10. )
  11. (
  12.     
  13.     (set #wrongver "DefIcons44 requires OS3.5 or better !!!")
  14.     (set #askdir_mainprg "Please select the destination drawer for DefIcons44")
  15.     (set #askdir_prefs "Please select the drawer for the preferences editor")
  16.     (set #copy_config "Do you wish to install the supplied deficons.prefs file?")
  17. )
  18. )
  19.  
  20. ;--- check os version ---
  21. (set #vernum (getversion "workbench.library" (resident)))
  22. (set #vernum (/ #vernum 65536))
  23.  
  24. (if(< #vernum 44)
  25.     (abort #wrongver)
  26. )
  27.  
  28. ;--- askdir for main program ---
  29. (set @default-dest
  30.     (askdir
  31.         (prompt #askdir_mainprg)
  32.         (help @askdir-help)
  33.         (default "SYS:WBStartup")
  34.     )
  35. )
  36.  
  37. ;--- askdir for prefs program ---
  38. (set #prefs-dir
  39.     (askdir
  40.         (prompt #askdir_prefs)
  41.         (help @askdir-help)
  42.         (default "SYS:Prefs")
  43.     )
  44. )
  45.  
  46. ;--- copy mainprg ---
  47. (copyfiles
  48.     (help @copyfiles-help)
  49.     (source "DefIcons44")
  50.     (dest @default-dest)
  51. )
  52.  
  53.  
  54. ;--- copy .info file if neccessary ---
  55. (set #info_path (tackon @default-dest "DefIcons44.info") )
  56.  
  57. (if (not (exists #info_path) )
  58.     (copyfiles
  59.         (help @copyfiles-help)
  60.         (source "DefIcons44.info")
  61.         (dest @default-dest)
  62.     )
  63. )
  64.  
  65. ;--- copy prefsed ---
  66. (copyfiles
  67.     (help @copyfiles-help)
  68.     (source "DefIconsPrefs")
  69.     (dest #prefs-dir)
  70. )
  71.  
  72. ;--- copy .info file if neccessary ---
  73. (set #info_path (tackon #prefs-dir "DefIconsPrefs.info") )
  74.  
  75. (if (not (exists #info_path) )
  76.     (copyfiles
  77.         (help @copyfiles-help)
  78.         (source "DefIconsPrefs.info")
  79.         (dest #prefs-dir)
  80.     )
  81. )
  82.  
  83. ;--- copy deficons.prefs ? ---
  84. (set res (askbool
  85.         (prompt #copy_config)
  86.         (help @askbool-help)
  87.         (default 1)
  88.     )
  89. )
  90.  
  91. (if (= res 1)
  92.     (copyfiles
  93.         (help @copyfiles-help)        
  94.         (source "deficons.prefs")
  95.         (dest "envarc:")
  96.     )
  97. )
  98.  
  99. ;--- copy processfile.rexx
  100.  
  101. (if (not (exists "REXX:ProcessFile.REXX") )
  102.     (copyfiles
  103.         (help @copyfiles-help)
  104.         (source "ProcessFile.REXX")
  105.         (dest "REXX:")
  106.     )
  107. )
  108.  
  109. ;--- eof ---
  110.