Mehrere MP3 Dateien in unterschiedlicher Lautstärke abspielen

Jasfar

Hallo zusammen,

ich habe leider beim suchen nicht wirklich etwas gefunden, außer die bass UDF.

Ich würde gerne folgendes realisieren:

Und zwar möchte ich gerne 2 MP3 Dateien gleichzeitig abspielen können und zwar in unterschiedlicher Lautstärke.

Hintergrund ist folgender:

Ich habe am Freitag einen Feuerschow Auftritt und habe dafür mehrere Musikstücke, diese sollen teilweise gleichzeitig Laufen, teilweiße Soundeffekte abspielen, sobald ein Button dafür gedrückt wird.

Allerdings habe ich bisher noch nie etwas in dieser Richtung geschrieben, deswegen wollte ich einfach mal um ein paar Denkanstöße bitten

Vielen Dank schon einmal!

**Kanashius**

Wenn du das mit AutoIt realisieren willst wäre die BASS-UDF das sinnvollste, denke ich. Eine andere Audiobibliothek kenn ich für AutoIt sonst nicht...

BASS ist auch nicht so schwer, wenn man den Aufbau einmal begriffen hat.

Also einfach runterladen und die Hilfe ansehen, dort sind viele gute Beispiele.

Für den Begin:

AutoIt

_BASS_STARTUP("bin\Bass.dll")
_BASS_FX_Startup("bin\Bass_FX.dll")
_BASS_Init(0, -1, 100000, 0, "")

;Device ändern:
$device = _BASS_GetDeviceInfo($nr + 1)
If $device[2] < 4 Then
    _BASS_Init(0, $nr + 1, 100000, 0, "")
EndIf
_BASS_ChannelSetDevice($MusicHandle, $aktDevice[0] + 1)

;play
_BASS_ChannelPlay($MusicHandle, 0)

;pause
_BASS_ChannelPause($MusicHandle)

;stop
_BASS_ChannelStop($MusicHandleOld)

;set volume
_BASS_ChannelSetAttribute($MusicHandle, $BASS_ATTRIB_VOL, 0);Value between 0 and 1

;Abgespielte Zeit ablesen:
$Time = _BASS_ChannelBytes2Seconds($MusicHandle, _BASS_ChannelGetPosition($MusicHandle, $BASS_POS_BYTE))

;Play File:
$MusicHandle = _BASS_StreamCreateFile(False, $file, 0, 0, 0)
If $aktDevice[0] <> -1 Then    ;Set selected device, otherwise use default, just the device index starting by 1
    _BASS_ChannelSetDevice($MusicHandle, $aktDevice[0] + 1)
EndIf
_BASS_ChannelPlay($MusicHandle, 1)
_BASS_ChannelSetAttribute($MusicHandle, $BASS_ATTRIB_VOL, 1)

Alles anzeigen

Ansonsten gibts noch von Windows das in Autoit integrierte Sound:

_SoundPlay,_SoundOpen,...

MfG Kanashius

BananaJoe

So etwas würde ich eher so lösen: Audacity

Jasfar

Vielen Dank für die Einführung, damit sollte ich klar kommen

BananaJoe Mit Audacity habe ich das früher gemacht, allerdings wenn das fertig geschnitten ist, gibt es das Problem, dass man nie genau weiß wie lange die verschiedenen Feuertools brennen, das kommt immer drauf an, deswegen muss man Flexibel sein können was die Musik angeht. Wir haben immer abwechselnd Leute hintern, die die Show im Blick haben und wissen wann das Feuer bald ausgeht, und so das nächste Lied faden können um einen flüssigen Ablauf zu gewährleisten

**Kanashius**

Falls du nur was zum Faden brauchst, und nicht selbst Programmieren möchtest hab ich hier noch nen älteres Projekt von mir: MusikPlayer mit Equalizer,Playlist, etc.

Damit kann man Lieder abspielen und auch Faden (mit bestimmter Zeit,...), mehrere Playlists, Equalizer, Streams,...

Eventuell solltest du dir auch VirtualDJ mal ansehen

**alpines**

Mich wunderts, dass noch niemand das WMPlayer.ocx Objekt vorgeschlagen hat. Man kann mehrere Instanzen vom Objekt erzeugen und abspielen.

Das ist praktisch idiotensicher:

AutoIt

Global $oWMP = ObjCreate("WMPlayer.ocx")
$oWMP.URL = "C:\Musik.mp3"

Sleep(1000)

Global $oWMP2 = ObjCreate("WMPlayer.ocx")
$oWMP2.URL = $oWMP.URL

Sleep(1000)

$oWMP.settings.volume = 25
$oWMP2.settings.volume = 35

While Sleep(1000)
    ConsoleWrite($oWMP.playState & "-" & $oWMP2.playState & @CRLF)
WEnd

Alles anzeigen

Jasfar

Zitat von Kanashius

Falls du nur was zum Faden brauchst, und nicht selbst Programmieren möchtest hab ich hier noch nen älteres Projekt von mir: MusikPlayer mit Equalizer,Playlist, etc.

Damit kann man Lieder abspielen und auch Faden (mit bestimmter Zeit,...), mehrere Playlists, Equalizer, Streams,...

Eventuell solltest du dir auch VirtualDJ mal ansehen

Vielen Dank!

Ich hab mir die Version 3 mal heruntergeladen, die UDFs ins Include Verzeichnis gezogen, bekomme aber leider eine Fehlermeldung:

"C:\Users\mschaefer\Documents\MusicIt\Bass.au3" (158) : ==> Duplicate function name.:

Func _BASS_Startup($sBassDLL = "")

Jasfar

alpines Das schaut echt leicht, schnell und einfach aus, danke für den Tipp!

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Hmm warum selber machen?

DigiJa Freeware. Ist ein DiJa Programm mit riesigem Funktionsumfang. Kann alles was man braucht. Wenn man für ein paar Euro noch eine USB Soundkarte besorgt, kann man Titel sogar vorhören, während Digija die Boxen befeuert....

Ich bin zwar selberschreibfan aber dafür?

Gruß

Peter

fakeraol

*ein "y" nachreiche*

die Homepage ist http://www.digijay.at/