home *** CD-ROM | disk | FTP | other *** search
/ ANews 2 / AnewsCD2.iso / Indispensables / Compression / xad / Install < prev    next >
Text File  |  1999-10-04  |  2KB  |  114 lines
  1. ; little dirty install script for xadmaster system
  2.  
  3. ; $VER: Install 1.0 (20.07.1999) by SDI
  4.  
  5. (copylib
  6.   (help @copylib-help)
  7.   (prompt "Copying xadmaster.library")
  8.   (source "Libs/xadmaster.library")
  9.   (dest "LIBS:")
  10.   (confirm expert)
  11. )
  12.  
  13. (copyfiles
  14.   (help @copyfiles-help)
  15.   (prompt "Copying xadmaster.library clients")
  16.   (source "Libs/xad")
  17.   (dest "LIBS:xad")
  18.   (all)
  19.   (confirm expert)
  20. )
  21.  
  22. (copyfiles
  23.   (help @copyfiles-help)
  24.   (prompt "Copying shell tools")
  25.   (source "C")
  26.   (dest "C:")
  27.   (all)
  28.   (confirm expert)
  29. )
  30.  
  31. (set #dir
  32.   (askdir
  33.     (prompt "Where should the docs be installed?")
  34.     (help @askdir-help)
  35.     (default @default-dest)
  36.   )
  37. )
  38.  
  39. (set #catalog
  40.   (askchoice
  41.     (prompt "Select the language")
  42.     (help @askoptions-help)
  43.     (choices "deutsch" "english" "français" )
  44.     (default 1)
  45.   )
  46. )
  47.  
  48. (if (= #catalog 0) (
  49.   (copyfiles
  50.     (help @copyfiles-help)
  51.     (prompt "Copying xadmaster guide file")
  52.     (source "Languages/deutsch/xadmaster.guide")
  53.     (dest #dir)
  54.     (infos)
  55.     (all)
  56.     (confirm expert)
  57.   )
  58.  
  59.   (copyfiles
  60.     (help @copyfiles-help)
  61.     (prompt "Copying shell tool docs")
  62.     (source "Languages/deutsch/Docs")
  63.     (dest #dir)
  64.     (infos)
  65.     (all)
  66.     (confirm expert)
  67.   )
  68. ))
  69.  
  70. (if (= #catalog 1) (
  71.   (copyfiles
  72.     (help @copyfiles-help)
  73.     (prompt "Copying xadmaster guide file")
  74.     (source "xadmaster.guide")
  75.     (dest #dir)
  76.     (infos)
  77.     (all)
  78.     (confirm expert)
  79.   )
  80.  
  81.   (copyfiles
  82.     (help @copyfiles-help)
  83.     (prompt "Copying shell tool docs")
  84.     (source "Docs")
  85.     (dest #dir)
  86.     (infos)
  87.     (all)
  88.     (confirm expert)
  89.   )
  90. ))
  91.  
  92. (if (= #catalog 2) (
  93.   (copyfiles
  94.     (help @copyfiles-help)
  95.     (prompt "Copying xadmaster guide file")
  96.     (source "Languages/français/xadmaster.guide")
  97.     (dest #dir)
  98.     (infos)
  99.     (all)
  100.     (confirm expert)
  101.   )
  102.  
  103.   (copyfiles
  104.     (help @copyfiles-help)
  105.     (prompt "Copying shell tool docs")
  106.     (source "Languages/français/Docs")
  107.     (dest #dir)
  108.     (infos)
  109.     (all)
  110.     (confirm expert)
  111.   )
  112. ))
  113.  
  114.