home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 100 / af100sub.adf / Toolchanger.LZX / DefaultTool-Changer / Install < prev    next >
Text File  |  1997-06-02  |  2KB  |  79 lines

  1. ; DefaultTool-Changer (V1.0) Installerscript (c) by PackMAN 25.05.97
  2.  
  3.  
  4. ;=============================================================================
  5. ; OS2 ?
  6.  
  7. (if (< (/ (getversion) 65536) 37)
  8. (
  9.     (abort #notV37)
  10. ))
  11.  
  12. ;=============================================================================
  13.  
  14. (set #notV37
  15. (cat "DefaultTool-Changer needs OS2.x (V37.175) or higher..."))
  16.  
  17. (set #msg
  18. (cat "\n\n"
  19.  "This script installs > DefaultTool-Changer V1.0 <  to your Amiga.\n\n\n"
  20.  "DefaultTool-Changer © 1997 by Falk Zühlsdorff\n\n"
  21.  "All rights reserved."))
  22.  
  23. (set #0
  24. (cat "Select Drawer,please.\n(The drawer DeaultTool-Changer will automatically generated)\n"))
  25.  
  26. (set #1
  27. (cat "Install Reqtools.library ?"))
  28.  
  29. (if (exists "ENV:Language")
  30.    (if (patmatch (getenv "language") "Deutsch")
  31.       ( ;THEN
  32.        (set #notV37
  33.        (cat "DefaultTool-Changer benötigt OS2.x (V37.175) oder höher..."))
  34.  
  35.        (set #msg
  36.        (cat "\n\n"
  37.         "Dieses Script installiert > DefaultTool-Changer V1.0 < auf Ihrem Amiga.\n\n\n"
  38.         "DefaultTool-Changer © 1997 by Falk Zühlsdorff\n\n"
  39.         "All rights reserved."))
  40.  
  41.        (set #0
  42.        (cat "Bitte Ziellaufwerk oder Zielverzeichnis auswählen \n(Verzeichnis: DefaultTool-Changer wird automatisch erstellt)\n"))
  43.  
  44.        (set #1
  45.        (cat "Reqtools.library installieren ?"))
  46.       )
  47.    )
  48. )
  49.  
  50. (message #msg)
  51. (welcome)
  52.  
  53. (set name
  54.     (askdir
  55.         (prompt "\n" #0)
  56.         (help @askdir-help)
  57.         (default "SYS:")
  58.     )
  59. )
  60. (copyfiles
  61.     (prompt "DefaultTool-Changer V1.0")
  62.     (source "")
  63.     (help "...")
  64.     (dest (tackon name "DefaultTool-Changer"))
  65.     (pattern "#?")
  66.     (infos)
  67.     (confirm)
  68. )
  69.  
  70. (copylib
  71.     (prompt "\n" #1)
  72.     (help @copyfiles-help)
  73.     (source "Libs/reqtools.library")
  74.     (dest "Libs:")
  75.     (safe)
  76.     (confirm)
  77. )
  78.  
  79.