Compressing many booleans

[Arkan]

I was wondering if it is possible to compress, say 75 booleans (or integers with 0/1 values) to a small number to use in a save/load code?

Is it possible without consuming shitloads of digits?

 

[Frozenwind]

The only way I can think of atm is merging them (am tired, so I go sleep now):

A and B are both 0, so lets store the value "0"
A = 0 B = 1, so let's store "1"
A = 1 B = 0, so let's store "2"
A and B are both 1, so lets store the value "3"

get it?

frozenwind.

 

[Arkan]

I get your thinking, but how would I do that without doing 75^2 if-statements if you know what I mean?

 

[SFilip]

globals
    boolean u_b1
    boolean u_b2
    boolean u_b3
    boolean u_b4
    boolean u_b5
    boolean u_b6
    boolean u_b7
    boolean u_b8
endglobals

function B2I takes boolean b returns integer
    if (b) then
        return 1
    endif
    return 0
endfunction

function PackBooleans takes boolean b1, boolean b2, boolean b3, boolean b4, boolean b5, boolean b6, boolean b7, boolean b8 returns integer
    return ((((((((B2I(b8)*128)+B2I(b7)*64)+B2I(b6)*32)+B2I(b5)*16)+B2I(b4)*8)+B2I(b3)*4)+B2I(b2)*2)+B2I(b1))
endfunction

function UnpackBooleans takes integer i returns nothing
    set u_b8 = (i/128 == 1)
    set u_b7 = (ModuloInteger((i/64), 2) == 1)
    set u_b6 = (ModuloInteger((i/32), 2) == 1)
    set u_b5 = (ModuloInteger((i/16), 2) == 1)
    set u_b4 = (ModuloInteger((i/8), 2) == 1)
    set u_b3 = (ModuloInteger((i/4), 2) == 1)
    set u_b2 = (ModuloInteger((i/2), 2) == 1)
    set u_b1 = (ModuloInteger(i, 2) == 1)
endfunction

PackBooleans will return a number between 0 and 255.
The globals block used here requires NewGen, but you can easily modify it to work with udg variables.

 

[Cohadar]

You know you would be actually helping him more if you said: it's not possible.
I mean 75 booleans...

 

[phyrex1an]

75 booleans needs a 22 character numerical string (worst case ofc), not to mention that you need do do some thinking to get around the 32bit size of the jass integer. You could encode the booleans in three chunks (25 booleans at a time). But that would give you a 24 character string at worst, not counting seperators.

Outcome: Have a look at one of the more general purpose save load systems out there. I suggest that you check out vexorians system first since I know that it can do this easily. Feeding it with boolean values doesn't have a negative effect at all.

 

[Chocobo]

You know you would be actually helping him more if you said: it's not possible.
I mean 75 booleans...

You can try to convert the 75 booleans (37778931862957161709568 possibilities) to binaries numbers (0 and 1) then compress them into a Base36 (15 digits : 221073919720733357899776 possibilities) or a Base62 (13 digits : 200028539268669788905472 possibilities).

Do you really need to save 75 booleans? It make a really long string message after converting all that (13 digits look small but when you type it...).

 

[Arkan]

I'm just fooling around with an idea, thanks for that code SFilip.
I'll also check out Vex's save/load.