Author Topic: BASSMIDI beta  (Read 45956 times)

Silhwan

  • Posts: 81
Re: BASSMIDI beta
« Reply #25 on: 4 Nov '06 - 01:31 »
OK, I see.
I will re-modify my program code.  :P

Ian @ un4seen

  • Administrator
  • Posts: 20389
Re: BASSMIDI beta
« Reply #26 on: 5 Nov '06 - 18:39 »
There's another update in the BASSMIDI ZIP (see the first post). To reduce distribution sizes, SF2 sample packing (and unpacking) functions have been added. A function to retrieve all markers and lyric events has also been added.

Unless any bugs show up, I think this is pretty much ready for "final" release :)

iCorp

  • Posts: 65
Re: BASSMIDI beta
« Reply #27 on: 9 Nov '06 - 21:34 »
Hello, Ian!

When I use long reverb on the midi file I can't hear this reverb when song ended.
The file is stopped exactly at the end without any reverberation.

The midi file with long (1-2 sec) 'after end' reverb attached.

Thank you.

Ian @ un4seen

  • Administrator
  • Posts: 20389
Re: BASSMIDI beta
« Reply #28 on: 10 Nov '06 - 13:35 »
Yep, a DECAYEND flag is now included. It won't wait for reverb DSP to fade out (BASSMIDI doesn't know/care about any DSP set on it), but it will wait for the ending to decay naturally.

Sample pre-loading options have also been added, as has support for "cue" MIDI events. The OSX version is also up now. I think this will be the "final" version, if no bugs are found, and I can't think of anything else to add :)

iCorp

  • Posts: 65
Re: BASSMIDI beta
« Reply #29 on: 10 Nov '06 - 14:06 »
Yep, a DECAYEND flag is now included. It won't wait for reverb DSP to fade out (BASSMIDI doesn't know/care about any DSP set on it), but it will wait for the ending to decay naturally.

Thank you Ian!

I think this will be the "final" version, if no bugs are found, and I can't think of anything else to add :)

DLS support  ;)

Ian @ un4seen

  • Administrator
  • Posts: 20389
Re: BASSMIDI beta
« Reply #30 on: 10 Nov '06 - 17:55 »
Btw, if anyone wants to translate the MIDITEST example to Delphi, that'd be useful :)

iCorp

  • Posts: 65
Re: BASSMIDI beta
« Reply #31 on: 13 Nov '06 - 20:33 »
Btw, if anyone wants to translate the MIDITEST example to Delphi, that'd be useful :)

I done. Delphi project attached.
But without LyricSync Callback.
Sorry, can't translate it.
Can anybody help me?

And btw I found error in the bassmidi.pas
Line 91:
function BOOL BASS_MIDI_StreamEvent(...
Need to delete BOOL

Thank you.

engineeer

  • Posts: 86
Re: BASSMIDI beta
« Reply #32 on: 14 Nov '06 - 00:08 »
I done. Delphi project attached.
But without LyricSync Callback.
Sorry, can't translate it.
Can anybody help me?

Fixed, including bassmidi.pas ;)

iCorp

  • Posts: 65
Re: BASSMIDI beta
« Reply #33 on: 14 Nov '06 - 08:37 »
Fixed, including bassmidi.pas ;)

I can't see Lyrics anyway  :(
In your compiled exe file too.
When I try to open project I see "Error Reading Form":
"Error reading lbLyrics.ExplicitLeft (Top, Height, Width) property does not exist."

radio42

  • Posts: 4573
Re: BASSMIDI beta
« Reply #34 on: 14 Nov '06 - 09:20 »
Anyone willing to provide a C# or VB sample for BASS.NET ?

engineeer

  • Posts: 86
Re: BASSMIDI beta
« Reply #35 on: 14 Nov '06 - 10:15 »
I can't see Lyrics anyway  :(
In your compiled exe file too.
I tried with takelong.mid and it works... see screenshoot...

When I try to open project I see "Error Reading Form":
"Error reading lbLyrics.ExplicitLeft (Top, Height, Width) property does not exist."
It's BDS2006 incompatibility with previous Delphi versions, should be fixed now...

iCorp

  • Posts: 65
Re: BASSMIDI beta
« Reply #36 on: 14 Nov '06 - 11:10 »
I tried with takelong.mid and it works... see screenshoot...

Oh, sorry.
I used old bassmidi.dll  ::)

When I try to open project I see "Error Reading Form":
"Error reading lbLyrics.ExplicitLeft (Top, Height, Width) property does not exist."
It's BDS2006 incompatibility with previous Delphi versions, should be fixed now...

Yes, thank you.
Works fine.

Ian @ un4seen

  • Administrator
  • Posts: 20389
Re: BASSMIDI beta
« Reply #37 on: 14 Nov '06 - 15:18 »
Thanks for the Delphi MIDITEST translation. The "final" release is now up on the BASS page.

Btw, I noticed the translation was based on an old version of the example, so I updated it (mainly the soundfont loading). Hopefully it still works ;)

iCorp

  • Posts: 65
Re: BASSMIDI beta
« Reply #38 on: 14 Nov '06 - 16:07 »
Btw, I noticed the translation was based on an old version of the example, so I updated it (mainly the soundfont loading). Hopefully it still works ;)

