home *** CD-ROM | disk | FTP | other *** search
/ Dream 52 / Amiga_Dream_52.iso / Amiga / Emulateurs / GOldNEST.lha / GOldNEST019 / GOldNEST.Install < prev    next >
Text File  |  1998-05-08  |  3KB  |  97 lines
  1. ; .-------------------------------------------------.
  2. ; |    Install script for GOldNEST, $VER: 0.19      |
  3. ; `-------------------------------------------------'
  4.  
  5.     (message "\n\nThis script will install GOldNEST to the selected device/drawer\n\n>-----------------------------<\n\n(C) 1998 Lennart Johannesson\n95lenjo@ostrabo.uddevalla.se\n")
  6.  
  7.     (complete 10)
  8.  
  9. ;***************************************************************************
  10. ;* MAKES THE "GOldNEST" DIRECTORY
  11. ;***************************************************************************
  12.  
  13.     (set dest_dir
  14.       (tackon (askdir
  15.                 (prompt "Where would you like to install GOldNEST?\n"
  16.                         "A drawer called GOldNEST will be created.")
  17.                 (help @askdir-help)
  18.                 (default "ram:")
  19.                 (disk)
  20.               )
  21.               "GOldNEST"
  22.       )
  23.     )
  24.  
  25.     (set @default-dest dest_dir)
  26.     (makedir dest_dir)
  27.  
  28.     (Complete 20)
  29.  
  30. ;***************************************************************************
  31. ;* ASKS FOR ICONTYPE TO INSTALL
  32. ;***************************************************************************
  33.  
  34.     (set icont
  35.        (askchoice
  36.          (prompt "Which icon type would you like?")
  37.          (choices
  38.                "MagicWB  (8col / HiresLace)"
  39.                "SmalMWB  (8col / Hires)"
  40.                "Normal   (4col / HiresLace)"
  41.                "Smal     (4col / Hires)"
  42.                "NewIcons (Not Available Yet!)"
  43.          )
  44.          (help @askchoice-help)
  45.          (default 0)              
  46.        )
  47.     )
  48.  
  49.     (Complete 30)
  50.  
  51. ;***************************************************************************
  52. ;* COPIES THE GOldNEST EXECUTABLE & START SCRIPT TO THE DESTINATION DIRETORY
  53. ;***************************************************************************
  54.  
  55.     (copyfiles
  56.       (source "GOldNEST.exe")
  57.       (dest (dest_dir))
  58.     )
  59.  
  60.     (Complete 50)
  61.  
  62.     (copyfiles
  63.       (source "Start_GOldNEST")
  64.       (dest (dest_dir))
  65.     )
  66.  
  67.     (Complete 60)
  68.  
  69. ;***************************************************************************
  70. ;* COPIES THE GOldNEST GUIDE FILE TO THE DESTINATION DIRETORY
  71. ;***************************************************************************
  72.  
  73.     (copyfiles
  74.       (source "GOldNEST.Guide")
  75.       (dest (dest_dir))
  76.     )
  77.  
  78.     (Complete 85)
  79.  
  80. ;***************************************************************************
  81. ;* DEFINE ICON DRAWERS AND INSTALLS THE CORRECT ONES
  82. ;***************************************************************************
  83.  
  84.     (if (= icont 0) (set icontype "MagicWB"))
  85.     (if (= icont 1) (set icontype "SmalMWB"))
  86.     (if (= icont 2) (set icontype "Normal"))
  87.     (if (= icont 3) (set icontype "Smal"))
  88.     (if (= icont 4) (set icontype "MagicWB")) ; Change when NewIcons are added
  89.  
  90.     (copyfiles (source ("icons/%s/GOldNEST.Guide.info" icontype)) (dest dest_dir))
  91.     (copyfiles (source ("icons/%s/Start_GOldNEST.info" icontype)) (dest dest_dir))
  92.     (copyfiles (source ("icons/%s/GOldNEST.info" icontype)) (dest (tackon dest_dir "/")))
  93.  
  94.     (complete 100)
  95.  
  96.     (exit)
  97.