{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L5[i]=R4[i];
	for(i=1;i<33;i++)//R5為L4與f(R,K)進行不進位二進制加法運算結果
    {
		R5[i]=L4[i]+frk[i];
		if(R5[i]==2)
          R5[i]=0;
    }
//進行第六次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R5[E[i-1]];
	for(i=1;i<=48;i++)//與K11按位作不進位加法運算
	  RE1[i]=RE1[i]+K11[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L6[i]=R5[i];
	for(i=1;i<33;i++)//R6為L5與f(R,K)進行不進位二進制加法運算結果
    {
		R6[i]=L5[i]+frk[i];
		if(R6[i]==2)
          R6[i]=0;
    }
//進行第七次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R6[E[i-1]];
	for(i=1;i<=48;i++)//與K10按位作不進位加法運算
	  RE1[i]=RE1[i]+K10[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L7[i]=R6[i];
	for(i=1;i<33;i++)//R7為L6與f(R,K)進行不進位二進制加法運算結果
    {
		R7[i]=L6[i]+frk[i];
		if(R7[i]==2)
          R7[i]=0;
    }
//進行第八次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R7[E[i-1]];
	for(i=1;i<=48;i++)//與K9按位作不進位加法運算
	  RE1[i]=RE1[i]+K9[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L8[i]=R7[i];
	for(i=1;i<33;i++)//R8為L7與f(R,K)進行不進位二進制加法運算結果
    {
		R8[i]=L7[i]+frk[i];
		if(R8[i]==2)
          R8[i]=0;
    }
//進行第九次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R8[E[i-1]];
	for(i=1;i<=48;i++)//與K8按位作不進位加法運算
	  RE1[i]=RE1[i]+K8[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L9[i]=R8[i];
	for(i=1;i<33;i++)//R9為L8與f(R,K)進行不進位二進制加法運算結果
    {
		R9[i]=L8[i]+frk[i];
		if(R9[i]==2)
          R9[i]=0;
    }
//進行第十次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R9[E[i-1]];
	for(i=1;i<=48;i++)//與K7按位作不進位加法運算
	  RE1[i]=RE1[i]+K7[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L10[i]=R9[i];
	for(i=1;i<33;i++)//R10為L9與f(R,K)進行不進位二進制加法運算結果
    {
		R10[i]=L9[i]+frk[i];
		if(R10[i]==2)
          R10[i]=0;
    }
//進行第十一次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R10[E[i-1]];
	for(i=1;i<=48;i++)//與K6按位作不進位加法運算
	  RE1[i]=RE1[i]+K6[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L11[i]=R10[i];
	for(i=1;i<33;i++)//R11為L10與f(R,K)進行不進位二進制加法運算結果
    {
		R11[i]=L10[i]+frk[i];
		if(R11[i]==2)
          R11[i]=0;
    }
//進行第十二次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R11[E[i-1]];
	for(i=1;i<=48;i++)//與K5按位作不進位加法運算
	  RE1[i]=RE1[i]+K5[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L12[i]=R11[i];
	for(i=1;i<33;i++)//R12為L11與f(R,K)進行不進位二進制加法運算結果
    {
		R12[i]=L11[i]+frk[i];
		if(R12[i]==2)
          R12[i]=0;
    }
//進行第十三次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R12[E[i-1]];
	for(i=1;i<=48;i++)//與K4按位作不進位加法運算
	  RE1[i]=RE1[i]+K4[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L13[i]=R12[i];
	for(i=1;i<33;i++)//R13為L12與f(R,K)進行不進位二進制加法運算結果
    {
		R13[i]=L12[i]+frk[i];
		if(R13[i]==2)
          R13[i]=0;
    }
//進行第十四次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R13[E[i-1]];
	for(i=1;i<=48;i++)//與K3按位作不進位加法運算
	  RE1[i]=RE1[i]+K3[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L14[i]=R13[i];
	for(i=1;i<33;i++)//R14為L13與f(R,K)進行不進位二進制加法運算結果
    {
		R14[i]=L13[i]+frk[i];
		if(R14[i]==2)
          R14[i]=0;
    }
//進行第十五次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R14[E[i-1]];
	for(i=1;i<=48;i++)//與K2按位作不進位加法運算
	  RE1[i]=RE1[i]+K2[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L15[i]=R14[i];
	for(i=1;i<33;i++)//R15為L14與f(R,K)進行不進位二進制加法運算結果
    {
		R15[i]=L14[i]+frk[i];
		if(R15[i]==2)
          R15[i]=0;
    }
//進行第十六次迭代
	for(i=1;i<=48;i++)//經過E變換擴充，由32位變為48位
	  RE1[i]=R15[E[i-1]];
	for(i=1;i<=48;i++)//與K1按位作不進位加法運算
	  RE1[i]=RE1[i]+K1[i];
	for(i=1;i<=48;i++)
    {
		if(RE1[i]==2)
          RE1[i]=0;
    }
	for(i=1;i<7;i++)//48位分成8組
	{
		s11[i]=RE1[i];
		s21[i]=RE1[i+6];
		s31[i]=RE1[i+12];
		s41[i]=RE1[i+18];
		s51[i]=RE1[i+24];
		s61[i]=RE1[i+30];
		s71[i]=RE1[i+36];
		s81[i]=RE1[i+42];
	}//下面經過S盒，得到8個數
	s[1]=s1[s11[6]+s11[1]*2][s11[5]+s11[4]*2+s11[3]*4+s11[2]*8];
	s[2]=s2[s21[6]+s21[1]*2][s21[5]+s21[4]*2+s21[3]*4+s21[2]*8];
	s[3]=s3[s31[6]+s31[1]*2][s31[5]+s31[4]*2+s31[3]*4+s31[2]*8];
	s[4]=s4[s41[6]+s41[1]*2][s41[5]+s41[4]*2+s41[3]*4+s41[2]*8];
	s[5]=s5[s51[6]+s51[1]*2][s51[5]+s51[4]*2+s51[3]*4+s51[2]*8];
	s[6]=s6[s61[6]+s61[1]*2][s61[5]+s61[4]*2+s61[3]*4+s61[2]*8];
	s[7]=s7[s71[6]+s71[1]*2][s71[5]+s71[4]*2+s71[3]*4+s71[2]*8];
	s[8]=s8[s81[6]+s81[1]*2][s81[5]+s81[4]*2+s81[3]*4+s81[2]*8];
	for(i=0;i<8;i++)//8個數變換輸出二進制
	{
		for(j=1;j<5;j++)
		{
 		  temp[j]=s[i+1]%2;
		  s[i+1]=s[i+1]/2;
		}
		for(j=1;j<5;j++)
	      f[4*i+j]=temp[5-j];
	}
	for(i=1;i<33;i++)//經過P變換
	  frk[i]=f[P[i-1]];
	for(i=1;i<33;i++)//左右交換
      L16[i]=R15[i];
	for(i=1;i<33;i++)//R16為L15與f(R,K)進行不進位二進制加法運算結果
    {
		R16[i]=L15[i]+frk[i];
		if(R16[i]==2)
          R16[i]=0;
    }
	int t[65]; 
	for(i=1;i<=32;i++)
    {
		t[i]=R16[i];
		t[i+32]=L16[i];
	}
    for(i=1;i<=64;i++)
		t1[i]=t[IP_1[i-1]];
}