home *** CD-ROM | disk | FTP | other *** search
/ Dream 52 / Amiga_Dream_52.iso / Amiga / Workbench / DOpus / OpusMPEGA_Plug.lha / opusmpega_plugins / Install < prev    next >
Text File  |  1998-05-01  |  4KB  |  131 lines
  1. ;***************************************************************************
  2. ; * $VER: Install Plug-Ins (04-31-98)
  3. ; * Script written by Eckhard Ludwig
  4. ;***************************************************************************
  5.  
  6. (set #defaultdest "DOpus5:")
  7. (set #current_version "3.1")
  8. (set #lng @language)
  9.  
  10. ;****************************************************************************
  11.  
  12. (set #intro1 (cat 
  13.         "Opus MPEGA PPC " 
  14.         #current_version 
  15.         "\nThe Definitive MPEG Audio Player for Directory Opus5\n"
  16.         "⌐1998 by Eckhard Ludwig"
  17.         ))
  18.  
  19. ;***************************************************************************
  20. ; deutsche Texte
  21. ;***************************************************************************
  22.  
  23. (if (= #lng "deutsch")
  24. (
  25. (set #Opt 1)
  26. (set #INFO  (cat    "Dieser Skript installiert eine neue OberflΣche (Knopfbank).\n\n"
  27.             "Die Knopfbank ben÷tigt die newicons.library 40.1 (Newicons mu▀ installiert sein).\n"
  28.             "Fⁿr die Opus5 Workbench sind 256 oder mehr Farben empfohlen. "
  29.             "Weniger Farben sollten mit 'Einstellungen fⁿr Newicons/Bild dithern' m÷glich sein."
  30. ))
  31. (set ButtonPrompt      "Kopiere Buttonbank ...")
  32. (set #createdir      "Erstelle Verzeichnis ...")
  33. (set #t_oldinstaller
  34.         (cat
  35.             "Die benutzte Version des Programmes Installer ist leider zu alt!"
  36.             " Ben÷tigt wird Version 43.3 oder neuer. Die Konfiguration kann"
  37.             " fortgesetzt werden, es k÷nnen allerdings Fehler auftreten!\n\n"
  38.             "M÷chten sie fortfahren?"
  39.         ))
  40. (set #t_oldinstallerhelp 
  41.         (cat
  42.             " Die aktuelle Version des Installers findest du im AMINET im util/misc Directory."
  43.             " Der aktuelle File Name ist \"Installer-43_3.lha\":\n"
  44.             " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  45.         ))
  46.  
  47. (set #exitMsg   (cat
  48.             "Aktivieren der neuen Buttonleiste:\n\n"
  49.             "WΣhle im Menⁿ des Applicationsicon den Punkt 'Player Knopfleiste'.\n\n"
  50.             "Viel Spa▀ mit Opus MPEGA\nfⁿr Directory Opus5.5+ wⁿnscht\nEckhard Ludwig")
  51.         )
  52. )
  53.  
  54. ;******************************************************************************************************
  55. ; english
  56.  
  57. (
  58. (set #Opt 2)
  59.  
  60. (set #info     (cat     "You install the first plug-ins for OpusMPEGA.\n\n" 
  61.             "This Plugins represents a new graphic user surface.\n"
  62.             "newicon.library V40.1 is required!\n"
  63. ))
  64.  
  65. (set ButtonPrompt      "Copy buttons ...")
  66. (set #createdir      "Create Dir ...")
  67.  
  68. (set #t_oldinstaller
  69.         (cat
  70.             " You have an old version of the Installer. I'll probably"
  71.             " need version 43.3 or greater. You can continue anyway"
  72.             " but there is no guarantee it will work as it's supposed"
  73.             " to do.\n\n"
  74.             " Do you wish to continue anyway?"
  75.     ))
  76. (set #exitMsg   (cat    "The new GUI is called over the OpusMPEGA appicon with selection of the menu option 'Player buttons'.\n\n"
  77.             "Much fun with Opus MPEGA for DirectoryOpus5.5+ wish you\nEckhard Ludwig")
  78.         )
  79. ))
  80.  
  81. ;***************************************************************************
  82.  
  83. (if (< @installer-version (+ (* 43 65536) 3))
  84. (
  85.     (if (not (askbool
  86.         (prompt #t_oldinstaller)
  87.         (help #t_oldinstallerhelp)
  88.     ))
  89.     (
  90.         (abort (cat "\n\n" #t_oldinstallerhelp))
  91.     ))
  92. ))
  93.  
  94. ;***************************************************************************
  95.  
  96. (message #intro1 "\n\n" #INFO)
  97. (welcome)
  98.  
  99.  
  100. ;***************************************************************************
  101. ; copy buttons
  102. ;***************************************************************************
  103.  
  104. (copyfiles
  105.        (prompt ButtonPrompt)
  106.        (help @copyfiles-help)
  107.          (source "buttons")
  108.          (dest (tackon #defaultdest "Buttons"))
  109.          (optional "force" "askuser")
  110.          (safe)
  111.          (pattern "#?")
  112.          (files)
  113. )
  114.  
  115. (makedir (tackon #defaultdest "Images/OpusMPEGA.images")
  116.  (prompt #createdir)
  117. )
  118.  
  119. (copyfiles
  120.        (prompt ButtonPrompt)
  121.        (help @copyfiles-help)
  122.          (source "Images/OpusMPEGA.images")
  123.          (dest (tackon #defaultdest "Images/OpusMPEGA.images"))
  124.          (optional "force" "askuser")
  125.          (safe)
  126.          (pattern "#?")
  127.          (files)
  128. )
  129.  
  130. (exit #exitMsg (quiet))
  131.