#include "stdio.h"
#define numDT 5
unsigned char DD[]={0x7A, 0x2E, 0x13,0x37,0xDE};
unsigned char VParity(unsigned char D, int Odd){//垂直パリティ 
	unsigned R; //Odd: 奇数パリティのとき1, 偶数パリティのとき0
	for(R = Odd; D; D >>= 1) R ^= (D&1);
	return R;
}
void byteBCS(unsigned char D[],int N, unsigned char BCS[]){
	BCS[0]=BCS[1]=0;
	for(int j=0, C = 0x80; j<8; j++, C>>=1){
		int CC=0, shift=7-j;
		for(int i=0;i<N; i++) if(DD[i] & C) CC++;
		BCS[0] |= (( CC >>1) & 1)<<shift;
		BCS[1] |= ( CC & 1)<<shift;
	}
}
void bitBCS(unsigned char D[],int N, unsigned char BCS[]){
	// D[]の最下位ビットにパリティビットが入っているものとする。
	int CH=0; for(int j=0;  j<N; j++)CH += D[j];
	BCS[0] =  (CH >>1) & 1;
	BCS[1] =  CH & 1;
}
void printBit(unsigned char D){
	for(int M=0x80;M!=0; M>>=1) printf("%d ", D&M?1:0);
}
void checkPrintBCS(int Odd){
	unsigned char Par[numDT];
	for(int i=0;i<numDT;i++) Par[i]=VParity(DD[i], 0);
	unsigned char BCS[2], ParBCS[2];
	printf("\n Code Bit Pattern     Parity");
	printf("\n ---------------------------");
	for(int i=0; i<numDT; i++){
		printf("\n  %2X  ", DD[i]); printBit(DD[i]);
		printf("  %d ", Par[i]); 
	}
	byteBCS(DD,numDT,BCS);bitBCS(Par, numDT, ParBCS);
	printf("\n ---------------------------");
	printf("\n   (1の個数の下位2ビット)");
	printf("\n ---------------------------");
	for(int i=0; i<2; i++){
		printf("\n  %2X  ", BCS[i]); printBit(BCS[i]);
		printf("  %d ", ParBCS[i]); 
	}
}
int main(void)
{
	checkPrintBCS(0);
	printf("\n\n");getchar();
	return 0;
}