unpackung bin files

[MaxOff]

Hey,

because i had to modify some of the bin files i had to first unpack and then repack them.

and because im such a nice guy im releasing the unpack part in pseudo code.
For the lasy guys who dont want it look up themself.

Note: All operations and fields are signed, unless stated otherwise.

binFile
{
	dword	Date;		//Formated in decimal
	dword	Crypt;
	dword	Length;
	byte	CheckSum1;
	byte	Data[Length];
	byte	CheckSum2
}

Decryption in pseudo code
if (CheckSum1 != CheckSum2)
	FAIL
checkSum3= Crypt;
for (counter= 0; counter > Length; counter++)
{
	checkSum3+= Data[counter];
	Data[counter]-= counter;
	if (counter % Crypt == 0) //unsigned
		Data[counter]-= Crypt;
}
if (checkSum3 != CheckSum1)
	FAIL
SUCCESS