Other Software > Developer's Corner

[FBSL] LZO compressor

(1/2) > >>

Gerome:
Hello,

Here is a simple demonstration of native LZO engine compression/decompression implemented into FBSL.
Enjoy!


--- Code: Text ---#Option Explicit#AppType Console '// ****************************************************************************'// Simple demonstration of native LZO engine compression/decompression implemented into FBSL'// Author : Gerome GUILLEMIN'// Date : 1st of October 2006'// ****************************************************************************Dim buff, fp Print "LZO compress..."buff = Compress(FileLoad(".\18 - Wedding idea.mp3")) If buff <> "" Then        fp = FileOpen(".\compressed.lzo", BINARY_NEW)        If fp Then                FilePut(fp, buff)                FileClose(fp)        End IfEnd IfClear bufffp = NULLPause Print "LZO decompress..."buff = Decompress(FileLoad(".\compressed.lzo"))If buff <> "" Then        fp = FileOpen(".\decompressed.mp3", BINARY_NEW)        If fp Then                FilePut(fp, buff)                FileClose(fp)        End IfEnd IfClear bufffp = NULLPause

f0dder:
I'd like a copy of the FBSL source code, please.

Gerome:
Hello,
I'd like a copy of the FBSL source code, please.
-f0dder (October 01, 2006, 09:29 AM)
--- End quote ---

Sorry, FBSL source code is shared between the 3 FBSL developpers.
It won't be shared publicly.

f0dder:
So, you've got a special non-GPL license for LZO? :)

Gerome:
So, you've got a special non-GPL license for LZO? :)
-f0dder (October 01, 2006, 11:26 AM)
--- End quote ---

WTF ?
I don't see the problem here ?
I'm not obliged to publish sources of FBSL, nor the official mini LZO sources since i've NOT modified its source code.

Navigation

[0] Message Index

[#] Next page