home *** CD-ROM | disk | FTP | other *** search
/ ftp.team17.com 2014 / 2014.05.ftp.team17.com.tar / ftp.team17.com / pub / t17 / patches / amiga / sperishd.lha / install-speris < prev    next >
Text File  |  1992-09-02  |  5KB  |  201 lines
  1. ; script to install "Speris-Legacy"
  2.  
  3. (user 2) 
  4. (welcome)
  5.  
  6.  
  7. ; ---------------------------------------------------------------------------
  8. ; Get destination pathname for where to install
  9. ; ---------------------------------------------------------------------------
  10.  
  11. (set speris_dest        ; if user wants in different place
  12.     (tackon
  13.         (askdir
  14.             (prompt "In which disk or drawer should Speris Legacy be installed?")
  15.             (help @askdir-help)
  16.             (default @default-dest)
  17.         )
  18.     "Speris"
  19.     )
  20. )
  21. (makedir speris_dest (infos))
  22. (set @default-dest speris_dest)
  23.  
  24. ; ---------------------------------------------------------------------------
  25. ; Copy files from disk 1 to destination
  26. ; ---------------------------------------------------------------------------
  27.  
  28. (askdisk
  29.     (prompt "Please insert \"Speris - Disk 1\".")
  30.     (help @askdisk-help)
  31.     (dest "Speris-1")
  32. )
  33.  
  34. (copyfiles
  35.     (source "speris-1:")
  36.     (dest speris_dest)
  37.     (infos)
  38.     (all)
  39. )
  40.  
  41. (copyfiles
  42.     (source "speris-1:Libs")
  43.     (dest "Sys:Libs")
  44.     (infos)
  45.     (all)
  46. )
  47.  
  48. ; ---------------------------------------------------------------------------
  49. ; Copy files from disk 2 to destination
  50. ; ---------------------------------------------------------------------------
  51.  
  52. (askdisk
  53.     (prompt "Please insert \"Speris - Disk 2\".")
  54.     (help @askdisk-help)
  55.     (dest "Speris-2")
  56. )
  57.  
  58. (copyfiles
  59.     (source "speris-2:")
  60.     (dest speris_dest)
  61.     (all)
  62.     (infos)
  63. )
  64.  
  65.  
  66. ; ---------------------------------------------------------------------------
  67. ; Copy files from disk 3 to destination
  68. ; ---------------------------------------------------------------------------
  69.  
  70. (askdisk
  71.     (prompt "Please insert \"Speris - Disk 3\".")
  72.     (help @askdisk-help)
  73.     (dest "Speris-3")
  74. )
  75.  
  76. (copyfiles
  77.     (source "speris-3:")
  78.     (dest speris_dest)
  79.     (all)
  80.     (infos)
  81. )
  82.  
  83.  
  84. ; ---------------------------------------------------------------------------
  85. ; Copy files from disk 4 to destination
  86. ; ---------------------------------------------------------------------------
  87.  
  88. (askdisk
  89.     (prompt "Please insert \"Speris - Disk 4\".")
  90.     (help @askdisk-help)
  91.     (dest "Speris-4")
  92. )
  93.  
  94. (copyfiles
  95.     (source "speris-4:")
  96.     (dest speris_dest)
  97.     (all)
  98.     (infos)
  99. )
  100.  
  101. ; ---------------------------------------------------------------------------
  102. ; Copy files from install disk to destination
  103. ; ---------------------------------------------------------------------------
  104.  
  105. (askdisk
  106.     (prompt "Please insert \"Speris - HD Install Disk\".")
  107.     (help @askdisk-help)
  108.     (dest "Speris-Install")
  109. )
  110.  
  111. (copyfiles
  112.     (source "speris-install:Extras/")
  113.     (dest speris_dest)
  114.     (all)
  115.     (infos)
  116. )
  117.  
  118. ; --------------------------------------------------------------------------- 
  119. ; Add assigns to S:User-Startup
  120. ; ---------------------------------------------------------------------------
  121.  
  122.  (startup "Speris"
  123.     (prompt
  124.         "Some instructions need to be added to the \"S:user-startup\" "
  125.         "so that your system will be properly configured to use Speris Legacy."
  126.     )
  127.     (help @startup-help)
  128.     (command
  129.         "ASSIGN Speris-1: \"" speris_dest "\"\n"
  130.         "ASSIGN Speris-2: \"" speris_dest "\"\n"
  131.         "ASSIGN Speris-3: \"" speris_dest "\"\n"
  132.         "ASSIGN Speris-4: \"" speris_dest "\"\n"
  133.         "ASSIGN Speris: Remove\n"
  134.         "ASSIGN Speris: Speris-1:\n"            
  135.     )
  136. )
  137.  
  138. ; ---------------------------------------------------------------------------
  139. ; Make script file so that game can run by booting with no startup
  140. ; ---------------------------------------------------------------------------------------------------------------------------------------------------
  141.  
  142. (textfile
  143.     (prompt 
  144.         "Attempting to create an executable script file so game can be "
  145.         "run when booting with no startup-sequence. The file will be "
  146.         "stored in the root directory of the boot drive and will be "
  147.         "called `RunSperis'."
  148.     )
  149. ;    (prompt 
  150. ;        "Attempting to create an executable script file which will "
  151. ;        "set up the game and then run it. The file will be stored "
  152. ;        "in the root directory of the boot drive and will be called "
  153. ;        "`RunSperis'."
  154. ;    )
  155.     (confirm)
  156.     (help @textfile-help)
  157.     (dest (cat "Sys:RunSperis"))
  158.     (append (cat "Assign Speris-1: " speris_dest))
  159.     (append "\n")
  160.     (append (cat "Assign Speris-2: " speris_dest))
  161.     (append "\n")
  162.     (append (cat "Assign Speris-3: " speris_dest))
  163.     (append "\n")
  164.     (append (cat "Assign Speris-4: " speris_dest))
  165.     (append "\n")
  166.     (append (cat "Assign Speris: Remove"))
  167.     (append "\n")
  168.     (append (cat "Assign Speris: Speris-1:"))
  169.     (append "\n")
  170.     (append (cat "Speris:Speris.exe"))
  171.     (append "\n")
  172. )
  173. (protect (cat "Sys:RunSperis") "+s")
  174.  
  175.  
  176. ; ---------------------------------------------------------------------------
  177. ; Make non-volatile structure on hard-drive
  178. ; ---------------------------------------------------------------------------------------------------------------------------------------------------
  179.  
  180. (set nv_dest        ; if user wants in different place
  181.     (tackon
  182.         (askdir
  183.             (prompt 
  184.                 "Attempting to create a non-volatile directory so that "
  185.                 "games can be saved to hard-drive. Please select where "
  186.                 "you would like this to be created:"
  187.             )
  188.             (help @askdir-help)
  189.             (default "Sys:")
  190.         )
  191.     "nonvolatile"
  192.     )
  193. )
  194. (makedir nv_dest (infos))
  195.  
  196. (textfile
  197.     (dest (cat "Sys:Prefs/Env-Archive/Sys/nv_location"))
  198.     (append (cat nv_dest))
  199.     (append "\n")
  200. )
  201.