home *** CD-ROM | disk | FTP | other *** search
/ Amiga ACS 1998 #4 / amigaacscoverdisc1998-041998.iso / utilities / shareware / music / musicmaniii_inst / install_musicmaniii < prev    next >
Encoding:
Text File  |  1998-03-08  |  35.9 KB  |  1,320 lines
  1. ; $VER: MusicManIII-Install (13.11.97)
  2.  
  3. ; --- English texts ---------
  4.  
  5. (SET #WelcomeMsg (CAT "Welcome to the installation of 'MusicManIII'!\n\n"
  6.                                             "This installer-script allows you to install MusicManIII, "
  7.                                             "Update MusicManIII or to remove MusicManIII from your system.\n\n"
  8.                                             "Please read the documentation after you've installed MusicManIII!\n\n\n"
  9.                                             "Have lots of fun while working with 'MusicManIII'\n\n"
  10.                                             "Andreas Mair"
  11.                                  )
  12. )
  13.  
  14. (SET #AskInstChoiceMsg "Please select...")
  15.  
  16. (SET #InstallMMChc "Install MusicManIII")
  17.  
  18. (SET #UpdateMMChc "Update MusicManIII")
  19.  
  20. (SET #RemoveMMChc "Remove MusicManIII")
  21.  
  22. (SET #InstChoiceHelp (CAT "There are three choices:\n\n"
  23.                                                     "Install MusicManIII\n"
  24.                                                     "-------------------\n"
  25.                                                     "MusicManIII will be installed in directory of your choice.\n\n"
  26.                                                     "Update MusicManIII\n"
  27.                                                     "--------------------------\n"
  28.                                                     "This is the same as the above, but Icons aren't replaced.\n"
  29.                                                     "It is very recommended that you use this if you've already "
  30.                                                     "installed MusicManIII.\n\n"
  31.                                                     "Remove MusicManIII\n"
  32.                                                     "------------------\n"
  33.                                                     "You have to select the directory you've installed MusicManIII to. "
  34.                                                     "Then the whole directory will be deleted. All files in this "
  35.                                                     "directory and your keyfile will get lost. The directory "
  36.                                                     "ENVARC:MusicManIII where your settings are stored will be "
  37.                                                     "deleted, too.\nIf you installed the files 'reqtools.library' "
  38.                                                     "'cdplayer.library', 'bgui.library' and 'popupmenu.library' in "
  39.                                                     " your LIBS:-directory, they won't be deleted automatically by "
  40.                                                     "this script."
  41.                                          )
  42. )
  43.  
  44. (SET #SelRemPathMsg "Please select the MusicManIII directory:")
  45.  
  46. (SET #RemoveHelp (CAT "Please select the directory where you have installed MusicManIII. "
  47.                                             "The whole directory will bet deleted.\n\n"
  48.                                             @askdir-help
  49.                                  )
  50. )
  51.  
  52. (SET #ReallyDeleteHelp (CAT "Please select 'Yes' if you are sure to delete the "
  53.                                                         "whole MusicManIII directory. All files contained "
  54.                                                         "will get lost!"
  55.                                              )
  56. )
  57.  
  58. (SET #AskReallyDeleteMsg (CAT "Do you really want to delete the whole directory\n\n"
  59.                                                             "'%s'?\n\n\n"
  60.                                                             "All files and your keyfile will get deleted!"
  61.                                                  )
  62. )
  63.  
  64. (SET #MMRemovedMsg (CAT "MusicManIII has been removed from your system. If "
  65.                                                 "you want to re-install it you just have to execute "
  66.                                                 "this installer-script again."
  67.                                      )
  68. )
  69.  
  70. (SET #RemoveCanceledMsg "Deletion has been canceled.")
  71.  
  72. (SET #RemoveErrorMsg (CAT "MusicManIII can only be deleted if it's installed "
  73.                                                     "in a directory named 'MusicManIII'!"
  74.                                          )
  75. )
  76.  
  77. (SET #SelUpdPathMsg "Please select the MusicManIII directory:")
  78.  
  79. (SET #UpdateHelp (CAT "Please select the directory where you have installed MusicManIII.\n\n"
  80.                                             @askdir-help
  81.                                  )
  82. )
  83.  
  84. (SET #AskUpdateKeyMsg "Do you want to overwrite the keyfile?")
  85.  
  86. (SET #AskUpdateKeyHelp (CAT "If you are a registered users of MusicManIII "
  87.                                                         "you'd better select 'No' if you've already installed "
  88.                                                         "the keyfile for the full release. In every other case "
  89.                                                         "don't mind to select 'Yes'."
  90.                                              )
  91. )
  92.  
  93. (SET #InstallHelp (CAT "Please select the directory where you want to install "
  94.                                              "MusicManIII.\nA directory 'MusicManIII' will be created "
  95.                                              "automatically.\n\n"
  96.                                              @askdir-help
  97.                                     )
  98. )
  99.  
  100. (SET #SelInstPathMsg (CAT "Please select the directory where you'd like to install "
  101.                                                     "'MusicManIII'.\nA directory 'MusicManIII' will be created "
  102.                                                     "automatically!"
  103.                                          )
  104. )
  105.  
  106. (SET #DestCPUHelp (CAT "MusicManIII exists in releases compiled for certain processors:\n\n"
  107.                                              "MC68000\n"
  108.                                              "-------\n"
  109.                                              "For an Amiga with MC68000- or MC68010-Processor.\n\n"
  110.                                              "MC68020+\n"
  111.                                              "--------\n"
  112.                                              "For an Amiga with at least a MC68020-Processor."
  113.                                     )
  114. )
  115.  
  116. (SET #AskDestCPUMsg (CAT "MusicManIII has been compiled to support certain processors.\n"
  117.                                                  "Please select the one installed in your system!"
  118.                                         )
  119. )
  120.  
  121. (SET #DestLanguageHelp (CAT "From Workbench V2.1 on MusicManIII supports localisation. "
  122.                                                         "That means you can use it in your prefered language if "
  123.                                                         "a catalog-file exists."
  124.                                              )
  125. )
  126.  
  127. (SET #AskDestLanguageMsg (CAT "MusicManIII can work in different languages.\n"
  128.                                                             "Please select one out of the currently supported."
  129.                                                  )
  130. )
  131.  
  132. (SET #InstallOnlineHelpHelp (CAT "MusicManIII offers an extensive Online-Help. That means "
  133.                                                                  "you can press the HELP key in the program to get help "
  134.                                                                  "on the current window or menu item. If you want to use "
  135.                                                                  "this feature you have to install this file."
  136.                                                         )
  137. )
  138.  
  139. (SET #AskInstallOnlineHelpMsg (CAT "MusicManIII offers an extensive Online-Help.\n"
  140.                                                                      "Do you want to install it?"
  141.                                                             )
  142. )
  143.  
  144. (SET #InstallDocuHelp (CAT "If you want to install the documentation in the AmigaGuide-format "
  145.                                                      "you have to select 'Yes'. Documentation is only provided in "
  146.                                                      "the AmigaGuide-format."
  147.                                             )
  148. )
  149.  
  150. (SET #AskInstallDocuMsg "Do you want to install the documentation in the AmigaGuide-format?")
  151.  
  152. (SET #InstallRT2LibsHelp (CAT "Here you can select wether you want to install the 'reqtools.library' "
  153.                                                             "to the LIBS: directory or to the 'MusicManIII directory. If you install "
  154.                                                             "it in the MusicManIII directory it will be removed if you de-install "
  155.                                                             "MusicManIII. If you install it in the LIBS: directory it may be used "
  156.                                                             "by other applications."
  157.                                                  )
  158. )
  159.  
  160. (SET #AskInstallRT2LibsMsg (CAT "Do you want to install the 'reqtools.library' to LIBS:?\n"
  161.                                                                 "(else it will installed in the MusicManIII directory)"
  162.                                                      )
  163. )
  164.  
  165. (SET #InstallCDP2LibsHelp (CAT "Here you can select wether you want to install the 'cdplayer.library' "
  166.                                                              "to the LIBS: directory or to the 'MusicManIII directory. If you install "
  167.                                                              "it in the MusicManIII directory it will be removed if you de-install "
  168.                                                              "MusicManIII. If you install it in the LIBS: directory it may be used "
  169.                                                              "by other applications."
  170.                                                     )
  171. )
  172.  
  173. (SET #AskInstallCDP2LibsMsg (CAT "Do you want to install the 'cdplayer.library' to LIBS:?\n"
  174.                                                                 "(else it will installed in the MusicManIII directory)"
  175.                                                         )
  176. )
  177.  
  178. (SET #InstallBGUI2LibsHelp (CAT "Here you can select wether you want to install the 'bgui.library' "
  179.                                                              "to the LIBS: directory or to the 'MusicManIII directory. If you install "
  180.                                                              "it in the MusicManIII directory it will be removed if you de-install "
  181.                                                              "MusicManIII. If you install it in the LIBS: directory it may be used "
  182.                                                              "by other applications."
  183.                                                     )
  184. )
  185.  
  186. (SET #AskInstallBGUI2LibsMsg (CAT "Do you want to install the 'bgui.library' to LIBS:?\n"
  187.                                                                 "(else it will installed in the MusicManIII directory)"
  188.                                                         )
  189. )
  190.  
  191. (SET #InstallPopUp2LibsHelp (CAT "Here you can select wether you want to install the 'popupmenu.library' "
  192.                                                                  "to the LIBS: directory or to the 'MusicManIII directory. If you install "
  193.                                                                  "it in the MusicManIII directory it will be removed if you de-install "
  194.                                                                  "MusicManIII. If you install it in the LIBS: directory it may be used "
  195.                                                                  "by other applications."
  196.                                                     )
  197. )
  198.  
  199. (SET #AskInstallPopUp2LibsMsg (CAT "Do you want to install the 'popupmenu.library' to LIBS:?\n"
  200.                                                                      "(else it will installed in the MusicManIII directory)"
  201.                                                         )
  202. )
  203.  
  204. (SET #KonvFilesHelp (CAT "If you've already worked with MusicManII you'll surely have "
  205.                                                  "created lots of records. As MusicManIII uses a file-format "
  206.                                                  "not compatible to MusicManII you have to convert your old files. "
  207.                                                  "If you answer this question with 'Yes' the program to convert them "
  208.                                                  "is started at the end of this installation."
  209.                                         )
  210. )
  211.  
  212. (SET #UpdateFilesHelp (CAT "If you've already worked with MusicManII you'll surely have "
  213.                                                      "created lots of records. As MusicManIII has written errors "
  214.                                                      "in your files with version before 3.06, you should do the "
  215.                                                      "convertion in any case NOW."
  216.                                                 )
  217. )
  218.  
  219. (SET #AskUpdateFilesMsg (CAT "If you've already worked with any MusicManIII-version before "
  220.                                                          "V3.06 you should convert your files NOW. Else there might "
  221.                                                          "arise problems with newer MusicManIII-version. "
  222.                                                          "\nDo you want to convert your files?"
  223.                                                 )
  224. )
  225.  
  226. (SET #AskKonvFilesMsg (CAT "Do you want to convert your old MusicManII-Files to the new "
  227.                                                      "MusicManIII-format?"
  228.                                             )
  229. )
  230.  
  231. (SET #StartInstallMsg (CAT "\nAll user inputs are done.\n\n"
  232.                                                      "Installation will start..."
  233.                                             )
  234. )
  235.  
  236. (SET #AskFilesDirMsg (CAT "Where can I find your MusicManIII-files?"
  237.                                          )
  238. )
  239.  
  240. (SET #AskFilesDirHelp (CAT "Please enter the path to your MusicManIII-files."
  241.                                             )
  242. )
  243.  
  244. (SET #DefFilesDir "Files"
  245. )
  246.  
  247. (SET #Look4ARexx (CAT "If you are interested in the ARexx features of MusicManIII "
  248.                                             'then you should have a look into the "data/ARexx" directory '
  249.                                             "located in the directory where you've installed MusicManIII from."
  250.                                  )
  251. )
  252.  
  253.  
  254. ; --- German texts ----------
  255.  
  256. (IF (= @language "deutsch")
  257.     (
  258.     (SET #WelcomeMsg (CAT "Willkommen zur Installation von 'MusicManIII'!\n\n"
  259.                                                 "Mit diesem Installations-Skript können Sie MusicManIII "
  260.                                                 "neu installieren, aktualisieren und von Ihrem System entfernen.\n\n"
  261.                                                 "Bitte lesen Sie nach der Installation die Anleitung!\n\n\n"
  262.                                                 "Viel Spaß bei der Arbeit mit 'MusicManIII' wünscht Ihnen\n\n"
  263.                                                 "Andreas Mair"
  264.                                      )
  265.     )
  266.  
  267.     (SET #AskInstChoiceMsg "Bitte wählen Sie...")
  268.  
  269.     (SET #InstallMMChc "MusicManIII neu installieren")
  270.  
  271.     (SET #UpdateMMChc "MusicManIII aktualisieren")
  272.  
  273.     (SET #RemoveMMChc "MusicManIII-Installation entfernen")
  274.  
  275.     (SET #InstChoiceHelp (CAT "Sie haben drei Möglichkeiten:\n\n"
  276.                                                         "MusicManIII neu installieren\n"
  277.                                                         "----------------------------\n"
  278.                                                         "MusicManIII wird in einem von Ihnen auswählbaren "
  279.                                                         "Verzeichnis installiert.\n\n"
  280.                                                         "MusicManIII aktualisieren\n"
  281.                                                         "-------------------------------\n"
  282.                                                         "Dieser Punkt entspricht dem vorherigen mit der "
  283.                                                         "Ausnahme, daß Piktogramme nicht überschrieben werden.\n"
  284.                                                         "Wenn Sie bereits mit MusicManIII gearbeitet haben, wird "
  285.                                                         "es sehr empfohlen, diesen Punkt zu wählen\n\n"
  286.                                                         "MusicManIII-Installation entfernen\n"
  287.                                                         "----------------------------------\n"
  288.                                                         "Sie müssen das Verzeichnis, in dem MusicManIII "
  289.                                                         "installiert wurde, auswählen. Anschließend wird "
  290.                                                         "das ganze Verzeichnis gelöscht. Dateien und Keyfiles, "
  291.                                                         "die in diesem Verzeichnis enthalten sind, gehen "
  292.                                                         "dadurch verloren. Das Verzeichnis 'ENVARC:MusicManIII', "
  293.                                                         "in dem sich die Voreinstellungen befinden, wird "
  294.                                                         "ebenfalls gelöscht.\nSollten Sie die Dateien "
  295.                                                         "'reqtools.library', 'cdplayer.library', 'bgui.library' "
  296.                                                         "und 'popupmenu.library' in das LIBS:-Verzeichnis "
  297.                                                         "installiert haben, so werden diese von diesem Skript "
  298.                                                         "nicht automatisch entfernt."
  299.                                              )
  300.     )
  301.  
  302.     (SET #SelRemPathMsg "Bitte wählen Sie das MusicManIII-Verzeichnis:")
  303.  
  304.     (SET #RemoveHelp (CAT "Wählen Sie bitte das Verzeichnis aus, in dem Sie "
  305.                                                 "MusicManIII installiert haben. Das ganze Verzeichnis "
  306.                                                 "wird daraufhin gelöscht.\n\n"
  307.                                                 @askdir-help
  308.                                      )
  309.     )
  310.  
  311.     (SET #ReallyDeleteHelp (CAT "Wenn Sie hier auf 'Ja' klicken, wird das ganze "
  312.                                                             "'MusicManIII'-Verzeichnis gelöscht. Alle enthaltenen "
  313.                                                             "Daten gehen verloren!"
  314.                                                  )
  315.     )
  316.  
  317.     (SET #AskReallyDeleteMsg (CAT "Wollen Sie wirklich das gesamte Verzeichnis\n\n"
  318.                                                                 "'%s'\n\nlöschen?\n\n\n"
  319.                                                                 "Es werden auch alle Daten und das Keyfile gelöscht."
  320.                                                      )
  321.     )
  322.  
  323.     (SET #MMRemovedMsg (CAT "MusicManIII wurde von Ihrem System entfernt. Wenn "
  324.                                                     "Sie ihn wieder installieren wollen, führen Sie "
  325.                                                     "dieses Installations-Programm wieder aus."
  326.                                          )
  327.     )
  328.  
  329.     (SET #RemoveCanceledMsg "Der Löschvorgang wurde abbgebrochen.")
  330.  
  331.     (SET #RemoveErrorMsg (CAT "MusicManIII kann nur gelöscht werden, wenn er sich "
  332.                                                         "im Verzeichnis 'MusicManIII' befindet!"
  333.                                              )
  334.     )
  335.  
  336.     (SET #SelUpdPathMsg "Bitte wählen Sie das MusicmanIII-Verzeichnis:")
  337.  
  338.     (SET #UpdateHelp (CAT "Bitte wählen Sie das Verzeichnis aus, in dem "
  339.                                                 "MusicManIII installiert ist.\n\n"
  340.                                                 @askdir-help
  341.                                      )
  342.     )
  343.  
  344.     (SET #AskUpdateKeyMsg "Soll das Keyfile aktualisiert werden?")
  345.  
  346.     (SET #AskUpdateKeyHelp (CAT "Wenn Sie registrierter Benutzer von MusicManIII "
  347.                                                             "sind, sollten Sie hier 'Nein' anwählen, wenn Sie "
  348.                                                             "bereits das Keyfile für die Voll-Version installiert "
  349.                                                             "haben. In allen anderen Fällen können Sie ruhigen "
  350.                                                             "Gewissens 'Ja' anklicken."
  351.                                                  )
  352.     )
  353.  
  354.     (SET #InstallHelp (CAT "Wählen Sie hier das Verzeichnis aus, in dem "
  355.                                                  "MusicManIII installiert werden soll. Es wird "
  356.                                                  "ein Verzeichnis 'MusicManIII' angelegt.\n\n"
  357.                                                  @askdir-help
  358.                                         )
  359.     )
  360.  
  361.     (SET #SelInstPathMsg (CAT "Bitte wählen Sie das Verzeichnis aus, in dem 'MusicManIII' "
  362.                                                         "installiert werden soll.\nEin Verzeichnis 'MusicManIII' wird "
  363.                                                         "automatisch erstellt!"
  364.                                              )
  365.     )
  366.  
  367.     (SET #DestCPUHelp (CAT "Von MusicManIII existieren verschiedene Versionen, die für "
  368.                                                  "bestimmte Prozessoren übersetzt wurden:\n\n"
  369.                                                  "MC68000\n"
  370.                                                  "-------\n"
  371.                                                  "Für einen Amiga mit MC68000- oder MC68010-Prozessor.\n\n"
  372.                                                  "MC68020\n"
  373.                                                  "-------\n"
  374.                                                  "Für einen Amiga mit mindestens einem MC68020-Prozessor.\n\n"
  375.                                         )
  376.     )
  377.  
  378.     (SET #AskDestCPUMsg (CAT "MusicManIII steht in speziell für verschiedene Prozessoren "
  379.                                                      "übersetzten Versionen zur Verfügung.\n"
  380.                                                      "Wählen Sie den für Ihr System zutreffenden aus!"
  381.                                             )
  382.     )
  383.  
  384.     (SET #DestLanguageHelp (CAT "MusicManIII unterstützt ab Workbench V2.1 Lokalisierung. D.h. "
  385.                                                             "daß Sie ihn in Ihrer bevorzugten Sprache benutzen können, "
  386.                                                             "wenn dafür eine Katalog-Datei existiert."
  387.                                                  )
  388.     )
  389.  
  390.     (SET #AskDestLanguageMsg (CAT "MusicManIII kann in verschiedenen Sprachen arbeiten.\n"
  391.                                                                 "Wählen Sie aus den derzeit unterstützten Sprachen eine aus."
  392.                                                      )
  393.     )
  394.  
  395.     (SET #InstallOnlineHelpHelp (CAT "MusicManIII stellt eine umfangreiche Online-Hilfe zur Verfügung. "
  396.                                                                      "D.h. Sie können im Programm die HELP-Taste drücken und erhalten "
  397.                                                                      "daraufhin eine Hilfestellung zum aktuellen Fenster oder Menüpunkt. "
  398.                                                                      "Wenn Sie diese Funktion nutzen wollen, müssen Sie diese Datei "
  399.                                                                      "installieren."
  400.                                                             )
  401.     )
  402.  
  403.     (SET #AskInstallOnlineHelpMsg (CAT "MusicManIII bietet eine umfangreiche Online-Hilfe.\n"
  404.                                                                          "Wollen Sie sie installieren?"
  405.                                                                 )
  406.     )
  407.  
  408.     (SET #InstallDocuHelp (CAT "Wenn Sie die Dokumentation im AmigaGuide-Format installieren wollen, "
  409.                                                             "müssen Sie 'Ja' anklicken. Die Dokumentation steht nur im "
  410.                                                             "AmigaGuide-Format zur Verfügung."
  411.                                                 )
  412.     )
  413.  
  414.     (SET #AskInstallDocuMsg "Wollen Sie die Anleitung im AmigaGuide-Format installieren?")
  415.  
  416.     (SET #InstallRT2LibsHelp (CAT "Hier können Sie wählen, ob die 'reqtools.library' im LIBS:-Verzeichnis "
  417.                                                                 "oder im MusicManIII-Verzeichnis installiert werden soll. Wenn Sie "
  418.                                                                 "sie im MusicManIII-Verzeichnis installieren, kann sie beim De-Installieren "
  419.                                                                 "entfernt werden. Installieren Sie sie jedoch im LIBS:-Verzeichnis, kann "
  420.                                                                 "sie von anderen Programmen verwendet werden."
  421.                                                      )
  422.     )
  423.  
  424.     (SET #AskInstallRT2LibsMsg (CAT "Wollen Sie die 'reqtools.library' nach LIBS: kopieren?\n"
  425.                                                                     "(Ansonsten wird Sie ins MusicManIII-Verzeichnis kopiert.)"
  426.                                                          )
  427.     )
  428.  
  429.     (SET #InstallCDP2LibsHelp (CAT "Hier können Sie wählen, ob die 'cdplayer.library' im LIBS:-Verzeichnis "
  430.                                                                  "oder im MusicManIII-Verzeichnis installiert werden soll. Wenn Sie "
  431.                                                                  "sie im MusicManIII-Verzeichnis installieren, kann sie beim De-Installieren "
  432.                                                                  "entfernt werden. Installieren Sie sie jedoch im LIBS:-Verzeichnis, kann "
  433.                                                                  "sie von anderen Programmen verwendet werden."
  434.                                                         )
  435.     )
  436.  
  437.     (SET #AskInstallCDP2LibsMsg (CAT "Wollen Sie die 'cdplayer.library' nach LIBS: kopieren?\n"
  438.                                                                      "(Ansonsten wird Sie ins MusicManIII-Verzeichnis kopiert.)"
  439.                                                             )
  440.     )
  441.  
  442.     (SET #InstallBGUI2LibsHelp (CAT "Hier können Sie wählen, ob die 'bgui.library' im LIBS:-Verzeichnis "
  443.                                                                  "oder im MusicManIII-Verzeichnis installiert werden soll. Wenn Sie "
  444.                                                                  "sie im MusicManIII-Verzeichnis installieren, kann sie beim De-Installieren "
  445.                                                                  "entfernt werden. Installieren Sie sie jedoch im LIBS:-Verzeichnis, kann "
  446.                                                                  "sie von anderen Programmen verwendet werden."
  447.                                                         )
  448.     )
  449.  
  450.     (SET #AskInstallBGUI2LibsMsg (CAT "Wollen Sie die 'bgui.library' nach LIBS: kopieren?\n"
  451.                                                                      "(Ansonsten wird Sie ins MusicManIII-Verzeichnis kopiert.)"
  452.                                                             )
  453.     )
  454.  
  455.     (SET #InstallPopUp2LibsHelp (CAT "Hier können Sie wählen, ob die 'popupmenu.library' im LIBS:-Verzeichnis "
  456.                                                                      "oder im MusicManIII-Verzeichnis installiert werden soll. Wenn Sie "
  457.                                                                      "sie im MusicManIII-Verzeichnis installieren, kann sie beim De-Installieren "
  458.                                                                      "entfernt werden. Installieren Sie sie jedoch im LIBS:-Verzeichnis, kann "
  459.                                                                      "sie von anderen Programmen verwendet werden."
  460.                                                         )
  461.     )
  462.  
  463.     (SET #AskInstallPopUp2LibsMsg (CAT "Wollen Sie die 'popupmenu.library' nach LIBS: kopieren?\n"
  464.                                                                          "(Ansonsten wird Sie ins MusicManIII-Verzeichnis kopiert.)"
  465.                                                             )
  466.     )
  467.  
  468.     (SET #KonvFilesHelp (CAT "Wenn Sie bereits MusicManII verwendet haben, werden Sie sicherlich "
  469.                                                      "schon eine Menge Datensätze angelegt haben. Da MusicManIII ein "
  470.                                                      "zu MusicManII inkompatibles Dateiformat verwendet, müssen Sie die "
  471.                                                      "Dateien konvertieren. Wenn Sie diese Abfrage mit 'Ja' beantworten, "
  472.                                                      "wird am Installationsende das Konvertierungsprogramm gestartet."
  473.                                             )
  474.     )
  475.  
  476.     (SET #AskKonvFilesMsg (CAT "Wollen Sie Ihre alten MusicManII-Dateien ins neue MusicManIII-"
  477.                                                          "Format konvertieren?"
  478.                                                 )
  479.     )
  480.  
  481.     (SET #StartInstallMsg (CAT "\nEs wurden jetzt alle Benutzerabfragen erledigt.\n\n"
  482.                                                          "Die Installation beginnt..."
  483.                                                 )
  484.     )
  485.  
  486.     (SET #UpdateFilesHelp (CAT "Wenn Sie bereits MusicManIII verwendet haben, werden Sie sicherlich "
  487.                                                          "schon eine Menge Datensätze angelegt haben. Da MusicManIII vor der "
  488.                                                          "Version 3.06 unter Umständen Fehler in Ihre Dateien brachte, sollten "
  489.                                                          "Sie die Konvertierung auf alle Fälle JETZT durchführen."
  490.                                                     )
  491.     )
  492.  
  493.     (SET #AskUpdateFilesMsg (CAT "Wenn Sie bereits mit einer MusicManIII-Version vor V3.06 gearbeitet "
  494.                                                              "haben, sollten Sie Ihre damit angelegten Dateien JETZT konvertieren. "
  495.                                                              "Ansonsten kann es zu Problemen mit neueren MusicManIII-Version kommen. "
  496.                                                              "\n\nWollen Sie die Konvertierung durchführen?"
  497.                                                     )
  498.     )
  499.  
  500.     (SET #AskFilesDirMsg (CAT "Wo befinden sich Ihre MusicManIII-Dateien?"
  501.                                              )
  502.     )
  503.  
  504.     (SET #AskFilesDirHelp (CAT "Geben Sie hier den Pfad zu Ihren MusicManIII-Dateien an."
  505.                                                 )
  506.     )
  507.  
  508.     (SET #DefFilesDir "Dateien"
  509.     )
  510.  
  511.     (SET #Look4ARexx (CAT "Wenn Sie Interesse an den ARexx-Funktionen von MusicManIII haben, "
  512.                                                 'dann sollten Sie in das "data/ARexx"-Verzeichnis in dem Verzeichnis, '
  513.                                                 "aus dem Sie MusicManIII installiert haben, schauen."
  514.                                      )
  515.     )
  516.     )
  517. )
  518.  
  519.  
  520. ; --- Constants -------------
  521.  
  522. (SET #Inst_new    0)
  523. (SET #Inst_update 1)
  524. (SET #Inst_remove 2)
  525.  
  526. (SET #MC68000 0)
  527. (SET #MC68020 1)
  528.  
  529. (SET #ENGLISH 0)
  530. (SET #GERMAN  1)
  531.  
  532.  
  533. ; --- Some default ----------
  534.  
  535. (SET #ReallyDelete      0)
  536. (SET #InstallOnlineHelp 1)
  537. (SET #InstallDocu       1)
  538. (SET #InstallRT2Libs    0)
  539. (SET #InstallCDP2Libs   0)
  540. (SET #InstallBGUI2Libs  0)
  541. (SET #InstallPopUp2Libs 0)
  542. (SET #KonvFiles         1)
  543. (SET #UpdateFiles       1)
  544.  
  545. (SET #InstChoice        1)
  546.  
  547. ; ---------------------------
  548.  
  549. (PROCEDURE p_remove
  550.  
  551.     (SET #InstPath (ASKDIR (PROMPT #SelRemPathMsg)
  552.                                                  (DEFAULT @default-dest)
  553.                                                  (HELP #RemoveHelp)
  554.                                  )
  555.     )
  556.  
  557.     (SET @default-dest #InstPath)
  558.     (SET #AllOK 1)
  559.  
  560.     (IF (NOT (= (SUBSTR #InstPath (- (STRLEN #InstPath) (STRLEN "MusicManIII"))) "MusicManIII"))
  561.         (
  562.         (SET #InstPath (TACKON #InstPath "MusicManIII"))
  563.  
  564.         (IF (NOT (EXISTS #InstPath))
  565.             (SET #AllOK 0)
  566.         )
  567.         )
  568.     )
  569.  
  570.     (IF #AllOK
  571.         (
  572.         (SET #ReallyDelete (ASKBOOL (PROMPT (#AskReallyDeleteMsg #InstPath))
  573.                                                                 (DEFAULT #ReallyDelete)
  574.                                                                 (HELP #ReallyDeleteHelp)
  575.                                              )
  576.         )
  577.  
  578.         (IF #ReallyDelete
  579.             (
  580.             (RUN ("delete >NIL: %s all quiet force" #InstPath))
  581.             (DELETE ("%s.info" #InstPath))
  582.             (RUN "delete ENVARC:MusicManIII all quiet force")
  583.             (RUN "delete ENV:MusicManIII all quiet force")
  584.  
  585.             (MESSAGE #MMRemovedMsg)
  586.             )
  587.             ; else
  588.             (MESSAGE #RemoveCanceledMsg)
  589.         )
  590.         )
  591.         ; else
  592.         (MESSAGE #RemoveErrorMsg)
  593.     )
  594.  
  595.     (EXIT (QUIET))
  596. )
  597.  
  598.  
  599. ; ---------------------------
  600.  
  601. (PROCEDURE p_install
  602.  
  603.     (SET #InstPath (ASKDIR (PROMPT #SelInstPathMsg)
  604.                                                  (DEFAULT @default-dest)
  605.                                                  (HELP #InstallHelp)
  606.                                  )
  607.     )
  608.  
  609.     (SET #InstPath (TACKON #InstPath "MusicManIII"))
  610.     (SET @default-dest #InstPath)
  611.  
  612.     (SET #CPU (DATABASE "cpu"))
  613.  
  614.  
  615.     (IF (OR (= #CPU "68000") (= #CPU "68010"))
  616.         (SET #DestCPU #MC68000)
  617.         ; else
  618.         (SET #DestCPU #MC68020)
  619.     )
  620.  
  621.     (IF (= @user-level 2)
  622.         (SET #DestCPU (ASKCHOICE (PROMPT #AskDestCPUMsg)
  623.                                                          (CHOICES "MC68000" "MC68020+")
  624.                                                          (DEFAULT #DestCPU)
  625.                                                          (HELP #DestCPUHelp)
  626.                                     )
  627.         )
  628.     )
  629.  
  630.     (SET #DestLanguage #ENGLISH)
  631.  
  632.     (IF (= @language "deutsch")
  633.         (SET #DestLanguage #GERMAN)
  634.     )
  635.  
  636.     (IF (= @user-level 2)
  637.         (SET #DestLanguage (ASKCHOICE (PROMPT #AskDestLanguage)
  638.                                                                     (CHOICES "English" "Deutsch")
  639.                                                                     (DEFAULT #DestLanguage)
  640.                                                                     (HELP #DestLanguageHelp)
  641.                                              )
  642.         )
  643.     )
  644.  
  645.     (SET #InstallOnlineHelp (ASKBOOL (PROMPT #AskInstallOnlineHelpMsg)
  646.                                                                      (DEFAULT #InstallOnlineHelp)
  647.                                                                      (HELP #InstallOnlineHelpHelp)
  648.                                                     )
  649.     )
  650.  
  651.     (SET #InstallDocu (ASKBOOL (PROMPT #AskInstallDocuMsg)
  652.                                                          (DEFAULT #InstallDocu)
  653.                                                          (HELP #InstallDocuHelp)
  654.                                         )
  655.     )
  656.  
  657.     (IF (= @user-level 2)
  658.         (
  659.         (IF (EXISTS "LIBS:reqtools.library")
  660.             (SET #InstallRT2Libs 1)
  661.         )
  662.  
  663.         (SET #InstallRT2Libs (ASKBOOL (PROMPT #AskInstallRT2LibsMsg)
  664.                                                                     (DEFAULT #InstallRT2Libs)
  665.                                                                     (HELP #InstallRT2LibsHelp)
  666.                                                  )
  667.         )
  668.  
  669.         (IF (EXISTS "LIBS:cdplayer.library")
  670.             (SET #InstallCDP2Libs 1)
  671.         )
  672.  
  673.         (SET #InstallCDP2Libs (ASKBOOL (PROMPT #AskInstallCDP2LibsMsg)
  674.                                                                     (DEFAULT #InstallCDP2Libs)
  675.                                                                     (HELP #InstallCDP2LibsHelp)
  676.                                                  )
  677.         )
  678.  
  679.         (IF (EXISTS "LIBS:bgui.library")
  680.             (SET #InstallBGUI2Libs 1)
  681.         )
  682.  
  683.         (SET #InstallBGUI2Libs (ASKBOOL (PROMPT #AskInstallBGUI2LibsMsg)
  684.                                                                         (DEFAULT #InstallBGUI2Libs)
  685.                                                                         (HELP #InstallBGUI2LibsHelp)
  686.                                                  )
  687.         )
  688.  
  689.         (IF (EXISTS "LIBS:popupmenu.library")
  690.             (SET #InstallPopUp2Libs 1)
  691.         )
  692.  
  693.         (SET #InstallPopUp2Libs (ASKBOOL (PROMPT #AskInstallPopUp2LibsMsg)
  694.                                                                          (DEFAULT #InstallPopUp2Libs)
  695.                                                                          (HELP #InstallPopUp2LibsHelp)
  696.                                                  )
  697.         )
  698.         )
  699.     )
  700.  
  701.     (IF (EXISTS "ENVARC:MusicManII")
  702.         (SET #KonvFiles (ASKBOOL (PROMPT #AskKonvFilesMsg)
  703.                                                          (DEFAULT #KonvFiles)
  704.                                                          (HELP #KonvFilesHelp)
  705.                                         )
  706.         )
  707.         ; else
  708.         (SET #KonvFiles 0)
  709.     )
  710.  
  711.     (IF (EXISTS "ENVARC:MusicManIII")
  712.         (
  713.         (SET #UpdateFiles (ASKBOOL (PROMPT #AskUpdateFilesMsg)
  714.                                                              (DEFAULT #UpdateFiles)
  715.                                                              (HELP #UpdateFilesHelp)
  716.                                             )
  717.         )
  718.  
  719.         (IF #UpdateFiles
  720.             (SET #FilesDir (ASKDIR (PROMPT #AskFilesDirMsg)
  721.                                                          (DEFAULT (TACKON #InstPath #DefFilesDir))
  722.                                                          (HELP #AskFilesDirHelp)
  723.                                          )
  724.             )
  725.         )
  726.         )
  727.         ; else
  728.         (SET #UpdateFiles 0)
  729.     )
  730.  
  731.     (MESSAGE #StartInstallMsg)
  732.  
  733.     (MAKEDIR #InstPath (INFOS))
  734.  
  735.     (COMPLETE 0)
  736.  
  737.     (IF (= #DestCPU #MC68000)
  738.         (COPYFILES (SOURCE "data/MusicManIII.000")
  739.                              (DEST #InstPath)
  740.                              (NEWNAME "MusicManIII")
  741.         )
  742.         ; else
  743.         (COPYFILES (SOURCE "data/MusicManIII.020")
  744.                              (DEST #InstPath)
  745.                              (NEWNAME "MusicManIII")
  746.         )
  747.     )
  748.  
  749.     (COPYFILES (SOURCE "data/MusicManIII.info")
  750.                          (DEST #InstPath)
  751.                          (INFOS) (NOPOSITION)
  752.     )
  753.  
  754.     (COMPLETE 12)
  755.  
  756.     (IF (= #DestLanguage #GERMAN)
  757.         (
  758.         (MAKEDIR (TACKON #InstPath "catalogs"))
  759.         (MAKEDIR (TACKON #InstPath "catalogs/deutsch"))
  760.  
  761.         (COPYFILES (SOURCE "data/catalogs/deutsch/MusicManIII.catalog")
  762.                              (DEST (TACKON #InstPath "catalogs/deutsch"))
  763.         )
  764.  
  765.         (COMPLETE 25)
  766.  
  767.         (IF #InstallOnlineHelp
  768.             (
  769.             (MAKEDIR (TACKON #InstPath "Help"))
  770.             (MAKEDIR (TACKON #InstPath "Help/Deutsch"))
  771.  
  772.             (COPYFILES (SOURCE "data/Doc/deutsch/MusicManIII.guide")
  773.                                  (DEST (TACKON #InstPath "Help/deutsch/"))
  774.                                  (NEWNAME "MusicManIII_Help.guide")
  775.             )
  776.             )
  777.         )
  778.  
  779.         (COMPLETE 37)
  780.  
  781.         (IF #InstallDocu
  782.             (
  783.             (MAKEDIR (TACKON #InstPath "Doc") (INFOS))
  784.  
  785.             (COPYFILES (SOURCE "data/Doc/deutsch/MusicManIII.guide")
  786.                                  (DEST (TACKON #InstPath "Doc"))
  787.                                  (INFOS) (NOPOSITION)
  788.             )
  789.             )
  790.         )
  791.         )
  792.         ; else
  793.         (
  794.         (IF #InstallOnlineHelp
  795.             (
  796.             (MAKEDIR (TACKON #InstPath "Help"))
  797.             (MAKEDIR (TACKON #InstPath "Help/English"))
  798.  
  799.             (COPYFILES (SOURCE "data/Doc/English/MusicManIII.guide")
  800.                                  (DEST (TACKON #InstPath "Help/English/"))
  801.                                  (NEWNAME "MusicManIII_Help.guide")
  802.             )
  803.             )
  804.         )
  805.  
  806.         (COMPLETE 37)
  807.  
  808.         (IF #InstallDocu
  809.             (
  810.             (MAKEDIR (TACKON #InstPath "Doc") (INFOS))
  811.  
  812.             (COPYFILES (SOURCE "data/Doc/English/MusicManIII.guide")
  813.                                  (DEST (TACKON #InstPath "Doc"))
  814.                                  (INFOS) (NOPOSITION)
  815.             )
  816.             )
  817.         )
  818.         )
  819.     )
  820.  
  821.     (COMPLETE 50)
  822.  
  823.     (IF #InstallRT2Libs
  824.         (COPYLIB (SOURCE "data/Libs/reqtools.library")
  825.                          (DEST "LIBS:")
  826.         )
  827.         ; else
  828.         (COPYLIB (SOURCE "data/Libs/reqtools.library")
  829.                          (DEST #InstPath)
  830.         )
  831.     )
  832.  
  833.     (COMPLETE 58)
  834.  
  835.     (IF #InstallCDP2Libs
  836.         (COPYLIB (SOURCE "data/Libs/cdplayer.library")
  837.                          (DEST "LIBS:")
  838.         )
  839.         ; else
  840.         (COPYLIB (SOURCE "data/Libs/cdplayer.library")
  841.                          (DEST #InstPath)
  842.         )
  843.     )
  844.  
  845.     (COMPLETE 64)
  846.  
  847.     (IF #InstallBGUI2Libs
  848.         (IF (AND (>= #vernum 39) (= #DestCPU #MC68020))
  849.             (COPYLIB (SOURCE "data/Libs/bgui.library_e")
  850.                              (DEST "LIBS:")
  851.                              (NEWNAME "bgui.library")
  852.             )
  853.             ; else
  854.             (COPYLIB (SOURCE "data/Libs/bgui.library")
  855.                              (DEST "LIBS:")
  856.             )
  857.         )
  858.         ; else
  859.         (IF (AND (>= #vernum 39) (= #DestCPU #MC68020))
  860.             (COPYLIB (SOURCE "data/Libs/bgui.library_e")
  861.                              (DEST #InstPath)
  862.                              (NEWNAME "bgui.library")
  863.             )
  864.             ; else
  865.             (COPYLIB (SOURCE "data/Libs/bgui.library")
  866.                              (DEST #InstPath)
  867.             )
  868.         )
  869.     )
  870.  
  871.     (COMPLETE 70)
  872.  
  873.     (IF #InstallPopUp2Libs
  874.         (IF (>= #vernum 39)
  875.             (COPYLIB (SOURCE "data/Libs/popupmenu.library5")
  876.                              (DEST "LIBS:")
  877.                              (NEWNAME "popupmenu.library")
  878.             )
  879.             ; else
  880.             (COPYLIB (SOURCE "data/Libs/popupmenu.library")
  881.                              (DEST "LIBS:")
  882.             )
  883.         )
  884.         ; else
  885.         (IF (>= #vernum 39)
  886.             (COPYLIB (SOURCE "data/Libs/popupmenu.library5")
  887.                              (DEST #InstPath)
  888.                              (NEWNAME "popupmenu.library")
  889.             )
  890.             ; else
  891.             (COPYLIB (SOURCE "data/Libs/popupmenu.library")
  892.                              (DEST #InstPath)
  893.             )
  894.         )
  895.     )
  896.  
  897.     (COMPLETE 75)
  898.  
  899.     (IF #KonvFiles
  900.         (RUN "data/ConvII2III")
  901.     )
  902.  
  903.     (COMPLETE 83)
  904.  
  905.     (IF #UpdateFiles
  906.         (RUN (CAT "data/Conv30x306 " #FilesDir))
  907.     )
  908.  
  909.     (COMPLETE 93)
  910.  
  911.     (COPYFILES (SOURCE "data/MusicManIII.key")
  912.                          (DEST #InstPath)
  913.     )
  914.  
  915.     (COPYFILES (SOURCE "Registration.asc")
  916.                          (DEST #InstPath)
  917.                          (INFOS) (NOPOSITION)
  918.     )
  919.  
  920.     (MAKEDIR "ENVARC:MusicManIII")
  921.     (COPYFILES (SOURCE "data/Prefs/MusicManIII")
  922.                          (DEST "ENVARC:MusicManIII")
  923.                          (ALL) (INFOS) (NOPOSITION)
  924.     )
  925.     (RUN ("echo >ENVARC:MusicManIII/Install_Dir %s" #InstPath))
  926.  
  927.  
  928.     (MAKEDIR "ENV:MusicManIII")
  929.     (COPYFILES (SOURCE "data/Prefs/MusicManIII")
  930.                          (DEST "ENV:MusicManIII")
  931.                          (ALL) (INFOS) (NOPOSITION)
  932.     )
  933.  
  934.     (COMPLETE 100)
  935.  
  936. ;  (EXIT)
  937. )
  938.  
  939.  
  940. ; ---------------------------
  941.  
  942. (PROCEDURE p_update
  943.  
  944.     (SET #InstPath (ASKDIR (PROMPT #SelUpdPathMsg)
  945.                                                  (DEFAULT @default-dest)
  946.                                                  (HELP #UpdateHelp)
  947.                                  )
  948.     )
  949.  
  950.     (SET @default-dest #InstPath)
  951.     (SET #AllOK 1)
  952.  
  953.     (IF (NOT (= (SUBSTR #InstPath (- (STRLEN #InstPath) (STRLEN "MusicManIII"))) "MusicManIII"))
  954.         (
  955.         (SET #InstPath (TACKON #InstPath "MusicManIII"))
  956.  
  957.         (IF (NOT (EXISTS #InstPath))
  958.             (SET #AllOK 0)
  959.         )
  960.         )
  961.     )
  962.  
  963.     (IF #AllOK
  964.         (
  965.         (SET #CPU (DATABASE "cpu"))
  966.  
  967.         (IF (OR (= #CPU "68000") (= #CPU "68010"))
  968.             (SET #DestCPU #MC68000)
  969.             ; else
  970.             (SET #DestCPU #MC68020)
  971.         )
  972.  
  973.         (IF (= @user-level 2)
  974.             (SET #DestCPU (ASKCHOICE (PROMPT #AskDestCPUMsg)
  975.                                                              (CHOICES "MC68000" "MC68020+")
  976.                                                              (DEFAULT #DestCPU)
  977.                                                              (HELP #DestCPUHelp)
  978.                                         )
  979.             )
  980.         )
  981.  
  982.         (SET #DestLanguage #ENGLISH)
  983.  
  984.         (IF (= @language "deutsch")
  985.             (SET #DestLanguage #GERMAN)
  986.         )
  987.  
  988.         (IF (= @user-level 2)
  989.             (SET #DestLanguage (ASKCHOICE (PROMPT #AskDestLanguageMsg)
  990.                                                                         (CHOICES "English" "Deutsch")
  991.                                                                         (DEFAULT #DestLanguage)
  992.                                                                         (HELP #DestLanuageHelp)
  993.                                                  )
  994.             )
  995.         )
  996.  
  997.         (SET #InstallOnlineHelp (ASKBOOL (PROMPT #AskInstallOnlineHelpMsg)
  998.                                                                          (DEFAULT #InstallOnlineHelp)
  999.                                                                          (HELP #InstallOnlineHelpHelp)
  1000.                                                         )
  1001.         )
  1002.  
  1003.         (SET #InstallDocu (ASKBOOL (PROMPT #AskInstallDocuMsg)
  1004.                                                              (DEFAULT #InstallDocu)
  1005.                                                              (HELP #InstallDocuHelp)
  1006.                                             )
  1007.         )
  1008.  
  1009.         (IF (= @user-level 2)
  1010.             (
  1011.             (IF (EXISTS "LIBS:reqtools.library")
  1012.                 (SET #InstallRT2Libs 1)
  1013.             )
  1014.  
  1015.             (SET #InstallRT2Libs (ASKBOOL (PROMPT #AskInstallRT2LibsMsg)
  1016.                                                                         (DEFAULT #InstallRT2Libs)
  1017.                                                                         (HELP #InstallRT2LibsHelp)
  1018.                                                      )
  1019.             )
  1020.  
  1021.             (IF (EXISTS "LIBS:cdplayer.library")
  1022.                 (SET #InstallCDP2Libs 1)
  1023.             )
  1024.  
  1025.             (SET #InstallCDP2Libs (ASKBOOL (PROMPT #AskInstallCDP2LibsMsg)
  1026.                                                                          (DEFAULT #InstallCDP2Libs)
  1027.                                                                          (HELP #InstallCDP2LibsHelp)
  1028.                                                      )
  1029.             )
  1030.  
  1031.             (IF (EXISTS "LIBS:bgui.library")
  1032.                 (SET #InstallBGUI2Libs 1)
  1033.             )
  1034.  
  1035.             (SET #InstallBGUI2Libs (ASKBOOL (PROMPT #AskInstallBGUI2LibsMsg)
  1036.                                                                             (DEFAULT #InstallBGUI2Libs)
  1037.                                                                             (HELP #InstallBGUI2LibsHelp)
  1038.                                                      )
  1039.             )
  1040.  
  1041.             (IF (EXISTS "LIBS:popupmenu.library")
  1042.                 (SET #InstallPopUp2Libs 1)
  1043.             )
  1044.  
  1045.             (SET #InstallPopUp2Libs (ASKBOOL (PROMPT #AskInstallPopUp2LibsMsg)
  1046.                                                                              (DEFAULT #InstallPopUp2Libs)
  1047.                                                                              (HELP #InstallPopUp2LibsHelp)
  1048.                                                      )
  1049.             )
  1050.             )
  1051.         )
  1052.  
  1053.         (SET #UpdateKey (ASKBOOL (PROMPT #AskUpdateKeyMsg)
  1054.                                                          (DEFAULT #UpdateKey)
  1055.                                                          (HELP #UpdateKeyHelp)
  1056.                                         )
  1057.         )
  1058.  
  1059.  
  1060.         (IF (EXISTS "ENVARC:MusicManII")
  1061.             (SET #KonvFiles (ASKBOOL (PROMPT #AskKonvFilesMsg)
  1062.                                                              (DEFAULT #KonvFiles)
  1063.                                                              (HELP #KonvFilesHelp)
  1064.                                             )
  1065.             )
  1066.             ; else
  1067.             (SET #KonvFiles 0)
  1068.         )
  1069.  
  1070.         (IF (EXISTS "ENVARC:MusicManIII")
  1071.             (
  1072.             (SET #UpdateFiles (ASKBOOL (PROMPT #AskUpdateFilesMsg)
  1073.                                                                  (DEFAULT #UpdateFiles)
  1074.                                                                  (HELP #UpdateFilesHelp)
  1075.                                                 )
  1076.             )
  1077.  
  1078.             (IF #UpdateFiles
  1079.                 (SET #FilesDir (ASKDIR (PROMPT #AskFilesDirMsg)
  1080.                                                              (DEFAULT (TACKON #InstPath #DefFilesDir))
  1081.                                                              (HELP #AskFilesDirHelp)
  1082.                                              )
  1083.                 )
  1084.             )
  1085.             )
  1086.             ; else
  1087.             (SET #UpdateFiles 0)
  1088.         )
  1089.  
  1090.         (MESSAGE #StartInstallMsg)
  1091.  
  1092.         (MAKEDIR #InstPath)
  1093.  
  1094.         (COMPLETE 0)
  1095.  
  1096.         (IF (= #DestCPU #MC68000)
  1097.             (COPYFILES (SOURCE "data/MusicManIII.000")
  1098.                                  (DEST #InstPath)
  1099.                                  (NEWNAME "MusicManIII")
  1100.             )
  1101.             ; else
  1102.             (COPYFILES (SOURCE "data/MusicManIII.020")
  1103.                                  (DEST #InstPath)
  1104.                                  (NEWNAME "MusicManIII")
  1105.             )
  1106.         )
  1107.  
  1108.         (COMPLETE 20)
  1109.  
  1110.         (IF (= #DestLanguage #GERMAN)
  1111.             (
  1112.             (MAKEDIR (TACKON #InstPath "catalogs"))
  1113.             (MAKEDIR (TACKON #InstPath "catalogs/deutsch"))
  1114.  
  1115.             (COPYFILES (SOURCE "data/catalogs/deutsch/MusicManIII.catalog")
  1116.                                  (DEST (TACKON #InstPath "catalogs/deutsch"))
  1117.             )
  1118.  
  1119.             (COMPLETE 35)
  1120.  
  1121.             (IF #InstallOnlineHelp
  1122.                 (
  1123.                 (MAKEDIR (TACKON #InstPath "Help"))
  1124.                 (MAKEDIR (TACKON #InstPath "Help/Deutsch"))
  1125.  
  1126.                 (COPYFILES (SOURCE "data/Doc/deutsch/MusicManIII.guide")
  1127.                                      (DEST (TACKON #InstPath "Help/deutsch/"))
  1128.                                      (NEWNAME "MusicManIII_Help.guide")
  1129.                 )
  1130.                 )
  1131.             )
  1132.  
  1133.             (COMPLETE 50)
  1134.  
  1135.             (IF #InstallDocu
  1136.                 (
  1137.                 (MAKEDIR (TACKON #InstPath "Doc"))
  1138.  
  1139.                 (COPYFILES (SOURCE "data/Doc/deutsch/MusicManIII.guide")
  1140.                                      (DEST (TACKON #InstPath "Doc"))
  1141.                 )
  1142.                 )
  1143.             )
  1144.             )
  1145.             ; else
  1146.             (
  1147.             (IF #InstallOnlineHelp
  1148.                 (
  1149.                 (MAKEDIR (TACKON #InstPath "Help"))
  1150.                 (MAKEDIR (TACKON #InstPath "Help/english"))
  1151.  
  1152.                 (COPYFILES (SOURCE "data/Doc/english/MusicManIII.guide")
  1153.                                      (DEST (TACKON #InstPath "Help/english/"))
  1154.                                      (NEWNAME "MusicManIII_Help.guide")
  1155.                 )
  1156.                 )
  1157.             )
  1158.  
  1159.             (COMPLETE 50)
  1160.  
  1161.             (IF #InstallDocu
  1162.                 (
  1163.                 (MAKEDIR (TACKON #InstPath "Doc"))
  1164.  
  1165.                 (COPYFILES (SOURCE "data/Doc/english/MusicManIII.guide")
  1166.                                      (DEST (TACKON #InstPath "Doc"))
  1167.                 )
  1168.                 )
  1169.             )
  1170.             )
  1171.         )
  1172.  
  1173.         (COMPLETE 65)
  1174.  
  1175.         (IF #InstallRT2Libs
  1176.             (COPYLIB (SOURCE "data/Libs/reqtools.library")
  1177.                              (DEST "LIBS:")
  1178.             )
  1179.             ; else
  1180.             (COPYLIB (SOURCE "data/Libs/reqtools.library")
  1181.                              (DEST #InstPath)
  1182.             )
  1183.         )
  1184.  
  1185.         (COMPLETE 72)
  1186.  
  1187.         (IF #InstallCDP2Libs
  1188.             (COPYLIB (SOURCE "data/Libs/cdplayer.library")
  1189.                              (DEST "LIBS:")
  1190.             )
  1191.             ; else
  1192.             (COPYLIB (SOURCE "data/Libs/cdplayer.library")
  1193.                              (DEST #InstPath)
  1194.             )
  1195.         )
  1196.  
  1197.         (COMPLETE 76)
  1198.  
  1199.         (IF #InstallBGUI2Libs
  1200.             (IF (AND (>= #vernum 39) (= #DestCPU #MC68020))
  1201.                 (COPYLIB (SOURCE "data/Libs/bgui.library_e")
  1202.                                  (DEST "LIBS:")
  1203.                                  (NEWNAME "bgui.library")
  1204.                 )
  1205.                 ; else
  1206.                 (COPYLIB (SOURCE "data/Libs/bgui.library")
  1207.                                  (DEST "LIBS:")
  1208.                 )
  1209.             )
  1210.             ; else
  1211.             (IF (AND (>= #vernum 39) (= #DestCPU #MC68020))
  1212.                 (COPYLIB (SOURCE "data/Libs/bgui.library_e")
  1213.                                  (DEST #InstPath)
  1214.                                  (NEWNAME "bgui.library")
  1215.                 )
  1216.                 ; else
  1217.                 (COPYLIB (SOURCE "data/Libs/bgui.library")
  1218.                                  (DEST #InstPath)
  1219.                 )
  1220.             )
  1221.         )
  1222.  
  1223.         (COMPLETE 80)
  1224.  
  1225.         (IF #InstallPopUp2Libs
  1226.             (IF (>= #vernum 39)
  1227.                 (COPYLIB (SOURCE "data/Libs/popupmenu.library5")
  1228.                                  (DEST "LIBS:")
  1229.                                  (NEWNAME "popupmenu.library")
  1230.                 )
  1231.                 ; else
  1232.                 (COPYLIB (SOURCE "data/Libs/popupmenu.library")
  1233.                                  (DEST "LIBS:")
  1234.                 )
  1235.             )
  1236.             ; else
  1237.             (IF (>= #vernum 39)
  1238.                 (COPYLIB (SOURCE "data/Libs/popupmenu.library5")
  1239.                                  (DEST #InstPath)
  1240.                                  (NEWNAME "popupmenu.library")
  1241.                 )
  1242.                 ; else
  1243.                 (COPYLIB (SOURCE "data/Libs/popupmenu.library")
  1244.                                  (DEST #InstPath)
  1245.                 )
  1246.             )
  1247.         )
  1248.  
  1249.         (COMPLETE 85)
  1250.  
  1251.         (IF #UpdateKey
  1252.             (COPYFILES (SOURCE "data/MusicManIII.key")
  1253.                                  (DEST #InstPath)
  1254.             )
  1255.         )
  1256.  
  1257.         (COPYFILES (SOURCE "Registration.asc")
  1258.                              (DEST #InstPath)
  1259.         )
  1260.  
  1261.         (RUN ("echo >ENVARC:MusicManIII/Install_Dir %s" #InstPath))
  1262.  
  1263.  
  1264.         (COMPLETE 90)
  1265.  
  1266.         (IF #KonvFiles
  1267.             (RUN "data/ConvII2III")
  1268.         )
  1269.  
  1270.         (COMPLETE 95)
  1271.  
  1272.         (IF #UpdateFiles
  1273.             (RUN (CAT "data/Conv30x306 " #FilesDir))
  1274.         )
  1275.  
  1276.         (COMPLETE 100)
  1277.         )
  1278.     )
  1279.  
  1280. ;  (EXIT)
  1281. )
  1282.  
  1283.  
  1284. ; --- Main ------------------
  1285.  
  1286. (WELCOME)
  1287.  
  1288. (MESSAGE #WelcomeMsg)
  1289.  
  1290. (SET #vernum (GETVERSION))
  1291. (SET #ver (/ #vernum 65536))
  1292. (SET #rev (- #vernum (* ver 65536)))
  1293.  
  1294. (IF (EXISTS "ENV:MusicManIII/Install_Dir")
  1295.     (
  1296.     (SET @default-dest (GETENV "MusicManIII/Install_Dir"))
  1297.     (SET @default-dest (SUBSTR @default-dest 0 (- (STRLEN(@default-dest)) 1)))
  1298.  
  1299.     (SET #InstChoice (ASKCHOICE (PROMPT #AskInstChoiceMsg)
  1300.                                                             (CHOICES #InstallMMChc
  1301.                                                                              #UpdateMMChc
  1302.                                                                              #RemoveMMChc)
  1303.                                                             (DEFAULT #InstChoice)
  1304.                                                             (HELP #InstChoiceHelp)
  1305.                                      )
  1306.     )
  1307.  
  1308.     (IF (= #InstChoice #Inst_install) (p_install))
  1309.     (IF (= #InstChoice #Inst_update) (p_update))
  1310.     (IF (= #InstChoice #Inst_remove) (p_remove))
  1311.     )
  1312.     ; else
  1313.     (p_install)
  1314. )
  1315.  
  1316. (MESSAGE #Look4ARexx)
  1317.  
  1318. (EXIT)
  1319.  
  1320.