home *** CD-ROM | disk | FTP | other *** search
/ Dream 53 / Amiga_Dream_53.iso / Amiga / Workbench / DOpus / OpusMPEGA_Star.lha / opusmpega.startrek / Install < prev    next >
Text File  |  1998-05-26  |  4KB  |  132 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.8")
  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.         "Written ⌐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 BedienoberflΣche im StarTrek Design :-).\n\n"
  27.             "Die Buttonbank ben÷tigt die newicons.library 40.1 (NewIcons4 mu▀ installiert sein). "
  28.             "Fⁿr die Opus5 Workbench sind 64 oder mehr Farben empfohlen. "
  29. ))
  30. (set ButtonPrompt      "Kopiere Buttonbank ...")
  31. (set #createdir      "Erstelle Verzeichnis ...")
  32. (set #t_oldinstaller
  33.         (cat
  34.             "Die benutzte Version des Programmes Installer ist leider zu alt!"
  35.             " Ben÷tigt wird Version 43.3 oder neuer. Die Konfiguration kann"
  36.             " fortgesetzt werden, es k÷nnen allerdings Fehler auftreten!\n\n"
  37.             "M÷chten sie fortfahren?"
  38.         ))
  39. (set #t_oldinstallerhelp 
  40.         (cat
  41.             " Die aktuelle Version des Installers findest du im AMINET im util/misc Directory."
  42.             " Der aktuelle File Name ist \"Installer-43_3.lha\":\n"
  43.             " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  44.         ))
  45.  
  46. (set #exitMsg   (cat
  47.             "Aktivieren der neuen Buttonleiste:\n"
  48.             "Starte das OpusMPEGA Konfigurationsprogramm. WΣhle bei der Einstellung 'Buttonleiste wΣhlen' die Datei OpusMPEGA_image.StarTrek.\n"
  49.             "Beende OpusMPEGA, selektiere nach einen neuen Aufruf im Menⁿ des Applicationsicon den Punkt 'Player Buttonleiste'.\n\n"
  50.             "Viel Spa▀ mit OpusMPEGA\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 a new GUI for OpusMPEGA.\n\n" 
  61.             "This Plugins represents a new graphic user surface.\n"
  62.             "newicon.library V40.1 & 64 colors (256 recommended) 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"
  77.             "Run first Prefs/OpusMPEGA and select as Buttonbank 'OpusMPEGA_image.StarTrek'!\n."
  78.             "Much fun with Opus MPEGA for DirectoryOpus5.5+ wish you\nEckhard Ludwig")
  79.         )
  80. ))
  81.  
  82. ;***************************************************************************
  83.  
  84. (if (< @installer-version (+ (* 43 65536) 3))
  85. (
  86.     (if (not (askbool
  87.         (prompt #t_oldinstaller)
  88.         (help #t_oldinstallerhelp)
  89.     ))
  90.     (
  91.         (abort (cat "\n\n" #t_oldinstallerhelp))
  92.     ))
  93. ))
  94.  
  95. ;***************************************************************************
  96.  
  97. (message #intro1 "\n\n" #INFO)
  98. (welcome)
  99.  
  100.  
  101. ;***************************************************************************
  102. ; copy buttons
  103. ;***************************************************************************
  104.  
  105. (copyfiles
  106.        (prompt ButtonPrompt)
  107.        (help @copyfiles-help)
  108.          (source "buttons")
  109.          (dest (tackon #defaultdest "Buttons"))
  110.          (optional "force" "askuser")
  111.          (safe)
  112.          (pattern "#?")
  113.          (files)
  114. )
  115.  
  116. (makedir (tackon #defaultdest "Images/OpusMPEGA.StarTrek")
  117.  (prompt #createdir)
  118. )
  119.  
  120. (copyfiles
  121.        (prompt ButtonPrompt)
  122.        (help @copyfiles-help)
  123.          (source "Images/OpusMPEGA.StarTrek")
  124.          (dest (tackon #defaultdest "Images/OpusMPEGA.StarTrek"))
  125.          (optional "force" "askuser")
  126.          (safe)
  127.          (pattern "#?")
  128.          (files)
  129. )
  130.  
  131. (exit #exitMsg (quiet))
  132.