/*s*/ /* code::xor */


/*s*/ /* Kommentar*/
/*
      Kodiert den Text mit einem XOR.
      Wenn der Schlüsselvorrat zu ende ist, wird Blockkodiert.
*/
/*e*/

{
 long int i;
 long int j;
 long int k;
 i=0;
 j=0;
 k=0;
 do // Solange schleifen bis Text zu ende ist
   {
         j=0;
     for(j=0;j<keylength & i<txtlength;i++,j++) // Schleifen bis Key fertig - J wird Initialisiert(!)
        {
          *(txt+i) ^= *(key+j);
        }
   }
   while(i<txtlength);

   return((char*) txt);

}

/*e*/


