;***************************************************************************
; * $VER: Player-Setup for Opus MPEGA (OpusMPEGA.dopus5) 3.9
; * Script written by Eckhard Ludwig
;***************************************************************************

(set current_version "3.9")
(set lng @language)
;****************************************************************************

(set #intro1 (cat "\n\Opus MPEGA Preferences " current_version "\n******************************\nWritten by Eckhard Ludwig"))

;***************************************************************************
; deutsche Texte                               *****************************
;***************************************************************************

(if (= lng "deutsch")
(
(set PrefsPrompt  (cat  "Willkommen zum Konfigurationsprogramm für OpusMPEGA 3.9.\n\n"
			"Wählen sie die gewünschte Wiedergabe für mpeg Audio und für Samples.\n"
			"Unterstützte Formate: mp2 mp3 AIFF 8SVX MAUD WAVE CDDA VOC AU, soweit entsprechende Filetypes installiert sind."
))

(set PlayerPrompt       "mpeg Audio Playerwahl:\n======================\nWählen sie einen Player, oder für MPEGA eine Soundkarte aus. Siehe unter Hilfe.")
(set PlayerL3Prompt     "mp3 Audio Playerwahl:\n======================\nWählen sie den Player bzw. für MPEGA direkt eine Soundkarte aus. Siehe unter Hilfe.")

(set PlayerHelp         (cat
			"MPEG-Karten\n===========\n"
			"mp2 wird direkt per Hardwaredekodierung von den Karten Melody und PeggyPlus, sowie dem CD32 mit FMV-Modul unterstützt.\n"
			"Wählen sie für diese Karten MPEGPlay oder den neueren AMPlifier by Thorsten Hansen.\n"
			"Für die Melody Soundkarte kann für mp3 Ampilifier oder MPEGA gewählt werden, für PowerUP wird WarpAMP wmpfohlen.\n\n"
			"Power PC\n========\n"
			"Für Soundkarten oder Amigaaudio und PowerUP Systeme (PPC 603+) wählen sie den Player WarpAMP (Freeware ©1998 by Steffen Haeuser)."
			" Dieser Player läuft unter WarpUP-WarpOS (©1998 Haage & Partner Computer GmbH, Freeware).\n"
			"Für Nutzung unter ppc.library wählen sie PPC MPEGplayer. Dieser Player wird auf der PowerUP CDROM original mitgeliefert.\n"
			"Der PPC Player wird für die mp2 und mp3 Audiowiedergabe benutzt.\n\n"
			"Hinweis:\nSoweit sie über eine MPEG-Karte verfügen, wählen sie für"
			" diese direkt einen Player (siehe oben unter MPEG-Karten). Den PPC Player wählen sie dann im nächsten Schritt unter mp3 Playerwahl.\n\n"
			"Die Soundkarte für PPC wird im nächsten Schritt über UNIT gewählt, und diese ist mit dem AHI Konfigurationsprogramm entsprechend einzustellen"
			" (Für WarpAMP kann die Soundkarte Prelude direkt, oder AHI UNIT0 gewählt werden).\n\n"
			"68k Amiga\n=========\n"
			"Für 68k Systeme wird die Auswahl des Players AMPlifier by Thorsten Hansen empfohlen."
			" Dieser Player benötigt die mpega.library, und benutzt für Soundkarten oder Amigaaudio das AHI audio system V4.14+ by Martin Blom."
			" Die gewünschte Soundkarte/Amigaaudio ist mit dem AHI Konfigurationsprogramm unter UNIT (0-3) zu wählen."
			" Welcher UNIT benutzt wird und weitere Einstellungen erfolgen direkt im Menü Einstellungen von AMPlifier.\n\n"
			"Der Players MPEGA V3.3+ by Stephane Tavenard kann direkt mit der gewünschten Soundkarte gewählt werden.\n"
			"Optionen für AHI bzw. Amigaaudio werden im nächsten Schritt gewählt.\n"
			"Für mp2 und mp3 kann jeweils ein Player oder gesonderte Optionen gewählt werden."
	))

(set UnitPrompt		"Konfiguration für PPC:\n================================\n\nBitte auswählen. Siehe ausführliche Hilfe.\n")
(set UnitHelp	(cat	"PowerUP\n=======\n"
			"Wählen Sie für den PPCMpegPlayer eines der Units 0 bis 3.\n"
			"Für WarpAMP kann UNIT 0 oder direkte Unterstützung der Soundkarte Prelude gewählt werden.\n"
			"Wenn sie noch kein Unit anderweitig verwenden, sollten sie Unit 0 einstellen.\n\n"
			"AHI\n===\n"
			"Eine korrekt installierte AHI Konfiguration ist Grundvoraussetzung für eine gute Audiowiedergabe.\n"
			"Starten Sie nach Abschluß dieser Konfiguration das AHI Setup Programm im Prefs-Verzeichnis."
			"Wählen sie das entsprechende Unit (nicht den Musikunit!) und dazu einen der Fast Stereo++ AudioModes aus,"
			" der sich mit der Soundkarte verträgt.\n"
			"Stellen sie die Samplingrate entsprechend ihrer MPEG-Files ein. Normalerweise ist dies 44100Hz.\n\n"
			"AMPlifier\n=========\n"
			"Wählen sie die verfügbare MPEG-Karte, ansonst AHI. Die MPEG-Karte wird für Layer-2 im Konfigurationsprogramm"
			" (siehe direkt im AMPlifier Menü die Auswahl) gesetzt, für Layer-3 wird die gewünschte Wiedergabe ebenfalls dort ausgewählt!"
))

(set AMPPlayPrompt	(cat
			"\nSetzen der Playerpfade:\n=======================\n\n"
			"Bitte wählen Sie die Schublade aus, wo der Player AMPlifier (© 1998 by Thorsten Hansen) installiert wurde, oder 'Weiter'!"
))
(set AMPPlayERROR	(cat
			"\nFehlerhafte Auswahl:\n====================\n\n"
			"AMPlifier ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch!\n\n"
			"Soll ich die Voreinstellung \"C:AMPlifier\" benutzen, falls sie den Player noch nicht installiert haben?\n\n"
			"Mit 'Nein' können sie erneut eine Schublade auswählen."
))
(set MPEGPlayPrompt     (cat
			"\nSetzen der Playerpfade:\n=======================\n\n"
			"Zur Wiedergabe über die Soundkarte Melody, über die MPEG-Karte Peggy-Plus und über das CD32 FMV-Modul haben sie den Player MPEGPlay (© 1997 by Thorsten Hansen) gewählt.\n\n"
			"Bitte wählen Sie die Schublade aus, wo MPEGPlay installiert wurde, oder 'Weiter'!"
))
(set MPEGPlayERROR      (cat
			"\nFehlerhafte Auswahl:\n====================\n\n"
			"MPEGPlay ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch!\n\n"
			"Soll ich die Voreinstellung \"C:MPEGPlay\" benutzen, falls sie MPEGPlay noch nicht installiert haben?\n\n"
			"Mit 'Nein' können sie erneut eine Schublade auswählen."
))

(set MPEGPrompt     	"mp2 MPEGPlay Konfiguration:\n===========================\n\nWählen sie die Soundkarte aus. mp2 Wiedergabe erfolgt über den Player MPEGPlay (©1997 by Thorsten Hansen) per Hardwaredekodierung.\n")
(set AMPPrompt     	"Amplifier Konfiguration:\n========================\n\nWählen sie die Soundkarte oder AHI aus. Wiedergabe erfolgt über den Player AMPlifier (©1998 by Thorsten Hansen). Siehe Hilfe.\n")

(set PlayMPEGAPrompt    (cat
			"\nSetzen der Playerpfade:\n=======================\n\n"
			"Zur Analyse der mpeg Audiodateien (notwendig für MPEGA, Power-PC und MPEG-Karten), und zur Wiedergabe über Amigaaudio bzw."
			" AHI audio system V4.14+ wird der Player MPEGA ab V3.3 by Stephane TAVENARD benutzt.\n\n"
			"Bitte wählen Sie den Pfad zu der für ihren Amiga geeigneten Version von MPEGA aus!"
			" Die FPU Versionen sind langsamer und sollten daher nicht benutzt werden."
))
(set #PlayMPEGAPrompt   "Bitte MPEGA auswählen oder Weiter.")
(set PlayMPEGAERROR     (cat
			"\nFehlerhafte Auswahl:\n====================\n\n"
			"MPEGA ist nicht unter dem gewählten Namen installiert, oder die Schublade ist falsch!\n"
			"Soll ich die Voreinstellung benutzen, falls sie MPEGA noch nicht installiert haben?\n\n"
			"Mit 'Nein' können sie erneut den Pfad auswählen.\n"
			"Voreinstellung: "
))

(set #PlaySelectPrompt  "Bitte Schublade auswählen oder Weiter.")
(set Play16Prompt  	(cat
			"\nSetzen der Playerpfade:\n=======================\n\n"
			"Die Wiedergabe von Samples der Formate IFF 8SVX, WAVE, AIFF, VOC, AU und MAUD erfolgt über den Player Play16 by Thomas Wenzel.\n\n"
			"Bitte wählen Sie den Pfad zu Play16 aus!"
))
(set Play16ERROR      	(cat
			"\nFehlerhafte Auswahl:\n====================\n\n"
		      	"Play16 ist nicht in der gewählten Schublade installiert, oder der Name ist fehlerhaft!\n\n"
			"Soll ich die Voreinstellung benutzen, falls sie das Programm noch nicht installiert haben?\n\n"
			"Mit 'Nein' können sie erneut auswählen."
))
(set Play16Version	(cat
			"\nVersionserror:\n==============\n\n"
			"Die Version von Play16 ist kleiner V1.8!\n"
			"Es können Probleme auftreten.\n\n"
			"Installieren sie schnellstmöglich V1.8 oder neuer!"
))
(set WarpAMPPrompt  	(cat
			"\nSetzen der Playerpfade:\n=======================\n\n"
			"Zur MPEG Wiedergabe für Power-PC wird entsprechend ihrer Auswahl WarpAMP by Steffen Haeuser (ab der Version 0.9) benutzt.\n\n"
			"Bitte wählen Sie die Schublade aus, in welcher das Programm installiert wurde!"
))
(set WarpAMPERROR      	(cat
			"\nFehlerhafte Auswahl:\n====================\n\n"
		      	"WarpAMP ist nicht in der gewählten Schublade installiert!\n\n"
			"Soll ich die Voreinstellung benutzen, falls sie das Programm noch nicht installiert haben?\n\n"
			"Mit 'Nein' können sie erneut eine Schublade auswählen."
))
(set WarpAMPVersion	(cat
			"\nVersionserror:\n==============\n\n"
			"Die Version von WarpAMP ist kleiner V0.9!\n"
			"Ältere WarpAMP Versionen haben Probleme mit bestimmten Zeichen innerhalb des Dateinamen.\n\n"
			"Installieren sie schnellstmöglich V0.9 oder neuer!"
))
(set PlayPPCPrompt  	(cat
			"\nSetzen der Playerpfade:\n=======================\n\n"
			"Zur MPEG Wiedergabe für Power-PC wird der auf der PowerUp CDROM beiliegende PPCMpegPlayer benutzt.\n\n"
			"Bitte wählen Sie die Schublade aus, in welcher die Programme PPCMpegPlayer und PPCMpeg.elf installiert wurden!"
))
(set PlayPPCERROR      (cat
			"\nFehlerhafte Auswahl:\n====================\n\n"
		      	"PPCMpegPlayer ist nicht in der gewählten Schublade installiert!\n\n"
			"Soll ich die Voreinstellung benutzen, falls sie die Programme noch nicht installiert haben?\n\n"
			"Mit 'Nein' können sie erneut eine Schublade auswählen."
))

(set BREAKPrompt	"Bitte wählen Sie die Schublade aus, wo BreakName (1994 by Kai Iske, Public Domain) installiert wurde, oder Weiter!"
)
(set BREAKERROR     	(cat
			"\nFehlerhafte Auswahl:\n====================\n\n"
			"\'BreakName' ist nicht installiert, oder der gewählte Dateipfad ist falsch!\n\n"
			"Soll ich die Voreinstellung \"C:BreakName\" benutzen, falls sie das Tool noch nicht installiert haben?\n"
			"Mit 'Nein' können sie erneut eine Schublade auswählen."
))

(set HELPPrompt    	"Die Guide zu Opus MPEGA ist nicht im Help-Verzeichnis von DOpus5 installiert. Bitte wählen Sie die Schublade aus, wo die Guide installiert wurde, oder Weiter!")
(set HELPERROR   	(cat  	
			"\nFehlerhafte Auswahl:\n====================\n\n"
			"OpusMPEGA.guide ist nicht installiert, oder der gewählte Dateipfad ist falsch!\n\n"
			"Soll ich die Voreinstellung \"DOpus5:Help\" benutzen, falls sie die Guide nicht installiert haben?\n"
			"Mit 'Nein' können sie erneut eine Schublade auswählen."
))

(set SETUPPrompt	(cat
		    	"Das Prefs Programm OpusMPEGA wurde nicht im Prefs Verzeichnis der Workbench installiert."
			" Bitte wählen Sie die Schublade aus, wo OpusMPEGA installiert wurde, oder Weiter!"
))
(set SETUPERROR		(cat
			"\nFehlerhafte Auswahl:\n====================\n\n"
		     	"Das OpusMPEGA Konfigurationsprogramm ist nicht installiert, oder der gewählte Dateipfad ist falsch!\n\n"
			"Soll ich die Voreinstellung \"SYS:Prefs\" benutzen, falls sie dieses noch nicht installiert haben?\n"
			"Mit 'Nein' können sie erneut eine Schublade auswählen."
))

(set CounterPrompt    	"Opus Lister:\n============\n\nBitte wählen, ob der Timer im Fortgangsindikator vor- oder rückwärts zählt?!\n")
(set #COUNT1     	"Vorwärts")
(set #COUNT2 	    	"Rückwärts")

(set PLAYOFFPrompt    	"Opus Command:\n=============\n\nWählen Sie, ob der interne Directory Opus Befehl Play ersetzt werden soll. Falls sie den Befehl nicht ersetzen, sollten sie gemäß Anleitung einen MPEG Audioplayer Button installieren.\n")
(set #PLAYOFF1    	"Play ersetzen")
(set #PLAYOFF2	    	"Play belassen")
(set ICONOFFPrompt     	"Opus Appicon:\n=============\n\nSoll bereits bei Programmstart das OpusMPEGA Appicon, oder erst mit Auswahl von Audiofiles, oder überhaupt kein Appicon dargestellt werden?\n")
(set #ICON1     	"Applicationsicon mit Opus5 Start")
(set #ICON2 	    	"Applicationsicon mit Auswahl")
(set #ICON3		"Kein Applicationsicon")

(set HIDEPrompt		"Playliste\n=========\n\nSoll die Playliste mit Auswahl von Audiofiles geöffnet werden?\nIconifizierter Start erfordert Opus Magellan!\n")
(set #HIDE1		"Playliste iconifiziert bei Start")
(set #HIDE2		"Playliste geöffnet bei Start")
(set LOADPATHPrompt    	"Sie können ihr bevorzugtes Verzeichnis für mpeg Audiofiles oder Samples wählen. Dieses wird bei Anwahl des Menüpunktes Öffne File(s) im PopUp Menü des AppIcon, oder dem Load Button für Buttonbänke ab V3.9 aufgelistet.")

(set LISTERPrompt    	"Opus Lister:\n============\n\nWählen sie, welche Informationen innerhalb eines Abspielfensters (Titelliste) dargestellt werden.\n")
(set #LIST1	    	"ID3 Tag Informationen")
(set #LIST2	    	"Größe in Bytes")
(set #LIST3	    	"Dateikommentar")

(set #AMTAGPrompt	"Wählen sie den Pfad zu dem externen Programm 'AmTAGID3' by Georges Goncalves, oder Weiter. Siehe Hilfe!")
(set #AMTAGHelp	(cat
			"Das Programm ermöglicht, die ID3 Taginfo des aktuellen Song und den Amiga Dateikommentar zu verändern.\n"
			"Nur wenn sie das Programm auswählen, wird auch die Option im ID3 Requester zur Verfügung gestellt."
))

(set #ButtonPrompt	"Wählen sie eine Buttonleiste aus. Diese wird u.a. über den Menüpunkt 'Player Buttonleiste' des AppIcon geöffnet. Siehe Hilfe!")
(set #ButtonHelp	(cat
			"Wenn kein Appicon dargestellt wird, kann die Knopfleiste über das Opus5 Menü [Knöpfe/Laden] gewählt werden.\n"
			"Der Aufruf kann auch in beliebige Opus5 Benutzermenüs oder Knopfbänke (Docks) integriert werden, siehe Guide.\n\n"
			"Über die Player Buttonleiste kann OpusMPEGA komplett gesteuert werden, analog zu einem CD Audioplayer.\n\n"
			"Für die Buttonleisten stehen verschiedene Design's zur Auswahl, in den Formaten Standard, MagicWB und NewIcons.\n"
			"Newicons bietet die besten Farben. Die Berechnung der Farbpalette bei Aufruf der Buttonleiste erfordert einen schnellen Prozessor, 68060 empfohlen.\n\n"
			"Der Name grafischer Buttonleisten beginnt mit 'OpusMPEGA_image.', als Suffix steht das Design."
))

(set ID3Prompt		(cat
			"ID3 Tag Informationen:\n======================\n"
			"Tragen sie das gewünschte Format ein, siehe Hilfe.\n\n"
			"%1 = Interpret  %2 = Titel\n"
			"%3 = Album      %4 = Kategorie\n"
			"%5 = Kommentar  %6 = Jahr   "
))
(set ID3Help		(cat
			"Die Darstellung innerhalb der Playliste kann frei eingestellt werden.\n"
			"Für samples und soweit keine mp3 ID Tag Informationen verfügbar sind, wird der Filename, Filetype und der Filekommentar dargestellt."
))
(set #t_oldinstaller	(cat
			"Die benutzte Version des Programmes Installer ist leider zu alt!"
			" Benötigt wird Version 43.3 oder neuer. Die Konfiguration kann"
			" fortgesetzt werden, es können allerdings Fehler auftreten!\n\n"
			"Möchten sie fortfahren?"
	))
(set #t_oldinstallerhelp (cat
			" Die aktuelle Version des Installers finden sie im AMINET im util/misc Directory."
			" Der aktuelle File Name ist \"Installer-43_3.lha\":\n"
			" <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
	))

(set #NOGAIP		(cat
			"\nDie Auswahl für Soundkarten benötigt das Programm GAIP16 by Thomas Wenzel (Installiert in SYS:C)!\n\n"
			"Sie finden das Programm im OpusMPEGA Archiv Verzeichnis C oder im play16 Archiv.\n\n"
			"Sie können die ModeID für die gewünschte Soundkarte im nächsten Schritt direkt eintragen.\n"
			"Voreingestellt ist Amiga 8bit Mono. Siehe im nächsten Schritt unter Hilfe."
	))
(set #GAIP16		"Soundkarten AHI Auswahlrequester")
(set #AHIPrompt      	"AHI Konfiguration:\n==================\nWählen sie den gewünschten AHI Wiedergabemodus für Ihre Soundkarte:\n")
(set AmigaPrompt      	"Wählen sie den gewünschten Wiedergabemodus aus:")
(set AHIPrompt      	" Für AHI gewählte ModeID:\n================================")
(set AHIHelp		(cat
			"Anzeige dient der Kontrolle. Für MPEGA wird ein Hexwert, für Play16 der Dezimalwert eingetragen!\n\n"
			"Die Auswahl von Filesave: oder PAULA: führt zu fehlerhaften Werten!\n\n"
			"Bei leeren Feld ermitteln sie die MODEID, wie in der Dokumentation zu MPEGA bzw. Play16 beschrieben.\n\n"
			"Wählen sie Weiter!"
	))
(set PLAY16_1Prompt     "Play16 Konfiguration:\n=========================\n\nWählen sie ein Ausgabegerät wie Paula, Soundkarte oder AHI aus.\n")
(set PLAY16_2Prompt     "Play16 Konfiguration:\n=========================\n\nDie Prozess Priorität für den Play16 Audioplayer sollte nur durch erfahrene Anwender geändert werden!\n")
(set PLAY16_3Prompt     "Play16 Konfiguration:\n=========================\n\nSoll ein Standard Productivity Screen während der Wiedergabe geöffnet werden? Nur sinnvoll für Grafikkarten.\n")
(set PLAY16_4Prompt     "Play16 Konfiguration:\n=========================\n\nFür eingestellten 15KHz Screenmode bitte PAL Screen wählen!\nSamples über 28KHz werden halbiert.\n")
(set PLAY16_5Prompt     "Play16 Konfiguration:\n=========================\n\nSoll das Amiga Audiofilter ein, aus oder automatisch geschaltet werden?\n")
(set #FILTER		"Nicht ändern")
(set MPEG_1Prompt       "MPEGA Konfiguration:\n========================\n\nWählen Sie die mögliche Ausgabequalität, je nach CPU-Typ.\nBei Wiedergabe Problemen die niedrigere Qualität auswählen.\n")
(set MPEG_2Prompt       "MPEGA Konfiguration:\n========================\n\nWählen Sie die Ausgabefrequenz.\n")
(set MPEG_3Prompt       "MPEGA Konfiguration:\n========================\n\nDie Prozess Priorität für MPEGA sollte nur durch erfahrene Anwender geändert werden!\n")
(set MPEG_4Prompt       "MPEGA Konfiguration:\n========================\n\nWählen sie Mono oder Stereo Wiedergabe!\n")
(set MPEG_5Prompt       "MPEGA Konfiguration:\n========================\n\nFür eingestellten 15KHz Screenmode bitte PAL Screen wählen!\nSamples über 28KHz werden halbiert.\n")
(set #askchange		(cat
			"Konfiguration beenden\n=====================\n\n"
			"Die Konfiguration für Opus MPEGA wurde erfolgreich abgeschlossen.\n"
			"Zur Übernahme der neuen Einstellungen beenden Sie gegebenenfalls Opus MPEGA zuerst (Menüpunkt Schließen)!\n"
))
(set #loop1		"Konfiguration beenden")
(set #loop2		"Konfiguration wiederholen")

)

;******************************************************************************************************
; english

(
(set PrefsPrompt (cat	
			"Welcome to the configuration utilitie for OpusMPEGA 3.9.\n\n"
			"Select they desired playback for MPEG audio and for Samples.\n"
			"Supported formats: mp2 mp3 AIFF 8SVX MAUD WAVE CDDA VOC AU, so far appropriate of filetypes are installed.\n"
			"English translation by http://www.systransoft.com"
))
(set PlayerPrompt       "mpeg Audio Player:\n======================\nSelecting it a Player, or for MPEGA a sound card out. See under Help....")
(set PlayerL3Prompt     "mp3 Audio Player:\n======================\nSelecting it the Player or for MPEGA directly a sound card out. See under Help....")
(set PlayerHelp         (cat "MPEG cards:\n=============\n"
			"mp2 becomes direct by hardware decoding of the cards Melody and PeggyPlus, as well as the CD32 with FMV module supports.\n"
			"Select they for these cards MPEGPlay or the newer AMPlifier by Thorsten Hansen."
			" For the Melody sound card can be selected for mp3 Ampilifier or MPEGA, for powerPC becomes WarpAMP.\n\n"
			"Power PC\n========\nFor sound cards or Amiga audio and powerPC systems (PPC 603+)"
			" select them the Player WarpAMP (Freeware ©1998 by Steffen Haeuser)."
			" This Player runs under WarpUP WarpOS (©1998 Haage & Partner computer GmbH, Freeware).\n"
			"For use under ppc.library they select PPCMPEGplayer. This Player is provided on the powerUP CDROM."
			" The PPC Player is used for the mp2 and mp3 audio playback.\n"
			"Note: As far as they have a MPEG card, they select a Player for these directly (see above under MPEG cards)."
			" They select the PPC Player then in the next step under mp3 Player."
			" The sound card for PPC is selected in the next step over UNIT, and this is with the AHI"
			" configuration program to adjust accordingly (for WarpAMP the sound card Prelude can be selected directly, or AHI UNIT0).\n\n"
			"68k Amiga\n=========\nFor 68k of systems is recommended the selection of the player AMPlifier by to Thorsten Hansen."
			" This Player needs mpega.library, and uses for sound cards or Amiga audio the AHI audio system V4.14+ by Martin Blom."
			" The desired sound card/Amiga audio is with the AHI configuration program under UNIT (0-3) to be selected."
			" Which UNIT is used and further adjustments to take place directly in the menu adjustments of AMPlifier.\n"
			"The Players MPEGA V3.3+ by Stephane Tavenard can be selected directly with the desired sound card."
			" Options for AHI or Amiga audio are selected in the next step."
			" For mp2 and mp3 a Player or separate options can be selected in each case."
	))

(set UnitPrompt		"Configuration for PPC:\n================================\n\nPlease select.  See detailed Help....\n")
(set UnitHelp	(cat	"PowerUP\n=======\n"
			"First of all run the AHI setup program in your Prefs drawer. Select one of the units from 0 to 3 but not the Music unit."
			" For WarpAMP UNIT 0 or direct support of the sound card Prelude can be selected."
			" If you don't use unit 0 for anything already I recommend using that one.\n"
			"AHI\n===\n"
			"Select one of the fast stereo++ audiomodes that matches your audio hardware."
			" Now you need to know what sampling rate most of your MPEG files have. Probably it's 44100 Hz because that's the standard CD rate.\n"
			"It is important to set the frequency slider to your mostly used frequency."
			" For example, if you're going to playback lots of 44100 Hz MPEGs, set the Frequency slider to 44100 Hz.\n"
			"If you don't plan to have several programs playing back audio at the same time, please leave the Channels slider at position 1."
			" The remaining settings depend on your audio hardware.\n"
			"AMPlifier\n=========\nSelecting it the available MPEG card, or AHI."
			" The MPEG card is set for Layer-2 in the configuration program (see in"
			" the AMPlifier menu the selection direct), selected likewise there for"
			" Layer-3 desired playback!"
	))
(set AMPPlayPrompt	(cat
			"\nSetting the player path:\n==========================\n\n"
			"You select please the drawer, where the player AMPlifier (© 1998 by Thorsten Hansen) was installed, or Proceed."
	))
(set AMPPlayERROR	(cat
			"\nIncorrect selection:\n====================\n\n"
			"AMPlifier is not installed or under a deviating name, or the selected drawer is false!"
			" Am I to use the default \"C:AMPlifier\", if they did not install the Player yet?"
			" With 'no' they can select a drawer again"
	))
(set MPEGPlayPrompt     (cat
			"Setting the player path\n=======================\n"
			"To playback over the sound card Melody, over the MPEG card Peggy plus and over the CD32 FMV module selected"
			" them the Player MPEGPlay (© 1997 by Thorsten Hansen).\n"
			" Please you select the drawer, where MPEGPlay was installed, or 'Proceed'!"
	))
(set MPEGPlayERROR 	"\nMPEGPlay is not installed or under a deviating name, or which is selected drawer falsely!\n\nI the default \"C:MPEGPlay\" uses, if they cannot select MPEGPlay yet installed?\n\nWith 'no' it again a drawer.")
(set MPEGPrompt     	"mp2 MPEGPlay configuration:\n===========================\n\nSelecting it the sound card from mp2 playback is made by the Player MPEGPlay (©1997 by Thorsten Hansen) by hardware decoding.\n")
(set AMPPrompt     	"Amplifier configuration:\n========================\n\nSelecting it the sound card or AHI out. Playback is made by the Player AMPlifier (©1998 by Thorsten Hansen). See Help....\n")
(set PlayMPEGAPrompt    (cat
			"\nSetting the player path:\n=======================\n\n"
			"To the analysis of the MPEG audio files (necessary for MPEGA, powerPC and MPEG cards), and to"
			" playback over Amiga audio or AHI audio system V4.14+ is used the Player MPEGA starting from V3.3"
			" by Stephane TAVENARD. Please you select the path to the version suitable for their Amiga of MPEGA!"
			" The FPU versions is slower and should not not be used therefore!"
	))
(set #PlayMPEGAPrompt   "Please select MPEGA path or Proceed.")
(set PlayMPEGAERROR 	"Incorrect selection:\n====================\nMPEGA is not installed under the selected name, or which is selected drawer false!\n\nI the default uses, if they do not know MPEGA yet installed?\n\nWith 'no' it again the path.\n\nDefault: ")
(set Play16Prompt  	(cat
			"\nSetting the Player path:\n=======================\n\n"
			"The playback of Samples of the formats IFF 8SVX, WAVE, AIFF, VOC, AU and MAUD is made by the Player"
			" Play16 by Thomas Wenzel.\n\nPlease you select the path to Play16!"
	))
(set Play16ERROR      	(cat
			"\nIncorrect selection:\n====================\n\n"
			"Play16 is not installed in the selected drawer, or the name is incorrect!\n\n"
			"Am I to use the default, if they did not install the program yet?\n\n"
			"With 'no' they can again select."
	))
(set Play16Version	(cat
			"\nVersion error:\n==============\n\n"
			"The version of Play16 is small V1.8!\n"
			"Problems can occur. Install they as fast as possible for V1.8 or more again!"
	))
(set WarpAMPPrompt  	(cat
			"\nSetting the player path:\n=======================\n\n"
			"To MPEG playback for powerPC is used according to its selection WarpAMP by Steffen Haeuser" 
			" (starting from the version 0.9).\n\n"
			"Please you select the drawer, in which the program was installed!"
	))
(set WarpAMPERROR      	(cat
			"\nIncorrect selection:\n====================\n\n"
			"WarpAMP is not installed in the selected drawer!\n\n"
			"Am I to use the default, if they did not install the program yet?\n\n"
			"With 'no' they can select a drawer again."
	))
(set WarpAMPVersion	(cat
			"\nVersion error:\n==============\n\n"
			"The version of WarpAMP is small V0.9!\n"
			"Older WarpAMP versions has problems with certain characters within file names.\n\n"
			"Install they as fast as possible for V0.9 or more again!"
	))
(set PlayPPCPrompt  	(cat
			"Setting the player path:\n=======================\n"
			"To MPEG playback for powerPC is used on the PowerUp CDROM which are attached PPCMpegPlayer.\n"  
			"Please you select the drawer, in which the programs PPCMpegPlayer and PPCMpeg.elf were installed!"
	))

(set #PlaySelectPrompt  "Please select drawer or Proceed.")
(set PlayPPCERROR 	"Incorrect selection:\n====================\nPPCMpegPlayer is not installed in the selected drawer!\nAm I to use the default, if they did not install the programs yet?\nWith 'no' they can select a drawer again.")
(set #NOGAIP		(cat
			"The selection for sound cards needs the program GAIP16 by Thomas Wenzel (installs in SYS:C)!\n\n"
			"They find the program in the OpusMPEGA file directory C or in the play16 filepaket.\n"
			"They can directly enter the mode ID for the desired sound card in the next step."
			" Amiga 8-bit mono is preset."
	))
(set BREAKPrompt    	"OpusMPEGA needed the Tool BreakName (©1994 by Kai Iske, Public Domain). Please select the drawer where BreakName was installed, or 'Proceed'!")
(set BREAKERROR 	"Incorrect selection\n====================\n'BreakName' is not installed, or which is selected file path false!\n\nI the default \"C:BreakName\" uses, if they cannot select the Tool yet installed?\n\nWith 'no' it again a drawer.")
(set HELPPrompt 	"The Guide to Opus MPEGA is not installed in the Help directory of DOpus5. Please you select the drawer, where the Guide was installed, or far ones!")
(set HELPERROR     	"Incorrect selection\n====================\nOpusMPEGA.guide is not installed, or the selected file path is false!\nAm I to use the default \"DOpus5:Help\", if they did not install the Guide?\nWith 'no' they can select a drawer again.")
(set SETUPPrompt 	"This Preferences program (OpusMPEGA) was not installed in the Prefs directory of the Workbench. Please you select the drawer, where OpusMPEGA was installed, or far ones!")
(set SETUPERROR     	"Incorrect selection\n====================\nOpusMPEGA is not installed or error to selected path !\n\nSelect 'yes' for the standard path \"SYS:Prefs\" or 'no' for repeat.")
(set CounterPrompt 	"\nPlease selects whether the timer in the continuation indicator forwards or backwards?!\n")
(set #COUNT1     	"forwards")
(set #COUNT2 	    	"backwards")
(set PLAYOFFPrompt 	"\nThe internal directory Opus commands Play is to be replaced. If they do not replace the instruction, they must in accordance with guide a Audioplayer Button install.\n")
(set #PLAYOFF1    	"to replace Play")
(set #PLAYOFF2	    	"to not replace Play")

(set ICONOFFPrompt     	"Opus Appicon:\n=============\nShows with program start the OpusMPEGA Appicon, or only with selection by audio files, or not Appicon represented?\n")
(set #ICON1     	"AppIcon with Opus start")
(set #ICON2 	    	"AppIcon with select")
(set #ICON3 	    	"Non AppIcon")
(set HIDEPrompt		"Playlist\n=========\n\nShows the Playlist, with selection of Audio files?\nHide required Opus Magellan.\n")
(set #HIDE1		"Hide Playlist by Start")
(set #HIDE2		"Show Playlist by Start")

(set LOADPATHPrompt    	(cat
			"Their preferential directory for MPEG audio files and samples can select set you."
			" This listed with selection of the menu option open file(s) (PopUp menu of the AppIcon),"
			" or with the load button of new (v3.9) buttonbanks."
	))
(set LISTERPrompt    	"Opus Lister:\n============\n\nSets the display items for the playlist.\n")
(set #LIST1    		"ID3 Taginfo")
(set #LIST2	    	"file size (Bytes)")
(set #LIST3	    	"comment")

(set #AMTAGPrompt	"Select the path to the external program 'AmTAGID3' by Georges Goncalves, or Proceed. See Help.")
(set #AMTAGHelp	(cat
			"The program enables to change the ID3 taginfo of the current Song, and the Amiga file comment.\n"
			"Only if they select the program, also the option in the ID3 Requester is made available.\n\n"
))

(set #ButtonPrompt	"Selecting it a buttonbank out. This is opened over the menu option 'Player Buttonbank' of the AppIcon. See Help...!")
(set #ButtonHelp	(cat
			"Over the Player Buttonbank OpusMPEGA can be controlled completely, similarly to a CD Audioplayer.\n\n"
			"If no Appicon is represented, the buttonbank can be selected over the Opus5 menu [button/loading]."
			" The call can be integrated also into any Opus5 user menu or button banks (docks), sees Guide.\n\n"
			"For the Buttonbank is located different design to the selection, in the formats standard, MagicWB and NewIcons.\n"
			"Newicons offers the best colours. The calculation of the palette with call of the Buttonbank requires a fast processor.\n\n"
			"The name of graphic Buttonbank begins with OpusMPEGA_image., as suffix is the design."
	))

(set ID3Prompt		(cat
			"ID3 TagInfo:\n==================\n"
			"Select it the desired format, see to Help.\n\n"
			"%1 = Artist  %2 = Title\n"
			"%3 = Album      %4 = Kategorie\n"
			"%5 = Comment  %6 = Year   "
))
(set ID3Help		(cat
			"The representation within the Playlist can freely adjusted.\n"
			"For samples and so far no mp3 ID taginfo available is, the file name, file type and the file comment is represented." 
))

(set #t_oldinstaller	(cat
			" You have an old version of the Installer. I'll probably"
			" need version 43.3 or greater. You can continue anyway"
			" but there is no guarantee it will work as it's supposed"
			" to do.\n"
			" Do you wish to continue anyway?"
	))
(set #t_oldinstallerhelp (cat
			" The version of Installer you use is too old. You can"
			" find a more recent version on the Internet, for example"
			" on Aminet, in the util/misc directory. The current"
			" file name is \"Installer-43_3.lha\":\n"
			" <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
	))

(set #GAIP16		"sound cards AHI requester")
(set #AHIPrompt      	"AHI Configuration:\n==================\nSelect it the desired AHI playback mode for its Sound card:\n")
(set AmigaPrompt      	"Selecting it the desired playback mode out:")
(set AHIPrompt      	"Selected ModeID:\n================================")
(set AHIHelp		(cat
			"Display serves the check. For MPEGA a hex value becomes, for Play16 the decimal value!\n\n"
	))
(set PLAY16_1Prompt     "Play16 Configuration:\n=========================\n\nSelect it an output device such as Paula, sound card or AHI.\n")
(set PLAY16_2Prompt     "Play16 Configuration:\n=========================\n\nThe process priority for the Play16 player should only by experienced users modified!\n")
(set PLAY16_3Prompt     "Play16 Configuration:\n=========================\n\nTo be a standard Productivity screen during playback to be opened? Only meaningfully for Grafikcards.\n")
(set PLAY16_4Prompt     "Play16 Configuration:\n=========================\n\nFor adjusted 15KHz screenmode please select PAL screen!\n")
(set PLAY16_5Prompt     "Play16 Configuration:\n=========================\n\nTo be the audio filter on, off or automatically switched?\n")
(set #FILTER		"do not modify")
(set MPEG_1Prompt       "MPEGA Configuration:\n========================\n\nDefines the decoding quality, and also the decoding speed.\nSlow CPU users, select Low quality ...")
(set MPEG_2Prompt       "MPEGA Configuration:\n========================\n\nDefines the output decoding frequenc division.")
(set MPEG_3Prompt       "MPEGA Configuration:\n========================\n\nSelect Priority for MPEGA (Default 0).")
(set MPEG_4Prompt       "MPEGA Configuration:\n========================\n\nSelect Mono or Stereo!\n")
(set MPEG_5Prompt       "MPEGA Configuration:\n========================\n\nFor adjusted 15KHz Screenmode select PAL Screen!\n")
(set #askchange		(cat
			"Terminate Configuration\n========================\n\n"
			"For the transfer of the new adjustments, to terminate Opus MPEGA first (menu option close)!\n"
))
(set #loop1		"configuration to terminate")
(set #loop2		"configuration to repeat")
))
;***************************************************************************
;	OpusMPEGA.prefs
;***************************************************************************

(if (= DirOpus 99) (welcome) )
(set @default-dest "ENVARC:Play-MPAudio.prefs")

(if (< @installer-version (+ (* 43 65536) 3))
(
	(if (not (askbool
		(prompt #t_oldinstaller)
		(help #t_oldinstallerhelp)
	))
	(
		(abort (cat "\n\n" #t_oldinstallerhelp))
	))
))

(message #intro1 "\n\n" Prefsprompt)

;*****Test System******************************************************************

(set KART16 1)
(if (= 1 (exists "DEVS:ahi.device" (noreq)))
	(set KART16 5))
(if (= 1 (exists "LIBS:maestix.library" (noreq)))
	(set KART16 4))
(if (= 1 (exists "LIBS:toccata.library" (noreq)))
	(set KART16 6))
(if (= 1 (exists "LIBS:prelude.library" (noreq)))
	(set KART16 3))

(set KARTE 4)
(if (= 1 (exists "DEVS:ahi.device" (noreq)))
	(set KARTE 5))
(if (= 1 (exists "LIBS:toccata.library" (noreq)))
	(set KARTE 7))
(if (= 1 (exists "LIBS:prelude.library" (noreq)))
	(set KARTE 8))
(if (= 1 (exists "LIBS:maestix.library" (noreq)))
	(set KARTE 9))
(if (= 1 (exists "LIBS:ppc.library" (noreq)))
	(set KARTE 1))
(if (= 1 (exists "LIBS:warp.library" (noreq)))
	(set KARTE 0))

(set KARTEL3 KARTE)

(if (= 1 (exists "DEVS:melodympeg.device" (noreq)))
	(set KARTE 3))
(if (= 1 (exists "DEVS:melodyaudio.device" (noreq)))
	(set KARTE 2))

(set MELODY 3)
(if (= 1 (exists "DEVS:mpeg.device" (noreq)))
	(set MELODY 1))
(if (= 1 (exists "DEVS:peggympeg.device" (noreq)))
	(set MELODY 2))
(if (= 1 (exists "DEVS:melodympeg.device" (noreq)))
	(set MELODY 0))

(set CPUVERS (DATABASE "cpu"))
(set CPUFLAG 0)
(if (= CPUVERS "68040")
	(set CPUFLAG 1)
	)
(if (= CPUVERS "68060")
	(set CPUFLAG 2)
	)

(set #DEFMPEGA (select CPUFLAG "MPEGA.020" "MPEGA.040" "MPEGA.040"))
(set #PlayMPEGA (tackon "C:" #DEFMPEGA))
(set #MPEGPlay "C:AMPlifier")
(set #BreakNAME "C:BreakName")
(set #MPEGAPRIO "-p0")
(set #MPEGAL2 " -T -f0 -d2 -q2")
(set #HELPDir "DOpus5:Help")
(set #SETUPDir "SYS:Prefs")
(set #PlayPPC "C:WarpAMP")
(set #PLAYMP3 "MPEGA")
(set #UNIT 0)
(set #MPEGAL3 " -T -f0 -d2 -q2")
(set #PLAYOPT "")
(set #PLAYPORT "AMPLIFIER.1")
(set #Play16 "C:Play16")

;*****Looping**********************************************************************

(set looping 1)
(while (<> looping 0)

;****Setup mp2 Layer-2******************************************************************

(set PLAYERL2 
    (askchoice
	(prompt PlayerPrompt)
	(help PlayerHelp)
       	(choices "PPC WarpAMP (AHI or Prelude)"
		"PPC MPEGplayer (AHI)"
		"AMPlifier (AHI or Melody/Peggy/CD32)" 
		"MPEGPlay (Melody, Peggy or CD32"
		"Amiga (MPEGA+Paula)"
		"Amiga (MPEGA+AHI)" 
		"Delfina (MPEGA+AHI)" 
		"Toccata (MPEGA+AHI)"
		"Prelude (MPEGA+AHI)"
		"Maestro Pro (MPEGA+AHI)"
		#GAIP16
	)
    (default KARTE)
 ))

(set #PLAYMP2 
    (select PLAYERL2 
	"PPC" 
	"PPC" 
	"MELODY" 
	"MELODY" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
))

;****PPC WarpAMP*******************************************************************

(if (= PLAYERL2 0)
    (
    (set #FLAG
	(askchoice
		(prompt (cat "mp2 & mp3 " UnitPrompt))
		(help UnitHelp)
		(choices "AHI UNIT 0" "Prelude")
		(default (exists "LIBS:prelude.library" (noreq)))
	))
    (set #UNIT (select #FLAG 0 "PRELUDE"))
    (set #PLAYMP3 "WarpAMP")
))

;****PPC MPEGplayer****************************************************************

(if (= PLAYERL2 1)
    (
    (set #UNIT 
	(askchoice
		(prompt (cat "mp2 & mp3 " UnitPrompt))
		(help UnitHelp)
		(choices "UNIT 0" "UNIT 1" "UNIT 2" "UNIT 3")
		(default 0)
	))
    (set #PLAYMP3 "PPCMpegPlayer")
))

;****Amplifier****************************************************************

(if (= PLAYERL2 2)
    (
    (set #FLAG
	(askchoice
		(prompt AMPPrompt)
		(help UnitHelp)
		(choices "Melody" "CD32+FMV" "Peggy Plus" "AHI")
		(default MELODY)
    ))
    (set #PLAYOPT 
	(select #FLAG 
		"DEV=melodympeg.device" 
		"DEV=mpeg.device" 
		"DEV=peggympeg.device BUFF=5000" 
		""
	))
))

;****MPEGplay******************************************************************

(if (= PLAYERL2 3)
    (
    (set #FLAG
	(askchoice
		(prompt MPEGPrompt)
		(help " ")
		(choices "Melody" "CD32+FMV" "Peggy Plus")
		(default MELODY)
	))
    (set #PLAYOPT 
	(select #FLAG 
		"DEV=melodympeg.device BUFF=32000 NBUFF=10" 
		"DEV=mpeg.device BUFF=32000 NBUFF=10" 
		"DEV=peggympeg.device BUFF=5000 NBUFF=20" 
	))
    (set #PLAYPORT "MPEGPLAY.1")
    (set #MPEGPlay "C:MPEGPlay")
))

;****Amiga MPEGA Paula+AHI*********************************************************

(if (OR (= PLAYERL2 4) (= PLAYERL2 5))
    (
    (set #FLAG1 
	(askchoice
	(prompt (cat "mp2 " MPEG_1Prompt))
	(help "Setup mp-audio layer-2")
	(choices "Low (68020)" "Medium (68030/40)" "High (68060)")
	(default CPUFLAG)
    ))

    (set #FLAG2 
	(askchoice
	(prompt (cat "mp2 " MPEG_2Prompt))
	(help "Setup mp-audio layer-2")
	(choices "1/4  11025Hz" "1/2  22050Hz" "Normal  44100Hz")
	(default (select CPUFLAG 1 1 2))
    ))
))

;****Amiga Paula******************************************************************

(if (= PLAYERL2 4)
    (
    (set #FLAG3 
	(askchoice
	(prompt (cat "mp2 " MPEG_5Prompt))
	(help "Setup mp-audio layer-2")
	(choices "PAL Screen" "Non limit")
	(default 0)
    ))

    (set #FLAG4 
	(askchoice
	(prompt (cat "mp2 " MPEG_4Prompt))
	(help "Setup mp-audio layer-2")
	(choices "Mono (68020/30)" "Stereo (68040/60)")
	(default (select CPUFLAG 0 1 1))
    ))

    (set #MPEGAL2
	(cat 	" -T -f0 -d" (select #FLAG2 4 2 1)
		" -q" (select #FLAG1 0 1 2) (select #FLAG4 " -m" "") 
		(select #FLAG3 " -x28000" "")
    ))
))

;****Amiga AHI******************************************************************

(if (= PLAYERL2 5)
    (
    (set #AHI (askchoice
	(prompt AmigaPrompt)
	(help @askchoice-help)
	(choices "PAULA: 14bit Mono CPU" 
		"PAULA: 14bit Stereo CPU" 
		"PAULA: 14bit Stereo++ CPU" 
		"PAULA: 8bit Mono CPU" 
		"PAULA: 8bit Stereo CPU" 
		"PAULA: 8bit Stereo++ CPU" 
		"PAULA: 14bit Mono tables/calibrated" 
		"PAULA: 14bit Stereo tables/calibrated" 
		"PAULA: 14bit Stereo++ tables/calibrated" 
		"PAULA: 8bit Mono tables" 
		"PAULA: 8bit Stereo tables" 
		"PAULA: 8bit Stereo++ tables" 
		"PAULA: Hifi 14bit Mono calibrated" 
		"PAULA: Hifi 14bit Stereo calibrated" 
		"PAULA: Hifi 14bit Stereo++ calibrated" 
		"PAULA: Hifi 8bit Mono" 
		"PAULA: Hifi 8bit Stereo" 
		"PAULA: Hifi 8bit Stereo+")
	(default 5)
 	))

    (set #MPEGAL2
	(cat	" -T -f0 -d" (select #FLAG2 4 2 1)
		" -q" (select #FLAG1 0 1 2)
		" -I" (select #AHI "020005" "020003" "020001" "02000B" "020009" "020007" "020006" "020004" "020002" "02000C" "02000A" "020008" "02000F" "02000E" "02000D" "020012" "020011" "020010")
	))
))

;****Delfina AHI******************************************************************

(if (= PLAYERL2 6)
    (
	(set #AHI 
		(askchoice
		(prompt #AHIPrompt)
		(help @askchoice-help)
		(choices "DELFINA: 16bit Mono" "DELFINA: 16bit stereo++" "DELFINA: AnyFreq 16bit mono" "DELFINA: AnyFreq 16bit Stereo++" "DELFINA: Fast 16bit mono" "DELFINA: Fast 16bit Stereo++" "DELFINA: Fast AnyFreq 16bit mono" "DELFINA: Fast AnyFreq 16bit stereo++")
		(default 5)
    	)
    )
    (set #MPEGAL2
	(cat " -T -I" (select #AHI "0100007" "0100003" "0100005" "0100001" "0100008" "0100004" "0100006" "0100002")
	))
))

;****Toccata AHI*****************************************************************

(if (= PLAYERL2 7)
    (
	(set #AHI (askchoice
		(prompt #AHIPrompt)
		(help @askchoice-help)
		(choices "TOCCATA: 16bit Mono" "TOCCATA: 16bit Stereo" "TOCCATA: 16bit Stereo++" "TOCCATA: Fast 16bit Mono" "TOCCATA: Fast 16bit Stereo" "TOCCATA: Fast 16bit Stereo++" "TOCCATA: Hifi 16bit Mono" "TOCCATA: Hifi 16bit Stereo" "TOCCATA: Hifi 16bit Stereo++")
		(default 5)
        )
    )
    (set #MPEGAL2
	(cat " -T -I" (select #AHI "0A0005" "0A0003" "0A0001" "0A0006" "0A0004" "0A0002" "0A0009" "0A0008" "0A0007")
	))
))

;****Prelude AHI******************************************************************

(if (= PLAYERL2 8)
    (
	(set #AHI (askchoice
		(prompt #AHIPrompt)
		(help @askchoice-help)
		(choices "PRELUDE: 16bit Stereo" "PRELUDE: 16bit Stereo++" "PRELUDE: 16bit Stereo realtime" "PRELUDE: 16bit Stereo++ realtime")
		(default 3)
        )
    )
    (set #MPEGAL2 
	(cat " -T -I" (select #AHI "0C0001" "0C0002" "0C0003" "0C0004")
	))
))

;****Maestro AHI*******************************************************************

(if (= PLAYERL2 9)
    (
	(set #AHI (askchoice
		(prompt #AHIPrompt)
		(help @askchoice-help)
		(choices "MAESTRO PRO: Fix 48k" "MAESTRO PRO: Input 32k" "MAESTRO PRO: Input 44.1k" "MAESTRO PRO: Input 48k" "MAESTRO PRO: Fix 48k ++" "MAESTRO PRO: Input 32k ++" "MAESTRO PRO: Input 44.1k ++" "MAESTRO PRO: Input 48k ++")
		(default 4)
        )
    )
    (set #MPEGAL2 
	(cat " -T -I" (select #AHI "0E0001" "0E0004" "0E0003" "0E0002" "0E0005" "0E0008" "0E0007" "0E0006")
	))
))

;****Input AHI*******************************************************************

(if (= PLAYERL2 10)
    (
    (set #MODEID "02000B")
    (if (<> 1 (exists "C:GAIP16" (noreq)))
	(message #NOGAIP)
	)
    (run "C:GAIP16 >ENV:GAIP16")
    (if (exists "ENV:GAIP16")
    	(set #MODEID (substr (getenv "GAIP16") 58 6))
	)
    (set #MPEGAL2
	(cat " -T -I"
		(askstring
		(prompt (cat "\nmp2: " AHIPrompt))
		(help AHIHelp)
		(default #MODEID)
 		)
    	))
))

;****Setup mp3 Layer-3******************************************************************

(if (> PLAYERL2 1)
    (

    (if (AND (> KARTEL3 2) (= KARTE 2))
	(set KARTEL3 2)
	)

    (set PLAYERL3
    (askchoice
	(prompt PlayerL3Prompt)
	(help PlayerHelp)
       	(choices "PPC WarpAMP (AHI or Prelude)"
		"PPC MPEGplayer (AHI)"
		"AMPlifier (Melody or AHI)" 
		"Amiga (MPEGA+Paula)"
		"Amiga (MPEGA+AHI)" 
		"Delfina (MPEGA+AHI)" 
		"Toccata (MPEGA+AHI)"
		"Prelude (MPEGA+AHI)"
		"Maestro Pro (MPEGA+AHI)"
		"Melody (MPEGA+AHI)"
		#GAIP16
	)
    (default (select KARTEL3 0 1 2 3 3 4 5 6 7 8 10))
    ))
    (set #PLAYMP3
    (select PLAYERL3 
	"WarpAMP" 
	"PPCMpegPlayer" 
	"MELODY" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
	"MPEGA" 
    ))
;****PPC WarpAMP*******************************************************************

    (if (= PLAYERL3 0)
    (
    (set #FLAG
	(askchoice
		(prompt (cat "mp3 " UnitPrompt))
		(help UnitHelp)
		(choices "AHI UNIT 0" "Prelude")
		(default (exists "LIBS:prelude.library" (noreq)))
	))
    (set #UNIT (select #FLAG 0 "PRELUDE"))
    (set #PLAYMP3 "WarpAMP")
    ))

;****PPC MPEGplayer****************************************************************

    (if (= PLAYERL3 1)
    (
    (set #UNIT 
	(askchoice
		(prompt (cat "mp3 " UnitPrompt))
		(help UnitHelp)
		(choices "UNIT 0" "UNIT 1" "UNIT 2" "UNIT 3")
		(default 0)
	))
    (set #PLAYMP3 "PPCMpegPlayer")
    ))

;****Amiga MPEGA Paula+AHI*********************************************************

    (if (OR (= PLAYERL3 3) (= PLAYERL3 4))
    (
    (set #FLAG1 
	(askchoice
	(prompt (cat "mp3 " MPEG_1Prompt))
	(help "Setup mp-audio layer-3")
	(choices "Low (68030)" "Medium (68040)" "High (68060)")
	(default CPUFLAG)
    ))

    (set #FLAG2 
	(askchoice
	(prompt (cat "mp3 " MPEG_2Prompt))
	(help "Setup mp-audio layer-3")
	(choices "1/4  11025Hz" "1/2  22050Hz" "Normal  44100Hz (68060)")
	(default CPUFLAG)
    ))
    ))

;****Amiga Paula******************************************************************

    (if (= PLAYERL3 3)
    (
    (set #FLAG3 
	(askchoice
	(prompt (cat "mp3 " MPEG_5Prompt))
	(help "Setup mp-audio layer-3")
	(choices "PAL Screen" "Non limit")
	(default 0)
    ))

    (set #FLAG4 
	(askchoice
	(prompt (cat "mp3 " MPEG_4Prompt))
	(help "Setup mp-audio layer-3")
	(choices "Mono (68040/30)" "Stereo (68060)")
	(default (select CPUFLAG 0 0 1))
    ))

    (set #MPEGAL3
	(cat 	" -T -f0 -d" (select #FLAG2 4 2 1)
		" -q" (select #FLAG1 0 1 2) (select #FLAG4 " -m" "") 
		(select #FLAG3 " -x28000" "")
    ))
    ))

;****Amiga AHI******************************************************************

    (if (= PLAYERL3 4)
    (
    (set #AHI (askchoice
	(prompt AmigaPrompt)
	(help @askchoice-help)
	(choices "PAULA: 14bit Mono CPU" 
		"PAULA: 14bit Stereo CPU" 
		"PAULA: 14bit Stereo++ CPU" 
		"PAULA: 8bit Mono CPU" 
		"PAULA: 8bit Stereo CPU" 
		"PAULA: 8bit Stereo++ CPU" 
		"PAULA: 14bit Mono tables/calibrated" 
		"PAULA: 14bit Stereo tables/calibrated" 
		"PAULA: 14bit Stereo++ tables/calibrated" 
		"PAULA: 8bit Mono tables" 
		"PAULA: 8bit Stereo tables" 
		"PAULA: 8bit Stereo++ tables" 
		"PAULA: Hifi 14bit Mono calibrated" 
		"PAULA: Hifi 14bit Stereo calibrated" 
		"PAULA: Hifi 14bit Stereo++ calibrated" 
		"PAULA: Hifi 8bit Mono" 
		"PAULA: Hifi 8bit Stereo" 
		"PAULA: Hifi 8bit Stereo+")
	(default 5)
 	))

    (set #MPEGAL3
	(cat	" -T -f0 -d" (select #FLAG2 4 2 1)
		" -q" (select #FLAG1 0 1 2)
		" -I" (select #AHI "020005" "020003" "020001" "02000B" "020009" "020007" "020006" "020004" "020002" "02000C" "02000A" "020008" "02000F" "02000E" "02000D" "020012" "020011" "020010")
	))
    ))

;****Delfina AHI******************************************************************

    (if (= PLAYERL3 5)
    (
	(set #AHI 
		(askchoice
		(prompt #AHIPrompt)
		(help @askchoice-help)
		(choices "DELFINA: 16bit Mono" "DELFINA: 16bit stereo++" "DELFINA: AnyFreq 16bit mono" "DELFINA: AnyFreq 16bit Stereo++" "DELFINA: Fast 16bit mono" "DELFINA: Fast 16bit Stereo++" "DELFINA: Fast AnyFreq 16bit mono" "DELFINA: Fast AnyFreq 16bit stereo++")
		(default 5)
    	)
    )
    (set #MPEGAL3
	(cat " -T -I" (select #AHI "0100007" "0100003" "0100005" "0100001" "0100008" "0100004" "0100006" "0100002")
	))
    ))

;****Toccata AHI*****************************************************************

    (if (= PLAYERL3 6)
    (
	(set #AHI (askchoice
		(prompt #AHIPrompt)
		(help @askchoice-help)
		(choices "TOCCATA: 16bit Mono" "TOCCATA: 16bit Stereo" "TOCCATA: 16bit Stereo++" "TOCCATA: Fast 16bit Mono" "TOCCATA: Fast 16bit Stereo" "TOCCATA: Fast 16bit Stereo++" "TOCCATA: Hifi 16bit Mono" "TOCCATA: Hifi 16bit Stereo" "TOCCATA: Hifi 16bit Stereo++")
		(default 5)
        )
    )
    (set #MPEGAL3
	(cat " -T -I" (select #AHI "0A0005" "0A0003" "0A0001" "0A0006" "0A0004" "0A0002" "0A0009" "0A0008" "0A0007")
	))
    ))

;****Prelude AHI******************************************************************

    (if (= PLAYERL3 7)
    (
	(set #AHI (askchoice
		(prompt #AHIPrompt)
		(help @askchoice-help)
		(choices "PRELUDE: 16bit Stereo" "PRELUDE: 16bit Stereo++" "PRELUDE: 16bit Stereo realtime" "PRELUDE: 16bit Stereo++ realtime")
		(default 3)
        )
    )
    (set #MPEGAL3 
	(cat " -T -I" (select #AHI "0C0001" "0C0002" "0C0003" "0C0004")
	))
    ))

;****Maestro AHI*******************************************************************

    (if (= PLAYERL3 8)
    (
	(set #AHI (askchoice
		(prompt #AHIPrompt)
		(help @askchoice-help)
		(choices "MAESTRO PRO: Fix 48k" "MAESTRO PRO: Input 32k" "MAESTRO PRO: Input 44.1k" "MAESTRO PRO: Input 48k" "MAESTRO PRO: Fix 48k ++" "MAESTRO PRO: Input 32k ++" "MAESTRO PRO: Input 44.1k ++" "MAESTRO PRO: Input 48k ++")
		(default 4)
        )
    )
    (set #MPEGAL3 
	(cat " -T -I" (select #AHI "0E0001" "0E0004" "0E0003" "0E0002" "0E0005" "0E0008" "0E0007" "0E0006")
	))
    ))

;****Melody AHI******************************************************************

    (if (= PLAYERL3 9)
    ((set #AHI (askchoice
	(prompt #AHIPrompt)
	(help @askchoice-help)
	(choices "MELODY: 16bit Mono" "MELODY: 16bit Stereo" "MELODY: 16bit Stereo++" "MELODY: Fast 16bit Mono" "MELODY: Fast 16bit Stereo" "MELODY: Fast 16bit Stereo++" "MELODY: Hifi 16bit Mono" "MELODY: Hifi 16bit Stereo" "MELODY: Hifi 16bit Stereo++")
	(default 5)
        ))
    (set #MPEGAL3 (cat " -T -I" (select #AHI "060005" "060003" "060001" "060006" "060004" "060002" "060009" "060008" "060007")))
    ))

;****Input AHI*******************************************************************

    (if (= PLAYERL3 10)
    (
    (set #MODEID "02000B")
    (if (<> 1 (exists "C:GAIP16" (noreq)))
	(message #NOGAIP)
	)
    (run "C:GAIP16 >ENV:GAIP16")
    (if (exists "ENV:GAIP16")
    	(set #MODEID (substr (getenv "GAIP16") 58 6))
	)
    (set #MPEGAL3
	(cat " -T -I"
		(askstring
		(prompt (cat "\nmp3: " AHIPrompt))
		(help AHIHelp)
		(default #MODEID)
 		)
    	)
    ))
   )
))

;****MPEGA Priorität***************************************************************

(if (OR (= #PLAYMP2 "MPEGA") (= #PLAYMP3 "MPEGA"))
    (
    (set #FLAG0 (askchoice
	(prompt MPEG_3Prompt)
	(help "Setup mp-audio layer-2&3")
	(choices "0 (Default)" "1" "2" "5")
	(default 0)
 ))
    (set #MPEGAPRIO 
	(cat "-p" (select #FLAG0 0 1 2 5))
    )
))

 
;****Setup Play16******************************************************************

(set PLAYPLAY16
    (askchoice
	(prompt Play16_1Prompt)
	(help "Setup for 8SVX, AIFF, WAVE, CDDA, MAUD, AU, VOC.\nMaestro Pro Only 44.1KHz & 48KHz Samples!")
       	(choices "Paula 8"
		"Paula 14"
		"Paula 14 calibrated" 
		"Prelude"
		"Maestro Pro"
		"Amiga AHI"
		#GAIP16
	)
    (default KART16)
 ))
(set #PLAY16OPT
    (select PLAYPLAY16
	"OUTPUT=Paula8" 
	"OUTPUT=Paula14" 
	"OUTPUT=Paula14c" 
	"OUTPUT=Prelude" 
	"OUTPUT=MPro" 
	"OUTPUT=AHI" 
	"OUTPUT=AHI" 
))
;****Play16 AHI*******************************************************************

(if (= PLAYPLAY16 6)
    (
    (set #MODEID "131083")
    (if (<> 1 (exists "C:GAIP16" (noreq)))
	(message #NOGAIP)
	)
    (run "C:GAIP16 >ENV:GAIP16")
    (if (exists "ENV:GAIP16")
    	(set #MODEID (substr (getenv "GAIP16") 46 6))
	)
    (set #PLAY16OPT
	(cat #PLAY16OPT " MODE="
		(askstring
		(prompt (cat "\nPlay16: " AHIPrompt))
		(help AHIHelp)
		(default #MODEID)
 		)
    	)
   )
))
;****Play16 Amiga AHI*************************************************************

(if (= PLAYPLAY16 5)
    (
    (set #AHI (askchoice
	(prompt AmigaPrompt)
	(help @askchoice-help)
	(choices "PAULA: 14bit Mono CPU" 
		"PAULA: 14bit Stereo CPU" 
		"PAULA: 14bit Stereo++ CPU" 
		"PAULA: 8bit Mono CPU" 
		"PAULA: 8bit Stereo CPU" 
		"PAULA: 8bit Stereo++ CPU" 
		"PAULA: 14bit Mono tables/calibrated" 
		"PAULA: 14bit Stereo tables/calibrated" 
		"PAULA: 14bit Stereo++ tables/calibrated" 
		"PAULA: 8bit Mono tables" 
		"PAULA: 8bit Stereo tables" 
		"PAULA: 8bit Stereo++ tables" 
		"PAULA: Hifi 14bit Mono calibrated" 
		"PAULA: Hifi 14bit Stereo calibrated" 
		"PAULA: Hifi 14bit Stereo++ calibrated" 
		"PAULA: Hifi 8bit Mono" 
		"PAULA: Hifi 8bit Stereo" 
		"PAULA: Hifi 8bit Stereo+")
	(default 5)
 	))

    (set #PLAY16OPT
	(cat #PLAY16OPT " MODE="
	     (select #AHI "131077" "131075" "131073" "131083" "131081" "131079" "131078" "131076" "131074"
			  "131084" "131082" "131080" "131087" "131086" "131085" "131090" "131089" "131088"
			)
	))
))
;****Play16 Paula******************************************************************

(if (OR (< PLAYPLAY16 3) (= PLAYPLAY16 5))
    (
    (set #FLAG5
	(askchoice
	(prompt Play16_5Prompt)
	(help Play16_5Prompt)
	(choices #FILTER "On" "Off" "Auto (Default)")
	(default 3)
    ))
    (set #PLAY16OPT
	(cat #PLAY16OPT 
		(select #FLAG5 "" " FILTER=ON" " FILTER=OFF" " FILTER=AUTO")
	)) 
))

(if (< PLAYPLAY16 3)
    (
    (set #FLAG6
	(askchoice
	(prompt Play16_4Prompt)
	(help Play16_4Prompt)
	(choices "PAL Screen" "Non limit")
	(default 0)
    ))
    (set #FLAG7 0)
    (if (= #FLAG6 1)
	    (set #FLAG7
		(askoptions
		(prompt Play16_3Prompt)
		(help " ")
		(choices "Productivity")
		(default 0)
	    ))
    )
    (set #PLAY16OPT
	(cat #PLAY16OPT 
		(select #FLAG6 "" " FAST") 
		(select #FLAG7 "" " SCREENMODE=0")
	))
))

(set #FLAG0 (askchoice
	(prompt Play16_2Prompt)
	(help " ")
	(choices "-1" "0" "1 (Default)" "2" "3")
	(default 2)
 ))
(if (<> #FLAG0 2)
    (set #PLAY16OPT
	(cat #PLAY16OPT " PRIORITY=" (select #FLAG0 "-1" "0" "1" "2" "3")
	))
)

;****Set Paths******************************************************************

; WarpAMP
(set FLAG_0 0)
(if (= #PLAYMP3 "WarpAMP")
    (
    (if (<> 1 (exists #PlayPPC (noreq)))
	(
	(message WarpAMPPrompt)
     	(until (= FLAG_0 1)
           	(
		(set MPEGPlayDir
			(askdir
	        	(prompt #PlaySelectPrompt)
	        	(help	@askdir-help)
	        	(default "SYS:")
                ))
		(set #PlayPPC (tackon MPEGPlayDir "WarpAMP"))
           	(if (<> 1 (exists #PlayPPC (noreq)))
	             	(if (askbool
        	         	(prompt WarpAMPERROR)
                	 	(help " ")
				)
	                 	(
				(set FLAG_0 1)
                	 	(set #PlayPPC "C:WarpAMP")
			))
                 (set FLAG_0 1)
		)
        ))
    ))
    (if (AND (= 1 (exists #PlayPPC (noreq))) (< (getversion #PlayPPC) 9))
	(message WarpAmpVersion)
    )
))

; PPCMpegPlayer
(set FLAG_0 0)
(if (= #PLAYMP3 "PPCMpegPlayer")
    (if (<> 1 (exists (tackon #PlayPPC "PPCMpegPlayer") (noreq)))
	(
	(message PlayPPCPrompt)
     	(until (= FLAG_0 1)
           	(
		(set #PlayPPC 
			(askdir
	        	(prompt #PlaySelectPrompt)
	        	(help	@askdir-help)
	        	(default "SYS:")
                ))
           	(if (<> 1 (exists (tackon #PlayPPC "PPCMpegPlayer") (noreq)))
	             	(if (askbool
        	         	(prompt PlayPPCERROR)
                	 	(help " ")
				)
	                 	(
				(set FLAG_0 1)
                	 	(set #PlayPPC "SYS:C")
			))
                 (set FLAG_0 1)
		)
        ))
    ))
)

; AMPlifier MELODY
(set FLAG_0 0)
(if (= PLAYERL2 2)
    (if (<> 1 (exists #MPEGPlay (noreq)))
	(
	(message AMPPlayPrompt)
     	(until (= FLAG_0 1)
           	(
		(set MPEGPlayDir 
			(askdir
	        	(prompt #PlaySelectPrompt)
	        	(help	@askdir-help)
	        	(default "SYS:")
                ))
		(set #MPEGPlay (tackon MPEGPlayDir "AMPlifier"))
           	(if (<> 1 (exists #MPEGPlay (noreq)))
	             	(if (askbool
        	         	(prompt AMPPlayERROR)
                	 	(help " ")
				)
	                 	(
				(set FLAG_0 1)
                	 	(set #MPEGPlay "C:AMPlifier")
			))
                 (set FLAG_0 1)
		)
        ))
    ))
)

; MPEGPlay MELODY
(set FLAG_0 0)
(if (= PLAYERL2 3)
    (if (<> 1 (exists #MPEGPlay (noreq)))
	(
	(message MPEGPlayPrompt)
     	(until (= FLAG_0 1)
           	(
		(set MPEGPlayDir 
			(askdir
	        	(prompt #PlaySelectPrompt)
	        	(help	@askdir-help)
	        	(default "SYS:")
                ))
		(set #MPEGPlay (tackon MPEGPlayDir "MPEGPlay"))
           	(if (<> 1 (exists #MPEGPlay (noreq)))
	             	(if (askbool
        	         	(prompt MPEGPlayERROR)
                	 	(help " ")
				)
	                 	(
				(set FLAG_0 1)
                	 	(set #MPEGPlay "C:MPEGPlay")
			))
                 (set FLAG_0 1)
		)
        ))
    ))
)

;MPEGA
(set FLAG_0 0)
(if (<> 1 (exists #PlayMPEGA (noreq)))
	((message PlayMPEGAPrompt)
	(until (= FLAG_0 1)
           ((set #PlayMPEGA (askfile
	        (prompt #PlayMPEGAPrompt)
	        (help	@askfile-help)
	        (default (tackon "C:" #DEFMPEGA))
                ))
           (if (<> 1 (exists (#PlayMPEGA) (noreq)))
             (if (askbool
                 (prompt (cat PlayMPEGAERROR (tackon "C:" #DEFMPEGA)))
                 (help " "))
             ((set FLAG_0 1)
                 (set #PlayMPEGA (tackon "C:" #DEFMPEGA))
		 ))
                 (set FLAG_0 1))
           ))
))

;Play16
(set FLAG_0 0)
(if (<> 1 (exists #Play16 (noreq)))
	((message Play16Prompt)
	(until (= FLAG_0 1)
           ((set #Play16 (askfile
	        (prompt #PlaySelectPrompt)
	        (help	@askfile-help)
	        (default "C:Play16")
                ))
           (if (<> 1 (exists (#Play16) (noreq)))
             (if (askbool
                 (prompt (cat Play16ERROR))
                 (help " "))
             ((set FLAG_0 1)
                 (set #Play16 "C:Play16")
		 ))
                 (set FLAG_0 1))
           ))
))
(if (AND (= 1 (exists #Play16 (noreq))) (< (getversion #Play16) 65544))
	(message Play16Version)
	)

;BreakName
(set FLAG_0 0)
(if (<> 1 (exists #BreakNAME (noreq)))
	(
     	(until (= FLAG_0 1)
           	(
		(set MPEGPlayDir 
			(askdir
	        	(prompt BreakPrompt)
	        	(help	@askdir-help)
	        	(default "C:")
                ))
		(set #BreakNAME (tackon MPEGPlayDir "BreakName"))
           	(if (<> 1 (exists #BreakNAME (noreq)))
	             	(if (askbool
        	         	(prompt BREAKERROR)
                	 	(help " ")
				)
	                 	(
				(set FLAG_0 1)
                	 	(set #BreakNAME "C:BreakName")
			))
                 (set FLAG_0 1)
		)
        ))
))

;****Set HelpDir******************************************************************

(set FLAG_0 0)
(if (<> 1 (exists (tackon #HELPDir "OpusMPEGA.guide") (noreq)))
     (until (= FLAG_0 1)
           ((set #HELPDir (askdir
	        (prompt HELPPrompt)
	        (help	@askdir-help)
	        (default "DOpus5:Help")
                ))
           (if (<> 1 (exists (tackon #HELPDir "OpusMPEGA.guide") (noreq)))
             (if (askbool
                 (prompt HELPERROR)
                 (help " "))
                 ((set FLAG_0 1)
                 (set #HELPDir "DOpus5:Help")))
                 (set FLAG_0 1))
           ))
)           

;****Set PrefsDir******************************************************************

(set FLAG_0 0)
(if (<> 1 (exists (tackon #SETUPDir "OpusMPEGA") (noreq)))
     (until (= FLAG_0 1)
           ((set #SETUPDir (askdir
	        (prompt SETUPPrompt)
	        (help	@askdir-help)
	        (default "SYS:Prefs")
                ))
           (if (<> 1 (exists (tackon #SETUPDir "OpusMPEGA") (noreq)))
             (if (askbool
                 (prompt SETUPERROR)
                 (help " "))
                 ((set FLAG_0 1)
                 (set #SETUPDir "SYS:Prefs")))
                 (set FLAG_0 1))
           ))
)           

;****Set ID3 Taginfo Editor AmTagID3**********************************************

(set #AMTAG
	(askfile
	        (prompt #AMTAGPrompt)
	        (help	#AMTAGHelp)
	        (default "SYS:MUI/AmTAGID3/AmTAGID3")
        )
)

;****Set Default Buttonbank*******************************************************

(set #BUTTON
	(askfile
	        (prompt #ButtonPrompt)
	        (help	#ButtonHelp)
	        (default "DOpus5:Buttons/OpusMPEGA_image")
        )
)

;****Set Lister*******************************************************************

(set #FLAG (askoptions
	(prompt LISTERPrompt)
	(help ID3Help)
	(choices #LIST1 #LIST2 #LIST3)
	(default 1)
))
(set SIZE "SIZEOFF")
(set comm "COMMENTOFF")
(if (bitand #FLAG 2)
	(set SIZE "SIZEON"))
(if (bitand #FLAG 4)
	(set COMM "COMMENTON"))
(set #SIZE (cat SIZE " " COMM))
(set #COMM "")
(if (bitand #FLAG 1)
    (set #COMM
	(askstring
		(prompt ID3Prompt)
		(help ID3Help)
		(default "%1 - %2")
 	)
    )
)

;****Set Counter******************************************************************

(set #FLAG (askchoice
	(prompt CounterPrompt)
	(help " ")
	(choices #COUNT1 #COUNT2)
	(default 0)
 )
)
(set #COUNTER (select #FLAG "FOR" "BACK"))

;****Set Play Command*************************************************************

(set #FLAG (askchoice
	(prompt PLAYOFFPrompt)
	(help " ")
	(choices #PLAYOFF1 #PLAYOFF2)
	(default 0)
 )
)
(set #POFF (select #FLAG "PLAY" "PLAYOFF"))

;****Set AppIcon******************************************************************

(set #FLAG (askchoice
	(prompt ICONOFFPrompt)
	(help " ")
	(choices #ICON1 #ICON2 #ICON3)
	(default 0)
 )
)
(set #IOFF (select #FLAG "ICON" "ICONOFF" "NOICON"))

;****Set HIDE******************************************************************

(set #FLAG (askchoice
	(prompt HIDEPrompt)
	(help " ")
	(choices #HIDE1 #HIDE2)
	(default 1)
 )
)
(set #IOFF (cat #IOFF (select #FLAG " HIDE" "")))

;****Set Loadpath*****************************************************************

(set #LOADPATH (askdir
	        (prompt LOADPATHPrompt)
	        (help	@askdir-help)
	        (default "RAM:" )
                ))

;***************************************************************************
 (set looping 
	(askchoice 
		(choices #loop1 #loop2)
                (prompt #askchange)
                (help   #askchange)
       	        (default 0)
          )
))

;****Set ENV******************************************************************

(set #HELPPATH (tackon #HELPDir "OpusMPEGA.guide"))
(set #SETUPPATH (tackon #SETUPDir "OpusMPEGA"))

(set #PREF01 (cat "$VER:  Prefs for Opus MPEGA 3.9\n" #MPEGPlay "\n" #PlayMPEGA "\n" #BreakNAME "\n" #MPEGAPRIO #MPEGAL2 "\n" #PLAYMP2 "\n" #POFF "\n" #IOFF "\n" #SIZE "\n" #COMM "\n" #LOADPATH "\n"))
(set #PREF02 (cat  #HELPPATH "\n" #SETUPPATH "\n" #COUNTER "\n" #PlayPPC "\n" #PLAYMP3 "\n" #UNIT "\n" #MPEGAPRIO #MPEGAL3 "\n" #PLAYOPT "\n" #PLAYPORT "\n" #BUTTON "\n" #PLAY16 "\n" #PLAY16OPT "\n" #AMTAG "\n"))

(textfile 
	(dest "ENVARC:OpusMPEGA.prefs")
        (append #PREF01 #PREF02)
 )
(textfile 
	(dest "ENV:OpusMPEGA.prefs")
        (append #PREF01 #PREF02)
 )
(exit (quiet))
