#include<stdio.h>
#include<string.h>
#include<ctype.h>

void main(int argc,char *argv[]){
FILE *fp,*sp;
char c,s[20];
struct {
	unsigned long pos;
	unsigned long siz;
	unsigned long blk;
	unsigned long num;
	}bb;	
unsigned long l,l0,i,j,k,n,m,i0,n0;
if(argc<2)exit(1);

for(i=0;i<strlen(argv[1]);i++){
	if(argv[1][i]=='.'){
		s[i]='\0';
		break;
		}
	s[i]=argv[1][i];
	}
strcat(s,".bmp");
if((fp=fopen(argv[1],"rb"))==NULL)exit(1);
if((sp=fopen(s,"wb"))==NULL)exit(1);
/* Write BMP Header */
for(i=0;i<2;i++){
	c=fgetc(fp);
	fputc(c,sp);
	}
for(i=0;i<2;i++){
	c=fgetc(fp);
	}
fread(&l0,sizeof(long),1,fp);
fwrite(&l0,sizeof(long),1,sp);
l=0L;
fwrite(&l,sizeof(long),1,sp);
l=0x436L;
fwrite(&l,sizeof(long),1,sp);

fseek(fp,0x1cL,SEEK_SET);
fread(&l,sizeof(long),1,fp);
fseek(fp,8L,SEEK_SET);
fread(&l0,sizeof(long),1,fp);
fseek(fp,l0,SEEK_SET);
for(i=l0;i<l;i++){
	c=fgetc(fp);
	fputc(c,sp);
	}

fseek(fp,0x14L,SEEK_SET);
fread(&n,sizeof(long),1,fp);
fread(&m,sizeof(long),1,fp);
for(i=0;i<m;i++){
	l0=0x1cL+i*n*sizeof(bb);
	fseek(fp,l0,SEEK_SET);
	fread(&bb,sizeof(bb),1,fp);
	n0=bb.num;
	for(j=0;j<n0;j++){
		for(i0=0;i0<n;i0++){
			l0=0x1cL+(i*n+i0)*sizeof(bb);
			fseek(fp,l0,SEEK_SET);
			fread(&bb,sizeof(bb),1,fp);
			fseek(fp,bb.pos+j*bb.blk,SEEK_SET);
			for(k=0;k<bb.blk;k++){
				c=fgetc(fp);
				fputc(c,sp);
				}
			}
		}
	}

fclose(sp);
fclose(fp);
}