Thema: Delphi bass.dll und Equalizer

Einzelnen Beitrag anzeigen

DelTurbo

Registriert seit: 12. Dez 2009
Ort: Eifel
1.194 Beiträge
 
Delphi 2007 Architect
 
#1

bass.dll und Equalizer

  Alt 21. Okt 2013, 12:13
Hi,
ich versuche Frequenzen und unter 80hz zu regeln. Leider klappt das nicht. Wenn ich so wie unten im beispiel versuche, und die unteren 2 regele, dann hört sich das so an, als würden 8k und 16k geändert. Den Bass raus und reinnehmen kann ich erst ab 125hz.

Mach ich was falsch, oder kann das die bass.dll nicht? Die werte der Regler gehen von -15 bis +15.

Danke im voraus

Delphi-Quellcode:
    fx[1] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[2] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[3] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[4] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[5] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[6] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[7] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[8] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[9] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    fx[10] := BASS_ChannelSetFX(chan, BASS_FX_DX8_PARAMEQ, 1);
    // Set equalizer to flat
    p.fBandwidth := 18;
    p.fCenter := 31;
    p.fGain:=MainFrm.EQTrackb1.Position;
    BASS_FXSetParameters(fx[1], @p);
    p.fCenter := 62;
    p.fGain:=MainFrm.EQTrackb2.Position;
    BASS_FXSetParameters(fx[2], @p);
    p.fCenter := 125;
    p.fGain:=MainFrm.EQTrackb3.Position;
    BASS_FXSetParameters(fx[3], @p);
    p.fCenter := 250;
    p.fGain:=MainFrm.EQTrackb4.Position;
    BASS_FXSetParameters(fx[4], @p);
    p.fCenter := 500;
    p.fGain:=MainFrm.EQTrackb5.Position;
    BASS_FXSetParameters(fx[5], @p);
    p.fCenter := 1000;
    p.fGain:=MainFrm.EQTrackb6.Position;
    BASS_FXSetParameters(fx[6], @p);
    p.fCenter := 2000;
    p.fGain:=MainFrm.EQTrackb7.Position;
    BASS_FXSetParameters(fx[7], @p);
    p.fCenter := 4000;
    p.fGain:=MainFrm.EQTrackb8.Position;
    BASS_FXSetParameters(fx[8], @p);
    p.fCenter := 8000;
    p.fGain:=MainFrm.EQTrackb9.Position;
    BASS_FXSetParameters(fx[9], @p);
    p.fCenter := 16000;
    p.fGain:=MainFrm.EQTrackb10.Position;
    BASS_FXSetParameters(fx[10], @p);
Alle meine Rechtschreibfehler sind Urheberrechtlich geschützt!!
  Mit Zitat antworten Zitat