typedef  struct
... {
    WORD fmtflag;       //全部为"RD"
    WORD unknow;        //不知道什么用
    DWORD width;
    DWORD height;
    DWORD size;         // 整个结构大小，就是头+压缩数据
    unsigned char * pdata; // 大小为(size - 16)
} st_RDHeader;

typedef  struct
... {
    int idx;            //索引号，基本上是按照顺序排列的
    DWORD fileptr;      //在数据文件中的偏移量
    DWORD size;         //大小，整个图像结构的大小，同上一个结构的SIZE
    int ofs_x;          //x偏移量
    int ofs_y;          //y偏移量，就是对齐点离坐上角的y 轴距离
    DWORD width;
    DWORD height; 
    DWORD colorkey;     //随便猜得，不一定正确
    DWORD unuse1;
    DWORD unuse2;
} st_GrpInfo;             //  40 bytes

int  _core_uncompress_rle8(  char   *  instream,  int  in_len,  char   *  outstream,  int  out_len )
... {
    char rle_code;
    int ptr_instream = 0, ptr_outstream = 0;
    int i = 0,loopcnt = 0;;

    if( instream == NULL || in_len == 0 || outstream == NULL || out_len == 0 || in_len > out_len )
        return 0;

    while( ptr_instream < in_len )
    ...{
        rle_code = instream[ptr_instream];
        ptr_instream ++;
        switch( rle_code & 0xf0 )
        ...{
        case 0x00:
            loopcnt = rle_code;
            for( i = 0;i < loopcnt;i ++ )
            ...{
                outstream[ptr_outstream] = instream[ptr_instream];
                ptr_instream ++;
                ptr_outstream ++;
            }
            break;

        case 0x10:
                loopcnt = (rle_code & 0xf) * 0x100 + instream[ptr_instream];
                ptr_instream ++;
                for( i = 0;i < loopcnt;i ++ )
                ...{
                    outstream[ptr_outstream] = instream[ptr_instream];
                    ptr_instream ++;
                    ptr_outstream ++;
                }
            break;

        case 0x80:
            loopcnt = rle_code & 0xf;
            rle_code = instream[ptr_instream];
            ptr_instream ++;
            for( i = 0;i < loopcnt;i ++ )
            ...{
                outstream[ptr_outstream] = rle_code;
                ptr_outstream ++;
            }
            break;

        case 0x90:
            loopcnt = (rle_code & 0xf) * 0x100 + instream[ptr_instream + 1];
            rle_code = instream[ptr_instream];
            ptr_instream += 2;
            for( i = 0;i < loopcnt;i++)
            ...{
                outstream[ptr_outstream] = rle_code;
                ptr_outstream ++;
            }
            break;

        case 0xa0:
            loopcnt = (rle_code & 0xf) * 0x10000 + instream[ptr_instream + 1] * 0x100 + instream[ptr_instream + 2];
            rle_code = instream[ptr_instream];
            ptr_instream += 3;
            for( i = 0;i < loopcnt;i ++ )
            ...{
                outstream[ptr_outstream] = rle_code;
                ptr_outstream ++;
            }
            break;

        case 0xc0:
            loopcnt = rle_code & 0xf;
            for( i = 0;i < loopcnt;i ++)
            ...{
                outstream[ptr_outstream] = (char)0xff;
                ptr_outstream ++;
            }
            break;

        case 0xd0:
            loopcnt = (rle_code & 0xf) * 0x100 + instream[ptr_instream];
            ptr_instream ++;
            for( i = 0;i < loopcnt;i ++ )
            ...{
                outstream[ptr_outstream] = (char)0xff;
                ptr_outstream ++;
            }
            break;
        }
        ptr_instream ++;
    }

    return 1;
}