home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 2 / MECOMP-CD-II.iso / amiga / dfue / www / magicreader / install < prev    next >
Encoding:
Text File  |  1998-02-28  |  1.0 KB  |  65 lines

  1. (set #dirname        "MagicReader")
  2.  
  3. (if (= @language "suomi")
  4.     (
  5.     (set #destdir-prompt "Minne haluat asentaa ohjelman? Uusi hakemisto luodaan nimeltä 'MagicReader'.")
  6.     (set #catchoice-prompt "Mitkä kielet haluat asentaa?")
  7.     )
  8.  
  9. ;    English
  10.  
  11.     (
  12.     (set #destdir-prompt "Where should MagicReader be installed? A drawer named 'MagicReader' will be created there.")
  13.     (set #catchoice-prompt "Which languages do you want to install?")
  14.     )
  15. )
  16.  
  17. (set @default-dest
  18.     (askdir
  19.         (prompt    #destdir-prompt)
  20.         (help @makedir-help)
  21.         (disk)
  22.         (default "")
  23.         (newpath)
  24.     )
  25. )
  26.  
  27. (set @default-dest
  28.     (tackon @default-dest #dirname)
  29. )
  30. (set #catalogs
  31.     (tackon @default-dest "Catalogs")
  32. )
  33.  
  34. (makedir @default-dest
  35.     (infos)
  36. )
  37.  
  38. (copyfiles
  39.     (source "")
  40.     (dest    @default-dest)
  41.     (pattern "Magic#?")
  42. )
  43.  
  44. (copyfiles
  45.     (source "")
  46.     (dest    @default-dest)
  47.     (pattern "Images")
  48. )
  49.  
  50. (makedir #catalogs)
  51.  
  52. (copyfiles
  53.     (source "Catalogs")
  54.     (dest    #catalogs)
  55.     (pattern "magicreader.cd")
  56. )
  57.  
  58. (copyfiles
  59.     (prompt #catchoice-prompt)
  60.     (help    @askchoice-help)
  61.     (source "Catalogs")
  62.     (dest    #catalogs)
  63.     (choices "Suomi")
  64.     (confirm)
  65. )