home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Extra 1996 #3 / AmigaPlus_CD-ROM-EXTRA_Nr.3.bin / aminet-spiele / denk&grübel / hydrocis / install-hydrocis < prev    next >
Text File  |  1995-01-21  |  3KB  |  89 lines
  1. ; $VER: Hydrocis_Installer_Version 1.09 (13.12.94)
  2. ; von Sebastian Winkel
  3.  
  4. (set #introduction
  5. (cat "\n\nMit diesem Programm können Sie das Spiel Hydrocis auf ihre Festplatte "
  6.      "installieren. Es kann allerdings möglicherweise unter OS 3.00 zu Problemen "
  7.      "mit den Hardwaresprites (Wasserbomben) kommen, z.B. in Level 3. Da der Fehler "
  8.      "unter den Versionen 3.1 und 1.3 des Betriebsystems nicht auftritt, scheint ein "
  9.      "Bug in der Systemsoftware von 3.00 die wahrscheinlichste Erklärung zu sein. "
  10.      "Probieren Sie es aus - und starten Sie Hydrocis im Notfall eben von Diskette. "
  11.      "Wie das geht, erklärt die Anleitung in diesem Verzeichnis."))
  12. (set #choosedir
  13. (cat "Wählen Sie bitte ein Verzeichnis aus, in das der Installer die "
  14.      "Hydrocis-Schublade legt."))
  15.  
  16. ;Start des Hauptprogramms
  17.  
  18. (complete 0)
  19. (message #introduction)
  20.  
  21. (set @default-dest
  22.  (askdir (prompt #choosedir)
  23.          (help "Schauen Sie im Workbench-Handbuch unter <Dateiauswahlfenster> nach!")
  24.          (default @default-dest)))
  25.  
  26. (set anleitungen
  27. (askoptions (prompt "\nHydrocis liegt eine Anleitung als Text und als AmigaGuide "
  28.                     "bei. Beide haben den gleichen Inhalt. Welche wollen Sie "
  29.                     "installieren? ")
  30. (help "Drücken Sie im Zweifelsfalle WEITER")
  31. (Choices "Hydrocis.dok"
  32.          "Hydrocis.guide")
  33. (default 2)))
  34.  
  35. (working "\n\nIch beginne mit dem Kopieren...")
  36.  
  37. (set @default-dest
  38.  (tackon @default-dest "Hydrocis"))
  39.  
  40. (makedir @default-dest (infos))
  41.  
  42. (if (= anleitungen 1)
  43. (copyfiles (source "Hydrocis.dok") (dest @default-dest) (nogauge) (infos)))
  44. (complete 2)
  45.  
  46. (if (= anleitungen 2)
  47. (copyfiles (source "Hydrocis.guide") (dest @default-dest) (nogauge) (infos)))
  48. (complete 10)
  49.  
  50. (if (= anleitungen 3)
  51. (
  52. (copyfiles (source "Hydrocis.dok") (dest @default-dest) (nogauge) (infos))
  53. (copyfiles (source "Hydrocis.guide") (dest @default-dest) (nogauge) (infos))
  54. (complete 10)
  55. ))
  56.  
  57. (copyfiles (source "level1") (dest @default-dest) (nogauge))
  58. (complete 20)
  59. (copyfiles (source "level19") (dest @default-dest) (nogauge))
  60. (complete 30)
  61. (copyfiles (source "level21") (dest @default-dest) (nogauge))
  62. (complete 40)
  63. (copyfiles (source "level2") (dest @default-dest) (nogauge))
  64. (complete 50)
  65. (copyfiles (source "level26") (dest @default-dest) (nogauge))
  66. (complete 55)
  67. (copyfiles (source "level16") (dest @default-dest) (nogauge))
  68. (complete 60)
  69. (copyfiles (source "DemoInfo") (dest @default-dest) (nogauge))
  70. (complete 65)
  71. (copyfiles (source "level31") (dest @default-dest) (nogauge))
  72. (complete 70)
  73. (copyfiles (source "level32") (dest @default-dest) (nogauge))
  74. (complete 75)
  75.  
  76. (copyfiles (source "Hydrocis") (dest @default-dest) (nogauge) (infos))
  77. (complete 80)
  78. (copyfiles (source "Registrationsformular") (dest @default-dest) (nogauge) (infos))
  79. (complete 85)
  80. (copyfiles (source "Icons") (dest @default-dest) (nogauge))
  81. (complete 90)
  82. (copyfiles (source "Intro") (dest @default-dest) (nogauge))
  83. (complete 95)
  84. (copyfiles (source "Pithecus") (dest @default-dest) (nogauge))
  85. (complete 98)
  86. (copyfiles (source "GUI") (dest @default-dest) (nogauge))
  87. (complete 100)
  88.  
  89.