剑芒罗曼史2解图片程序

剑芒罗曼史2解图片程序

mcg文件

file head 40h
---------------------------
10h palette offset
1ch width
20h height
---------------------------

palette 400h
---------------------------
BMP's palette
---------------------------

pixel data
使用一种比较特殊的压缩法，至少是我不知道的，呵呵，具体的解码函数看0x422990吧

使用工具

IDA 4.0
TRW 2000

注：
dat/plane/n0.mcg，实际上不是mcg文件，好像是bmp吧，先把它换名再运行才不会出问题！

#include <stdio.h>
#include <windows.h>
#include <malloc.h>
#include <io.h>
#include <conio.h>

typedef struct BITMAPHEADER
{
   unsigned short type;
   unsigned long  size;
   unsigned long  reserved;
   unsigned long  offbits;
   unsigned long  headsize;
   unsigned long  width;
   unsigned long  height;
   unsigned short planes;
   unsigned short bit; 
} BITMAPHEADER;

void encode(BYTE *dst,DWORD length1,BYTE *src,DWORD length2);

void LoadXmp(DWORD &w,DWORD &h,BYTE* &data,char *name)
{
   BITMAPHEADER bmph;
   FILE *fp;
   char *tmp,*line;
   int i,pitch;
   unsigned j;

   fp=fopen(name,"rb");
//   fp=CreateFile(name,0x80000000,1,NULL,3,0x10000080,0);
   
//   GetFileSize(fp,&w);

   data=(BYTE *)malloc(w);
   if(data==NULL)
   {
   printf("Out of memory!");
   return ;
   }

   fread(data,w,1,fp);

   fclose(fp);

//   ReadFile(fp,data,w,&h,NULL);

//   CloseHandle(fp);
}

void SaveBmp(DWORD w,DWORD h,BYTE *data,char * name)
{
FILE *f;
BITMAPFILEHEADER bithead;
BITMAPINFOHEADER bitinfo;
DWORD headsize,linesize,i,j,s,w1,h1;
unsigned long color;

if(data==NULL)
return ;

if((f=fopen(name,"wb"))==NULL)
{
   printf("write file error");
}

memcpy(&w1,data+0x1c,4);
memcpy(&h1,data+0x20,4);
// w1=(DWORD)(*(data+0x1c));
// h1=(DWORD)(*(data+0x20));

linesize=(w1+3)&0xfffffffc;
s=linesize-3;

headsize=sizeof(bithead)+sizeof(bitinfo);
bithead.bfType='MB';
bithead.bfSize=headsize+linesize*h1+1024;
bithead.bfReserved1=bithead.bfReserved2=0;
bithead.bfOffBits=headsize+1024;
fwrite(&bithead,1,sizeof(bithead),f);

bitinfo.biSize=sizeof(bitinfo);
bitinfo.biWidth=w1;
bitinfo.biHeight=h1;
bitinfo.biPlanes=1;
   bitinfo.biBitCount=8;
bitinfo.biCompression=BI_RGB;
bitinfo.biSizeImage=0;
   bitinfo.biXPelsPerMeter=72;
bitinfo.biYPelsPerMeter=72;
bitinfo.biClrUsed=0;
   bitinfo.biClrImportant=0;
fwrite(&bitinfo,1,sizeof(bitinfo),f);

fwrite(data+0x40,0x400,1,f);

BYTE *pixel_data;
pixel_data=(BYTE *)malloc(linesize*h1);
if(pixel_data==NULL)
{
printf("out of memory");
goto ret;
}

encode(pixel_data,linesize*h1,data+0x440,w-0x440);

for(i=0;i<h1;i++)
fwrite(pixel_data+linesize*(h1-i-1),linesize,1,f);

if(pixel_data!=NULL)
free(pixel_data);

ret:
fclose(f);
}

void encode(BYTE *dst,DWORD length1,BYTE *src,DWORD length2)
{
BYTE tmp[0x1000];
DWORD i,j,k,num;

memset(tmp,0,0x1000);

// i=(DWORD)src+length2;
__asm{
mov eax,src;
mov ebx,length2;
add eax,ebx;
mov i,eax;

mov eax,dst;
mov ebx,length1;
add eax,ebx;
mov k,eax;
}

__asm{
push ebx;
push edx;

push esi;

mov ebx,src;
mov edx,dst;
mov esi,0x0fee;

jmp _422a50;
_422a42:
shr num,1;
mov eax,num;
test ah,1;
jnz _422a5d;
_422a50:
mov cl,byte ptr [ebx];
mov ch,0xff;
and ecx,0xffff;
mov num,ecx;

inc ebx;
_422a5d:
test byte ptr num,1;
jz _422a80;
_422a64:
mov al,[ebx];
and esi,0x0fff;

mov ecx,esi;
inc esi;
inc ebx;

mov byte ptr [edx],al;
inc edx;

mov [ecx+tmp],al;

jmp _422ad8;
_422a80:
mov ax,[ebx];
mov cl,ah;

and eax,0x0fff;
shr cl,4;
add cl,3;
inc ebx;
inc ebx;

cmp cl,0;
jz _422ad7;

mov j,ebx;
mov bl,cl;
_422aab:
and eax,0x0fff;
and esi,0x0fff;

mov cl,byte ptr [tmp+eax];
mov [edx],cl;

mov [tmp+esi],cl;

inc eax;
inc esi;
inc edx;

dec bl;
jnz _422aab;
mov ebx,j;
_422ad7:
_422ad8:
cmp ebx,i;
jnb _ret;
cmp edx,k;
jb _422a42;
_ret:
pop esi;
pop edx;
pop ebx;
}
}

void main()
{
DWORD w,h;
BYTE *data;
bool ret;
int i;
long done;
_finddata_t f;

done=_findfirst("*.mcg",&f);
if(done==-1)
return ;
ret=false;

while(!ret)
{
w=f.size;
LoadXmp(w,h,data,f.name);

i=0;
next:
while(f.name[i]!='.')
i++;
if(!((f.name[i+1]=='m'||f.name[i+1]=='M')&&(f.name[i+2]=='c'||f.name[i+2]=='C')&&(f.name[i+3]=='g'||f.name[i+3]=='G')))
{
i++;
goto next;
}

f.name[i+1]='b';
f.name[i+2]='m';
f.name[i+3]='p';

SaveBmp(w,h,data,f.name);

if(data!=NULL)
free(data);

ret=_findnext(done,&f);
}

return ;
}