Not working  :)
I added "(" in line 165
if (newfont<>0) and (newfont<>sfont) then....

I attached the file.

Ian, I can't get lyrics when I use BASS_FX_TempoCreate and can't change sound font "on the fly".
Code:

Chan := BASS_MIDI_StreamCreateFile(FALSE,PChar(FileName),0,0,BASS_STREAM_DECODE OR BASS_MIDI_DECAYEND,0);
Chan := BASS_FX_TempoCreate(chan, BASS_STREAM_AUTOFREE);

Can you suggest something?



iCorp

  • Posts: 65
Re: BASSMIDI beta
« Reply #39 on: 14 Nov '06 - 16:20 »
Ian, how can I get all lyrics at once from karaoke file?
Thank you.

(: JOBnik! :)

  • Posts: 1065
Re: BASSMIDI beta
« Reply #40 on: 14 Nov '06 - 16:31 »
Hi ;D

Ian, I can't get lyrics when I use BASS_FX_TempoCreate and can't change sound font "on the fly".
Code:

Chan := BASS_MIDI_StreamCreateFile(FALSE,PChar(FileName),0,0,BASS_STREAM_DECODE OR BASS_MIDI_DECAYEND,0);
Chan := BASS_FX_TempoCreate(chan, BASS_STREAM_AUTOFREE);

Can you suggest something?

You should work with the source/midi handle and not tempo handle to get/set info: lyrics/soundfonts
« Last Edit: 14 Nov '06 - 16:33 by (: JOBnik! :) »

iCorp

  • Posts: 65
Re: BASSMIDI beta
« Reply #41 on: 14 Nov '06 - 16:43 »
You should work with the source/midi handle and not tempo handle to get/set info: lyrics/soundfonts

Thank you!

xmen

  • Posts: 5
Re: BASSMIDI beta
« Reply #42 on: 14 Nov '06 - 23:31 »
Hi I try to create midi stream
has error with 'Floating point division by zero'

var Stream:HSTREAM;

Stream := BASS_MIDI_StreamCreate(16,0,44100);

Thank you.

Ian @ un4seen

  • Administrator
  • Posts: 20389
Re: BASSMIDI beta
« Reply #43 on: 15 Nov '06 - 15:00 »
Not working  :)
I added "(" in line 165
if (newfont<>0) and (newfont<>sfont) then....

Corrected now, thanks.

Ian, how can I get all lyrics at once from karaoke file?

BASS_MIDI_StreamGetMarks will do that. See the docs for an example.

Hi I try to create midi stream
has error with 'Floating point division by zero'

var Stream:HSTREAM;

Stream := BASS_MIDI_StreamCreate(16,0,44100);

Oops, a corrected DLL is now in the BASSMIDI download.

xmen

  • Posts: 5
Re: BASSMIDI beta
« Reply #44 on: 16 Nov '06 - 13:17 »
Quote
Quote from: xmen on 14 Nov '06 - 23:31
Hi I try to create midi stream
has error with 'Floating point division by zero'

var Stream:HSTREAM;

Stream := BASS_MIDI_StreamCreate(16,0,44100);

Quote
Oops, a corrected DLL is now in the BASSMIDI download.

Thanks,it OK
i make synth sample in c work fine  !
and i will convert to delphi sample :)

swakke

  • Guest
Re: BASSMIDI beta
« Reply #45 on: 22 Nov '06 - 15:27 »
I want to read all the lyrics at once but I don't know witch parameter to give for the markers in vb.

BASS_MIDI_StreamGetMarks(KarChan, BASS_MIDI_MARK_LYRIC, ???, 0)

In C++ you can give Null but what in vb?

radio42

  • Posts: 4573
Re: BASSMIDI beta
« Reply #46 on: 22 Nov '06 - 16:16 »
What about "null" ? ;-)

Antwan

  • Posts: 21
Re: BASSMIDI beta
« Reply #47 on: 22 Nov '06 - 16:33 »
In Visual Basic 6 its 'Null' but in VB.NET 2003 & 2005 its 'Nothing'

so VB6:

BASS_MIDI_StreamGetMarks(KarChan, BASS_MIDI_MARK_LYRIC, Null, 0)

VB.NET Platforms:

BASS_MIDI_StreamGetMarks(KarChan, BASS_MIDI_MARK_LYRIC, Nothing, 0)

Ian @ un4seen

  • Administrator
  • Posts: 20389
Re: BASSMIDI beta
« Reply #48 on: 22 Nov '06 - 17:18 »
I guess the "As BASS_MIDI_MARK" in the BASS_MIDI_StreamGetMarks declaration means that VB won't accept "Null". I've changed that to "As Any" now (done the same for BASS_MIDI_StreamGetFonts too), and put the updated BASSMIDI.BAS in the BASSMIDI download.

Btw, while looking at that, I noticed there was a silly bug in BASS_MIDI_StreamGetMarks that meant it wouldn't give the LYRIC markers anyway, so there's an updated DLL in there too :)

swakke

  • Guest
Re: BASSMIDI beta
« Reply #49 on: 22 Nov '06 - 20:12 »
Ian, you are the best