home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #7 / amigamamagazinepolishissue1998.iso / www / gloom / files / gloomtrainer.lha / GloomTrainer / Install_GloomTrainer < prev    next >
Text File  |  1997-05-21  |  3KB  |  150 lines
  1. ;
  2. ;$VER: GloomTrainer Installer script v2.00 (c) 1997 John Girvin
  3. ;
  4.  
  5. (welcome "Welcome to the Gloom Trainer Installer v2.00")
  6. (set @app-name "GloomTrainer")
  7. (set #GDESTDIR "DH0:")
  8.  
  9. (set #GUSEGUI 0)
  10. (set #GDEFTRAINERS 0)
  11.  
  12. (if
  13.     (<> @user-level 2)
  14.     (abort "You must select 'Expert' user level")
  15. )
  16.  
  17. (message "\n\nWelcome to the GloomTrainer Installer\n"
  18.          "(c) 1997 John Girvin\n\n"
  19.          "Please read the documentation thoroughly before"
  20.          " attempting to use this installer!\n\n"
  21.          "This is version 2.00\n\n"
  22.          "Click 'Proceed' to begin."
  23. )
  24.  
  25. (set #GDESTDIR
  26.     (askdir
  27.         (prompt "Where do you have Gloom installed?\n"
  28.                 "(select the directory containing the 'Gloom' program)"
  29.         )
  30.         (help @askdir-help)
  31.         (default #GDESTDIR)
  32.     )
  33. )
  34. (set @default-dest #GDESTDIR)
  35.  
  36. (set #GUSEGUI
  37.     (askchoice
  38.         (prompt "Do you want the cheat GUI to appear every time you load GloomTrainer?\n"
  39.                 "(this may be changed later by editing the tooltypes of GloomTrainer)"
  40.         )
  41.         (help @askchoice-help)
  42.         (choices "Yes" "No")
  43.         (default #GUSEGUI)
  44.     )
  45. )
  46.  
  47. (set #GDEFTRAINERS
  48.     (askoptions
  49.         (prompt "Please select the default trainers to use:\n"
  50.                 "(these may be changed later by either\n"
  51.                 "editing the tooltypes of GloomTrainer\n"
  52.                 "or using the cheat GUI)"
  53.         )
  54.         (help @askoptions-help)
  55.         (choices "Infinite lives"
  56.                  "Maximum gun power"
  57.                  "Infinite invisibility"
  58.                  "Infinite thermo glasses"
  59.                  "Infinite bouncy bullets"
  60.                  "Super gun boosts"
  61.         )
  62.         (default #GDEFTRAINERS)
  63.     )
  64. )
  65.  
  66. (copyfiles
  67.     (prompt "Copying trainer program")
  68.     (help @copyfiles-help)
  69.     (source "GloomTrainer")
  70.     (dest #GDESTDIR)
  71.     (nogauge)
  72.     (noposition)
  73.     (optional fail force)
  74. )
  75.  
  76. (copyfiles
  77.     (prompt "Copying trainer program icon")
  78.     (help @copyfiles-help)
  79.     (source "GloomTrainer_icon")
  80.     (newname "GloomTrainer.info")
  81.     (dest #GDESTDIR)
  82.     (nogauge)
  83.     (optional fail force)
  84. )
  85.  
  86. (if (= #GUSEGUI 1)
  87.     (tooltype
  88.         (prompt "Setting trainer program icon tooltypes")
  89.         (dest (tackon #GDESTDIR "GloomTrainer"))
  90.         (settooltype "NOGUI" "")
  91.     )
  92. )
  93.  
  94. (if (<> 0 (IN #GDEFTRAINERS 0))
  95.     (tooltype
  96.         (prompt "Setting trainer program icon tooltypes")
  97.         (dest (tackon #GDESTDIR "GloomTrainer"))
  98.         (settooltype "INF_LIVES" "")
  99.     )
  100. )
  101.  
  102. (if (<> 0 (IN #GDEFTRAINERS 1))
  103.     (tooltype
  104.         (prompt "Setting trainer program icon tooltypes")
  105.         (dest (tackon #GDESTDIR "GloomTrainer"))
  106.         (settooltype "INF_BIGGUN" "")
  107.     )
  108. )
  109.  
  110. (if (<> 0 (IN #GDEFTRAINERS 2))
  111.     (tooltype
  112.         (prompt "Setting trainer program icon tooltypes")
  113.         (dest (tackon #GDESTDIR "GloomTrainer"))
  114.         (settooltype "INF_INVIS" "")
  115.     )
  116. )
  117.  
  118. (if (<> 0 (IN #GDEFTRAINERS 3))
  119.     (tooltype
  120.         (prompt "Setting trainer program icon tooltypes")
  121.         (dest (tackon #GDESTDIR "GloomTrainer"))
  122.         (settooltype "INF_THERMO" "")
  123.     )
  124. )
  125.  
  126. (if (<> 0 (IN #GDEFTRAINERS 4))
  127.     (tooltype
  128.         (prompt "Setting trainer program icon tooltypes")
  129.         (dest (tackon #GDESTDIR "GloomTrainer"))
  130.         (settooltype "INF_BOUNCY" "")
  131.     )
  132. )
  133.  
  134. (if (<> 0 (IN #GDEFTRAINERS 5))
  135.     (tooltype
  136.         (prompt "Setting trainer program icon tooltypes")
  137.         (dest (tackon #GDESTDIR "GDTrainer"))
  138.         (settooltype "MAXBOOSTS" "")
  139.     )
  140. )
  141.  
  142. (copyfiles
  143.     (prompt (cat "Copying trainer loader"))
  144.     (help @copyfiles-help)
  145.     (source "CGTBoot")
  146.     (dest #GDESTDIR)
  147.     (nogauge)
  148.     (optional fail force)
  149. )
  150.