Объяснить фрагмент программы

int comp(const void *a, const void *b) 
{
   return( strcmp( (char*) a, (char*) b) ); 
}

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <conio.h>
#include <locale.h>
#define n 11
#define N 7
#define st 500
 
        char copy(int q)
        {
        unsigned int k;
        k=q;
        return k;
        }
 
int comp(const void *a, const void *b) 
{
   return( strcmp( (char*) a, (char*) b) ); 
}
        
    int main ()
    {
    setlocale(LC_ALL,"Russian");
    int i,a=0,l=0,j;
    char s[n],k[n];
    unsigned int q;
    unsigned char c;
    FILE *fin,*flip;
    char p[]="21STR=",p2[]="21ALL=",zn[N];
    
    for(i=0;i<n;i++)
    {s[i]=0;k[i]=0;}
    
    for(i=0;i<st-1;i++)
 
 
    fin=fopen("wslog.txt","r");
    flip=fopen("otchet.txt","w");
    fprintf(flip,"   äàòà    - êîëëè÷åñòâî çàïðîñîâ \n");
    while(fgets(s,n,fin)!=NULL)
    {
    a++;
    while((q=fgetc(fin))!='\n')
     {}
     if (0 == strcmp(s,k))
        l++;
     else
         {
         fputs(k,flip);
         if(l!=0)
         fprintf(flip," - %d \n",l);
         l=1;
             for(i=0;i<n;i++)
             {
             q=s[i];
             k[i]=copy(q);
             }
         }
}
 fprintf(flip,"êîëëè÷åñòâî çàïðîñîâ %d\n",a);
 fclose(fin);
 fclose(flip);
 
fin=fopen("wslog.txt","r");
flip=fopen("s21.txt","w");
a=1;
l=0;
while((q=fgetc(fin))!=EOF)
{
  if(q==83)
  {
     i=0;
     while(i<6)
       {
      q=fgetc(fin);
      if(q==p[i])
      l+=1;
      else
      if(q==p2[i])
      l+=1;
      else
      {l=0;break;}
      i++;
      }
      if(l==6)
      {
      l=0;
      q=fgetc(fin);
          while((q!=38)&&(q!=10)&&(q!=EOF))
          {
          fputc(q,flip);
          q=fgetc(fin);
          }
          fprintf(flip,"\n");
  }    }   
}
 
fclose(fin);
fclose(flip);
fin=fopen("s21.txt","r");
flip=fopen("sort.txt","w");
        while(fgets(s,2,fin)!=NULL)
        {c=s[0];
        if(c!=10)
          {
            fprintf(flip,"\n");
            fputc(c,flip);
            while((q=fgetc(fin))!=10)
            {
            fputc(q,flip);                           
            }
          }
        }   
fclose(fin);
fclose(flip);
l=1;
char str[st],kopy[st];;
fin=fopen("sort.txt","r");
while(fgets(str,st,fin)!=NULL)
{
l++;
}  
 
 
char z[l][st];
int flag;
for(i=0;i<l-1;i++)
  for(j=0;j<st-1;j++)
   z[i][j]=0;
fclose(fin);
fin=fopen("sort.txt","r");
 
i=0;
fgets(z[i],st,fin);
while(fgets(str,st,fin)!=NULL)
{
if(strcmp(z[i],str)!=0)
for(j=0;j<i+1;j++)
if(strcmp(z[j],str)==0)
{flag=0;break;}
else
flag=1;
 
       if(flag)
       {
       strcpy(z[i++],str);
       flag=0;
       }
}
  
qsort(z,i,sizeof(z[0]),comp);
fin=fopen("sort.txt","r");
flip=fopen("otchet.txt","a");
for (j=0;j<st;j++)
{str[j]=0;}
l=0;
 
printf("%d",i);
 
for(j=0;j<i+1;j++)
{    rewind(fin);
     while(fgets(str,st,fin)!=NULL)
     {
     if(strcmp(z[j],str)==0)
     l++;
     }
     if(l!=0)
     {   
     fprintf(flip,"%d - ",l);
     fputs(z[j],flip);
     }
     l=0;                
}
printf("äàííûå ïîäñ÷èòàííû.Ðåçóëüòàòû ðàáîòû çàïèñàííû â ôàéë otchet.txt");
getch();
}

for(i=0;i<n;i++)
             {
             q=s[i];
             k[i]=copy(q);
             }