home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 27 / amigaformatcd27.iso / -screenplay- / shareware / taskforce / install_taskforce < prev    next >
Text File  |  1998-03-30  |  2KB  |  110 lines
  1. ; $VER: Install_TaskForce 1.02 (09.03.98)
  2.  
  3. (complete 0)
  4.  
  5. ; version check
  6. (if (< (/ (getversion) 65536) 37)
  7.     (abort "You must be using Kickstart 2.04 or higher to run TaskForce.")
  8. )
  9.  
  10. (welcome)
  11.  
  12. (set @default-dest
  13.     (askdir
  14.         (prompt "Please choose a directory where to install the game. A directory named \"TaskForce\" will be created.")
  15.         (help @askdir-help)
  16.         (default @default-dest)
  17.     )
  18. )
  19.  
  20. (complete 15)
  21.  
  22. (set #instdir (tackon @default-dest "TaskForce") )
  23.  
  24. (makedir #instdir (infos))
  25. (makedir (tackon #instdir "Games"))
  26. (makedir (tackon #instdir "Missions"))
  27. (makedir (tackon #instdir "Missions/OnePlayer"))
  28. (makedir (tackon #instdir "Missions/TwoPlayers"))
  29. (makedir (tackon #instdir "Briefings"))
  30.  
  31. (complete 25)
  32.  
  33. (if (< @user-level 2)
  34.     (set #missions 1)
  35.     (set #missions
  36.         (askoptions
  37.             (prompt "Select the missions you wish to install.")
  38.             (help (cat
  39.                 "The mission files are needed to play TaskForce. "
  40.                 "Each mission introduces new characters, defines "
  41.                 "different goals, and is generally a different "
  42.                 "experience. It is recommended to copy all files. "
  43.                 "However, you may opt not to install all available "
  44.                 "missions because of low harddisk space, for example "
  45.                 "(rather improbable, isn't it?).\n"
  46.                 "The number in brackets indicates whether it is a "
  47.                 "scenario for one or two human players."
  48.             ))
  49.             (choices "Urban Combat (2)")
  50.             (default 1)
  51.         )
  52.     )
  53. )
  54.  
  55. (complete 30)
  56.  
  57. (copyfiles
  58.     (prompt "Copying game files...")
  59.     (help @copyfiles-help)
  60.     (source "")
  61.     (dest #instdir)
  62.     (choices "TaskForce" "Editor" "Data" "Docs" "Briefings.info")
  63.     (infos)
  64. )
  65.  
  66. (complete 65)
  67.  
  68. (working "\n\n\nTaskForce is now installing the mission files...")
  69.  
  70. (set n 0)
  71. (while
  72.     (set #missionfiles
  73.         (select n
  74.             "TwoPlayers/Urban Combat"
  75.             ""
  76.         )
  77.     )
  78. (
  79.     (if (IN #missions n)
  80.         (
  81.             (copyfiles
  82.                 (source "Missions/")
  83.                 (dest (tackon #instdir "Missions"))
  84.                 (choices (cat #missionfiles ".mission"))
  85.                 (nogauge)
  86.             )
  87.             (copyfiles
  88.                 (source "Briefings/")
  89.                 (dest (tackon #instdir "Briefings"))
  90.                 (choices (fileonly #missionfiles))
  91.                 (infos)
  92.                 (nogauge)
  93.             )
  94.         )
  95.     )
  96.     (set n (+ n 1))
  97. ))
  98.  
  99. (complete 90)
  100.  
  101. (copylib
  102.     (prompt "Installing reqtools.library")
  103.     (help @copylib-help)
  104.     (source "Libs/reqtools.library")
  105.     (dest "LIBS:")
  106.     (confirm)
  107. )
  108.     
  109. (complete 100)
  110.