home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 2 / MECOMP-CD-II.iso / amiga / emulation / goldnest012 / goldnest.install < prev    next >
Encoding:
Text File  |  1998-03-28  |  1.7 KB  |  74 lines

  1. ; GOldNEST Install-script 0.12
  2.  
  3.  
  4.     (message "This script will install GOldNEST on your HD\n>-----------------------------<\n(C) 1998 Lennart Johannesson\n95lenjo@ostrabo.uddevalla.se\n")
  5.  
  6.     (complete 0)
  7.  
  8.  
  9. ;MAKES THE "GOldNEST" DIRECTORY
  10.  
  11.     (set dest_dir
  12.       (tackon (askdir
  13.                 (prompt "Where do you want to install GOldNEST?\n"
  14.                         "A drawer called GOldNEST will be created.")
  15.                 (help @askdir-help)
  16.                 (default "ram:")
  17.                 (disk)
  18.               )
  19.               "GOldNEST"
  20.       )
  21.     )
  22.  
  23.     (set @default-dest dest_dir)
  24.     (makedir dest_dir)
  25.  
  26.  
  27.  
  28. ; COPIES THE GOldNEST EXECUTABLE & START SCRIPT TO THE DESTINATION DIRETORY
  29.  
  30.     (copyfiles
  31.       (source "GOldNEST.exe")
  32.       (dest (dest_dir))
  33.     )
  34.  
  35.     (copyfiles
  36.       (source "Start_GOldNEST")
  37.       (dest (dest_dir))
  38.     )
  39.  
  40.     (Complete 50)
  41.  
  42. ; COPIES THE GOldNEST GUIDE FILE TO THE DESTINATION DIRETORY
  43.  
  44.     (copyfiles
  45.       (source "GOldNEST.Guide")
  46.       (dest (dest_dir))
  47.     )
  48.  
  49.  
  50.     (set icontype
  51.        (askchoice
  52.          (prompt "Which icon type would you like?")
  53.          (choices
  54.                "MagicWB"
  55.                "NewIcons (Not Available Yet!)"
  56.                "Normal (Not Available Yet!)"
  57.          )
  58.          (help @askchoice-help)
  59.          (default 0)              
  60.        )
  61.     )
  62.  
  63.  
  64. ; ASKS FOR ICONTYPE AND INSTALLS THE CORRECT ONE (ALMOST)
  65.     (if(>= icontype 0)
  66.       (
  67.         (copyfiles (source "icons/MagicWB/GOldNEST.Guide.info") (dest dest_dir))
  68.         (copyfiles (source "icons/MagicWB/Start_GOldNEST.info") (dest dest_dir))
  69.         (copyfiles (source "icons/MagicWB/GOldNEST.info") (dest (tackon dest_dir "/")))
  70.       )
  71.     )
  72.  
  73.     (complete 100)
  74.     (exit)