home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 26 / amigaformatcd26.iso / -screenplay- / hd_installers / rollingthunderhd / install-game < prev    next >
Text File  |  1998-03-09  |  2KB  |  87 lines
  1. (set #CI_unit 0)
  2. (set #CI_drive ("DF%ld:" #CI_unit))
  3. (set #readme "rthndr")            ; %shd.readme
  4. (set #directory "ROLLING_T")
  5. ;----------------------------
  6.  
  7. ;try to figure out a place where the user usually installs his games
  8. (if (exists "Games:" (noreq) )
  9.     (set @default-dest "Games:")
  10.     (if (exists "SYS:Games" (noreq) )
  11.         (set @default-dest "SYS:Games")
  12.         (if (exists "Work:Games" (noreq) )
  13.             (set @default-dest "Work:Games")
  14.             (if (exists "JEUX:" (noreq) )
  15.                (set @default-dest "JEUX:")
  16.                (set @default-dest "SYS:")
  17.             )
  18.         )
  19.     )
  20. )
  21.  
  22. (message "\n\n\nThis loader needs the JST program (NOT INCLUDED)\n to be copied in your path\n\n(if you don't have it already)\n\nJST is available from aminet (game/patch)")
  23.  
  24. (set @default-dest
  25. (askdir
  26.     (prompt ("Where should %s installed ?\nA drawer \"%s\" will automatically created." @app-name @app-name))
  27.     (help @askdir-help)
  28.     (default @default-dest)
  29.     (disk)
  30. )
  31. )
  32. (set #dest (tackon @default-dest @app-name))
  33.  
  34. (makedir #dest
  35.     (help @makedir-help)
  36.     (infos)
  37. )
  38.  
  39. ;----------------------------
  40.  
  41. (copyfiles
  42.   (help @copyfiles-help)
  43.   (source ("HD.inf"))
  44.   (newname ("%sHD.info" @app-name ))
  45.   (dest #dest)
  46. )
  47. (copyfiles
  48.   (help @copyfiles-help)
  49.   (source ("%sHD" @app-name ))
  50.   (dest #dest)
  51. )
  52. (copyfiles
  53.   (help @copyfiles-help)
  54.   (source ("%shd.readme" #readme))
  55.   (dest #dest)
  56. )
  57. (copyfiles
  58.   (help @copyfiles-help)
  59.   (source ("%shd.readme.info" #readme))
  60.   (dest #dest)
  61. )
  62. (copyfiles
  63.   (help @copyfiles-help)
  64.   (source ("jst.readme.inf"))
  65.   (newname ("jst.readme.info"))
  66.   (dest #dest)
  67. )
  68. (copyfiles
  69.   (help @copyfiles-help)
  70.   (source ("jst.readme"))
  71.   (dest #dest)
  72. )
  73.  
  74. (makedir 
  75.   (tackon #dest "data")
  76.   (help @makedir-help)
  77. )
  78. (message ("\nInsert %s into drive any drive!" @app-name))
  79.     (if
  80.         (= 0 (run ("copy ROLLING_T:game ROLLING_T:#?.PI1 ROLLING_T:#?.DTA to \"%s/data\" all " #dest )))
  81.         ("")
  82.         (abort "\"\" must be in your PATH !")
  83.     )
  84.  
  85. (exit)
  86.  
  87.