Congratulations to the whole un4seen team, and for the community sticking it out this long!

It's a great feeling seeing my old buddies making headlines.

...

... A lot of VB code ...

...

Here you go...this code is untested but you should get the general idea. If in doubt of something, post back, someone might help you out.

PS: There might be a semi-colon missing here or there. Maybe a mistyped word too.

var
  DSPPlugins: array of String;
  chan: Cardinal;

function LoadDsp(File: String): boolean;
var
    plugin: Cardinal;
    module: Cardinal;
    DSPTemp: array of String;
    i: Integer;
begin
    // load winamp plugin from the plugin dir
    plugin := BASS_WADSP_Load(ExtractFileDir(Application.ExeName) + '\plugins\' + File, 5, 5, 100, 100, 0);
    if plugin = 0 then
    begin
        LoadDsp := False;
        exit;
    end;

    BASS_WADSP_Start(plugin, 1, chan); // start plugin
    BASS_WADSP_ChannelSetDSP(plugin, chan, 1) // and set channel
    LoadDsp := True;
    SetLength(DSPTemp, Length(DSPPlugins));
    // copy DSPPlugins() to local var
    for i := 0 to High(DSPPlugins) do
        DSPTemp[i] := DSPPlugins[i];
    SetLength(DSPPlugins, plugin); // allocate more mem for the new plugins
    // copy var back
    for i := 0 to High(DSPTemp) do
        DSPPlugins[i] := DSPTemp[i];
    DSPPlugins[plugin] := File; // add new plugin to var
end;


function UnloadDsp(File: String): boolean;
var
    i: Integer
begin
    for i := 0 to High(DSPPlugins) do // search for plugin
    begin
        If DSPPlugins[i] = File then // found...
        begin
            BASS_WADSP_Stop(Cardinal(i)); // stop and
            BASS_WADSP_FreeDSP(Cardinal(i)) // free it.
            DSPPlugins[i] := ''; // reset var
            UnloadDsp := True; // return true
            exit;
        end;
    end;
    UnloadDsp := False; // return false
end;


function DspIsLoad(File: String): boolean;
var
    i: Integer;
begin
    for i := 0 to High(DSPPlugins) do // search for plugins
    begin
        If DSPPlugins[i] = File then // found
        begin
            DspIsLoad := True; // return true
            exit;
        end;
    end;
    DspIsLoad := False; // return false
end;


procedure DspOpenConfig(File: String);
var
    i: Integer
begin
    for i := 0 to High(DSPPlugins) do // search for plugin
        If DSPPlugins[i] = File then // found
            BASS_WADSP_Config(Cardinal(i)); // open config
end;

procedure RestartDsp;
var
    i: Integer;
begin
    for i := 0 to High(DSPPlugins) do // search for plugin
        If Length(DSPPlugins[i]) > 0 then // found
            BASS_WADSP_ChannelSetDSP(Cardinal(i), chan, 1);
end;

[--Edit--]

...Xminion worked very hard on BassVis and you took over his project and also worked very hard on it and I don't want to take anything away from that...

Aww, that's very nice of you to remember me. I just happened to come check out the good ol' Un4seen and saw BassVis gone. So I saw BASS SFX with something related to visualizations and came to check out the thread.

What a surprise that I would read this

Best of luck with your new library dude!

*thumbs up*


--Edit--
I just took a quick look at your source code and the only thing I can say is congratulations on an amazing work. Within a few days you have managed to write what took me way longer and that I didn't even finish.

If by any chance you still want the source code for the very old BassVis that I had released, please let me know and I will gladly hand it over. (Unfortunately, I do not have and cannot release any source code thereafter since I was not the programmer/coder)
--/Edit--

Haha, well that solves that. Thank you very much Ian, as always!
 

XMPlay itself doesn't report it as PCM, I am checking through the Info Window.

Hey Ian,

XMPlay's Wave Writer is writing waves without putting the PCM flag on it (which I assume is the type of wave being written). This prevents Nero from burning the file to a CD, is there any quick fix or anything of the sort to correct this?

Thanks!

Awesome job Ian (as always), thanks!

Hello,

When playing this specific stream with XMPlay 3.4 I get an error message saying "ICY 200 OK" titled "Connection Error." ICY 200 OK means the request is fine...but it's just not playing anything. Not even Windows Media Player playes it, but on the other hand, Winamp does. Ian, would it be possible to take a look at this, please?

Direct address: http://70.84.15.212:8005
Web address: http://www.dawgclan.net/listen128k.pls (http://www.dawgclan.net/index.php?page=radio)

Thanks a lot

[first]

Ok, uploaded is version 1.1

The tag issue has been fixed. How tags work, currently XMLyrics checks to see if XMPlay found a Lyrics tag and uses it. If none was found, then it tries to read another format of a lyrics tag, and if not found then it doesn't display anything.

SledgeDG: There is a small issue with the way the tags on that file is written. To avoid timing problems XMLyrics sorts all the lines read (whether from a lyrics file or the tag) in alphabetical order. This means that since each line starts with a [00:00] time format, all the lines are organized in an increasing time order. Now, in the file you uploaded specifically the artist, album, title and the first line of the lyrics contain [00:00] as the starting time, so obviously "Hello" falls before the word "Title" so they are put in the wrong order. I suggest always starting the first line of the actual lyric of the song with a [00:01]

Did you update the version number as well?

I am lazy about changing version numbers, but I'll do so after this next fix.

I took a look at the file and while XMLyrics did have a problem when doing some calculations for reading the tags, the file doesn't contain any Lyrics information. Could you reopen the file with your tag editor and see if it actually shows the data you previously wrote into the file?

On another note, while looking at the Lyrics tag issue, I updated the above link file with a few fixes. So Rah'Dick if you could please reupdate the support site.

[MUST]

Sledge, are you able to post a sample MP3 with its lyrics embedded in so I can see what is not working? I can't promise supporting all types of ID3 lyric formats, but a few common/not complicated ones might do.

Also, remember that the external LRC files MUST have the EXACT file name as the music file playing on XMPlay.

I came over to download the new update for XMPlay and decided to troll around the XMPlay support site and stumbled upon my old nifty little program XMLyrics there. Sadly I saw written on the description that it didn't work any longer with the current version of XMPlay. I took a quick look at what was wrong, fixed it and added two suggestions I read which I found very interesting. The new options added were "Ontop while playing a track" (self explanatory) and a "Transparency" option. I am sure Rah'dick will update the app on the support site.

Good luck and please report any bugs you find, suggestions are always welcomed.

http://www.un4seen.com/filez/1/XMLyrics.exe
http://www.lrcdb.org/ Seems to be a very good for .LRC lyric files and so far all the files I have tested from there work perfectly fine with XMLyrics.

PS. Do not link directly to the above path, please.

For right now you can try fiddling with BassWinamp and the in_midi.dll plugin from Winamp.

If the BitBlt copying from hDC to hDC isn't quite working for you, the next best thing I recommend to do is use BASS_ChannelGetData to save up enough data in your own buffer for the rendering. Then use BASS_SONIQUEVIS_Render2 which has the same parameters as the BASS_SONIQUEVIS_Render function, except the Data and fft parameters. You can use the Render2 function as many times as you want on different canvas with the same data/fft buffer.

Make sure you buffer enough to fill up 512 samples.

I have been kind of busy, but I implemented everything that I saw was required to run a Winamp (5.0+) visualization plugin. When it comes down to testing, I receive errors such as Buffer Underrun from the Microsoft Visual Studio Debugger. Anyways, the source is here.

If anyone finds the reason I will be happy to update it and release a compiled and source version 

The zoom options are to skip fft/wave values. For example, out of an array of 1024 items, if you zoom 2x it would only grab 512 (grabbing alternating values, thus "zooming"), so zoom isn't really what you are looking for. Sensitivity is just a multiplier that the FFT spectrum feeder uses that ranges from 1 to 4 (1 being normal) and if you want you can always modify the actual BassVis source to your liking. Also, BassVis has a second Render function that allows you to directly feed the data (instead of having BassVis grab it from the channel), allowing you to modify the data as you like and then having it displayed. If you have any suggestions, I'd like to hear them 

While on the topic of BassVis version, I am working on (finally) fixing the BassVis part of Winamp visualizations, so hopefully the 5.0+ visualizations will work. The sonique part has already been updated but not yet released...soon to come 

If you create a flag to make it work,
Can BASS get spectrum data or position info from in_tara?

Not really possible because in_tara is just a control interface, it doesn't actually decode the RealMedia files.

I notice that someone wrote a xmplay plugin for realmedia,
is it possible use xmplay plugins in BASS?

Not possible unless something has changed...

Actually, BassWinamp is not a standard Bass add-on. It currently works with the old style, so Bass does not see and cannot load BassWinamp as a plugin it can use. This means that unelss Meedio uses BassWinamp directly, then it can't be BassWinamp's problem.

Of course, I may be wrong though

This is because BassWinamp is meant to use Bass' output device, and in_tara handles its own output since it uses the RealPlayer ocx. I could work on a flag that bypasses when so desired...