OpenEuphoria

Re: puzzled again (about compression)

• Posted by Ralf Nieuwenhuijsen <nieuwen at XS4ALL.NL> Sep 18, 1999
• 543 views

Christopher K. Lester wrote:
> I do need a program that will compress and decompress files. Where would I
> find something like that?

        Eh.. i posted it on the list-serv yesterday... eupbit.e
        If yo do this all your normal output will be compressed:

        -- Eupbit Demonstration

                include eupbit.e

        -- "Hello, world" to the screen compressed..

                set_cp (CP_NORMAL)
                puts(1,"Hello, world\n")
                set_cp (CP_OFF)

-- That's it :)
-- Akthrough there is (now i think about it) a bug in it, if you write
-- to a file and then you close it, the last character (from compression
-- stack) is written out, but if you set compression off first it is
-- not!

There will more compression with bigger files... and less with smaller
:)

I will set the compression ratio higher, but then i have to cut each
byte.. then also few data will be written in less bytes.

Please enjoy until an update.....
(BTW If you only want compression, get Daniel Berstein's routines, and
modify them for your needs, (at this point there are still faster than
mine..) (But it will not allow you to use the normal output/input
routines)

Ralf Nieuwenhuijsen
nieuwen at xs4all.nl

> Thanks in advance!
> ck