Search found 5884 matches

by albert
Sep 23, 2020 0:51
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

I came up with a Pizza commercial https://www.youtube.com/results?search_query=it+don%27t+come+easy It's a parody of Ringo Star's , 1971 hit "It don't come easy" parlor on the line it's close to dinner time and you know it comes so cheesy pizza pie time you can order online and you know it...
by albert
Sep 23, 2020 0:14
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

Sorry Guys... It couldn't be decompressed , it had a stupid coding error... But playing around for a couple days , i came up with a new formula.. for a as longint = 1 to len( chrs ) step 1 v1 = ( *ubp ) : ubp+= 1 n2 = "" if v1 > 127 then n2+= "11" v1 = v1 mod 128 if v1 > 63 then ...
by albert
Sep 18, 2020 2:08
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@CoderJeff I'll start working on the de-compressor.. It might take me a day or so... Like i just posted above your post... The decompression is straight forward... map = "11" then the output is the output map <> "11" then the output is 4 digits. You might have to add a zero or tw...
by albert
Sep 18, 2020 1:38
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@angros47 I don't think you have taken a good look at the code.. It seems that you are just trying convince me , that my code that works , is impossible... For the decompression , it's simple.. If the map = "11" then the value is less than 4 digits.. you input the value If the map = "...
by albert
Sep 18, 2020 0:40
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@angros47 Why are you stalking me , and posting against me?? What have i done to you?? If you don't like my post then ignore it.. What drives you to respond with negativity??? The code works , just run it , and you'll see it works.. I've already gone over it , dozens of times before i posted it.. Tt...
by albert
Sep 17, 2020 23:57
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

Richard , kept telling me , If you want to compress , you have to look for patterns.. But i told him , in random data there are no patterns. The only way to compress random data , is to modify the random data , so that Zlib can compress it.. My above code does that.. It modifies the data so that Zli...
by albert
Sep 17, 2020 21:07
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Yah-Zip

@StoneMonkey @CoderJeff Here it is with Dodicat's Zlib zip code If you hit (esc) to stop it early , you;ll see that it actually expands the data , but zlib is able to make it compress somehow. ' YAH-ZIP ' ' Writen in FreeBasic for Windows ' 'Zlibrary code by Dodicat , From Scottland ' ' compress_loo...
by albert
Sep 17, 2020 20:52
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@StoneMonkey I got it working...The 2 bit ( 0 ,1 , 2 , 3 ) Compresses 100,000 bytes by 78% after 100 loops...( but it takes like 60 seconds for 100 loops. ) I'm working on the de-compressor... It's a straight forward formula.. If you don't pad the binary with 0's , the first digit has to be a 1 , 2 ...
by albert
Sep 16, 2020 23:42
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@StoneMonkey On second thought ; it might work after all... The 2 bit descriptor = 0 if all 4 2 bit value are different descriptor = 0 if v1 , v2 , v3 , v4 , are all different.. descriptor = 1 if v1 = v2 descriptor = 2 if v2 = v3 descriptor = 3 if v3 = v4 maybe with a 3 bit descriptor you could do s...
by albert
Sep 16, 2020 23:28
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@StoneMonkey I beat you to it... I tried that formula awhile back.. It requires a pointer to each set.. 0,0,1,3 3,1,1,0 0013 could be 0 ( 13 ) 3110 could be 3 ( 10 ) Compresses by 2 bits , but it takes 2 bits to describe the values... If you get two sets 0,0,1,1 then the out would be 0,1 compress 4 ...
by albert
Sep 16, 2020 0:06
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@marcov Over the last couple years , I've tried several thousand formulas for data compression... None of them worked... The ones that did work , it was impossible to get decompression to undo the compression.. Mostly because of coding errors or output duplicates.. Random strings are abstract , so i...
by albert
Sep 13, 2020 0:18
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

I just know , it doesn't come out okay , without the 128 carry...

I played around with AND and MOD 5 and 10 , it didn't work..

So I'm done with it...
by albert
Sep 12, 2020 23:11
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

Maybe you could MOD or AND the byte by 5 or 10 , to see if there was a 5 carry over??
by albert
Sep 12, 2020 23:03
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@StnoeMonkey Here it is with the 5 carry... Run it and you'll see the compression It turns the 40 bytes input down to 17.5 bytes.. screen 19 Function halfer( fl As String ) As String dim as ushort carry = 0 dim as string s = fl dim as string ans = space( len( s ) ) dim as ushort v1 For a As Integer ...
by albert
Sep 12, 2020 23:01
Forum: General
Topic: Data Compression
Replies: 55
Views: 1366

Re: Data Compression

@StoneMonkey

Yeah.. You'd have to add the length in..
With photos and video , sometimes there's a lot of leading zeros..

But it doesn't compress... Unless you could make the carry 5 work.

Go to advanced search