#include <stdio.h>
FILE *fp,*fp1,*fp2;
char a[20],b[60],c[80],head[72][80];
main(int ac,char **av)
{
  int i,j,k=0;
  int ia;
  int j1,j2,j3,j4;
  if(ac<4){ printf("\n\t*** get fits messages (2010) *****\n");
            printf("\n\tUsage: getfit row col len [n]");
            printf("\n\tEx: getfit 29 70 7 7");
            printf("\n\tEx: getfit 29 24 6\n\n");
            exit(0);
          }
  sscanf(av[1],"%d",&j1);
  sscanf(av[2],"%d",&j2);
  sscanf(av[3],"%d",&j3);
  if(ac>4)sscanf(av[4],"%d",&j4); else j4=0;
  system("ls p*.fit >getfit.tmp");
  fp2=fopen("getfit.tmp","r");
l20:
  fgets(b,60,fp2);  if(feof(fp2))goto l80;
  b[strlen(b)-1]=0;
  fp=fopen(b,"rb"); fread(head,72,80,fp); fclose(fp);
  head[j1][j2+j3]=0;
  if(j4==0)printf("%s %s\n",b,&head[j1][j2]);  else {
     k++; if(k>j4)exit(0);  printf("%4d: %s %s\n",k,b,&head[j1][j2]);
  }
  goto l20;  
l80:
  fclose(fp2);
  system("rm getfit.tmp");
}