Author Topic: Tiny Future Composer Player for C/C++, FreeBasic and PureBasic (Read 22576 times)

slippy · « **on:** October 04, 2007 »

Quote

Tiny Future Composer library for Win32
--------------------------------------
04/10/2007

This library is a tiny implementation of the well-known and famous amiga-based Future Composer sound format

Credits:
Original FC replayer core coding by Michael Schwendt (back in 1997)
optimized and packed as static library with own background threaded DirectX replayer by SLiPPY/VeCTRONiX!

Usage
-------

int FC_Initialize(bool inMem, void* pMusicBuffer, int inMemSize, char* filename);
called once for initialization of the replayer
either use it with a pointer to the FC module or provide a filename for it (don't forget the inMem switch)

int FC_StartPlayer();
starts the current song

int FC_StopPlayer();
stops the current song

Perhaps you might want to add additional language bindings ...

As this package is more than 300kb it's not attached ... so you may download it here

Have fun using it ...

SLiPPY

benny! · « **Reply #1 on:** October 04, 2007 »

Awesome work, slippy. Thanks so much for releasing this lib !!!
K++

Clyde · « **Reply #2 on:** October 04, 2007 »

That is indeed awesome work.

For Freebasic users, which files go where please Slippy dude?

Ps. Where do we get Future Composer modules?

Cheers and all the very best,
Clyde

stormbringer · « **Reply #3 on:** October 04, 2007 »

@Clyde: go here: http://www.exotica.org.uk/frames.html and select Tunes and then you have a list of tunes per format. Search for FutureComposer (FC13 FC14) and you get a link with dozens of them

or you can find some others here too: ftp://ftp.modland.com/pub/modules/

Clyde · « **Reply #4 on:** October 04, 2007 »

Thanks for the links Stormbringer dude

Rbz · « **Reply #5 on:** October 05, 2007 »

Great library slippy, well done

va!n · « **Reply #6 on:** October 05, 2007 »

cool... cant test it atm

will take closer look later when i get back own internet... (i die without internet and livestream radio ^^)

energy · « **Reply #7 on:** October 05, 2007 »

Hi Slippy!
Thanks for this great peace of soft...

Purebasic 4.1Beta3
Tested DLL included in Exe.... runs perfect....

But a Problem with Static Lib from the VC++ Folder...
Compiler gets an error: "Unresolved external symbol: __iob_func"

Dsound.lib is included...
Can yu help me?
Thanx
Best regards
eNeRGy

Clyde · « **Reply #8 on:** October 05, 2007 »

I use Freebasic, and am unsure where to put the relevant files. Is there a readme?

Cheers and awesome stuff,
Clyde

Shockwave · « **Reply #9 on:** October 05, 2007 »

K++ For the great lib!

Clyde, treat the files the same as the tinysid lib files.
In fact if you put them all in your usual source directory it should even work like that.

Clyde · « **Reply #10 on:** October 05, 2007 »

Thanks dude.

slippy · « **Reply #11 on:** October 05, 2007 »

@Clyde: apologies for not including a simple readme.txt - thought my samples would answer most of the usage questions

Anyway ... just do it like Shocky said ...

@energy: static linking with PB? Perhaps you might want to use the library which is located in the MinGW folder ... this one works very well for FB ... else I have to hand over the question to a PB-crack here

@rest: thanks for your feedback ...

Cheers,
SLiPPY

Shockwave · « **Reply #12 on:** October 05, 2007 »

The sample listings were clear enough Slippy

and anyway, any problems that come up can be answered here... You do not need to apologise for anything! It's a great lib and I'm grateful for it! So will most other people.

Clyde · « **Reply #13 on:** October 05, 2007 »

I think its an awesome library and am going to produce a production with it.

I've put the libstc++.a and the libtiny_fc.a into the lib folder, and the tiny_fc.bi into the include folder. And this is an experiment with your neat library in conjunction with tinyptc / tinyptc_ext

Code: [Select]

Option Explicit
Option Static


#Include Once "tinyPTC.bi"
#include Once "tiny_fc.bi"
#Include Once "Windows.bi"

Const XRES=640
Const YRES=480
Const ARES=XRES*YRES

Dim Shared ScreenBuffer( ARES )
dim shared dummy as integer



If( ptc_open( "testing", XRES, YRES ) = 0 ) Then
    End -1                                    
End if


initFC(0, @dummy, 0, "sample.fc")
startFC()

Dim Key As String

While Key<>Chr(27)
    
    
    PTC_Update @ScreenBuffer(0)
    key=Inkey

Wend


stopFC()
PTC_Close()

But I don't get any sound at all, and also the program crashes when it ends on a key press. It might be something I am doing wrong. Btw, im using FB 17

Cheers,
Clyde.

Shockwave · « **Reply #14 on:** October 05, 2007 »

Do the example programs that Slipy provided compile and run Clyde?

Clyde · « **Reply #15 on:** October 05, 2007 »

Yes they do dude.

Shockwave · « **Reply #16 on:** October 05, 2007 »

Then in that case you should use that code as your base and build around it.

Clyde · « **Reply #17 on:** October 05, 2007 »

More Karma for you Slippy++, and thanks for the tip Shockwave.

Changed around a few things and it works. Hoe this basis is of use to others too.

Code: [Select]


Option Explicit
Option Static


#Include Once "tinyPTC.bi"
#include Once "tiny_fc.bi"
#Include Once "Windows.bi"

Const XRES=640
Const YRES=480
Const ARES=XRES*YRES

Dim Shared ScreenBuffer( ARES )
dim shared dummy as integer

initFC(0, @dummy, 0, "sample.fc")
startFC()

If( ptc_open( "testing", XRES, YRES ) = 0 ) Then
    End -1                                    
End if




Dim Key As String

While Key<>Chr(27)
    
    
    PTC_Update @ScreenBuffer(0)
    key=Inkey

Wend


PTC_Close()
stopFC()

slippy · « **Reply #18 on:** October 05, 2007 »

@Clyde: Glad you like the lib ... and hey, of course I'm looking forward to see your prods using the lib

Shockwave · « **Reply #19 on:** October 05, 2007 »

Glad you got it working Clyde