#include<stdint.h>
#include <stdio.h> 

int range(int size,int*src,int ws,char*dst)
{
	unsigned di=0,c[0x1000],t[0x1001],l=0,w=0xFFFFFFFF;
	for(int x=0;x<ws;x++)
  {
    c[x]=1;
    t[x]=x;
  }
  t[ws]=ws;
	for(int si=0;si<size;si++)
  {
    int n=src[si];
		l+=t[n]*(w/=t[ws]);w*=c[n]++;
    for(int x=n;x<ws;t[++x]++);
		if(t[ws]>0xFFFF)
    {
      t[0]=0;
      for(int x=0;x<ws;x++)
        t[x+1]=t[x]+(c[x]=c[x]>>1|1);
    }
		while((l&0xFF000000)==(l+w&0xFF000000))
    {
      dst[di++]=l>>24;
      l<<=8;
      w<<=8;
    }
		while(w<=0xFFFF)
    {
    w=(0x10000-(l&0xFFFF))<<8;
    dst[di++]=l>>24;
    l<<=8;
    }
  }
	while((l&0xFF000000)==(l+w&0xFF000000))
  {
    dst[di++]=l>>24;
    l<<=8;
    w<<=8;
  }
	while(l&0xFF000000)
	{
	  dst[di++]=(l>>24);
	  l<<=8;
	}
  return di;
}
  
#define MIN(x,y) ((x)<(y)?(x): (y))

int data[0x10000];
int offset[0x4000];
  
int compress(uint32_t size,uint8_t*src,uint8_t mode,uint8_t*dst)
{
	int di=0,oi=0,ws=mode&0x80?0x1000:0x200,ds,os;
	dst[0]='A';
  dst[1]='S';
  dst[2]='R';
  dst[3]='0';
  
	dst[4]=mode;
  dst[5]=size>>16;
  dst[6]=size>>8&0xFF;
  dst[7]=size&0xFF;

	for(int si=0;si<size; )
  {
    int bo,bc=0;
		for(int off=1;off<=MIN(si,ws);off++)
    {
      int c;
			for(c=0;c<MIN(size-si,0x102);c++)
        if(src[si-off+c]!=src[si+c])
          break;
			if(c>bc)
      {
        bo=off;
        bc=c;
      }
    }
		if(bc>2)
    {
      data[di++]=bc+0xFD;
      offset[oi++]=bo-1;
      si+=bc;
    }
		else 
      data[di++]=src[si++];
  }
	//di+=4;
	ds=range(di,data,0x200,(char*)dst+12);
	os=range(oi,offset,ws,(char*)dst+ds+12);
	dst[8]=ds+12>>24;
  dst[9]=ds+12>>16&0xFF;
	dst[10]=ds+12>>8&0xFF;
  dst[11]=ds+12&0xFF;
	return ds+12+os;
}
	

 // [insert the code in the post here] 
int main(int argc, char* argv[]) 
{ 
  if(argc<3) 
  {
	  printf("Usage: compress <in_file> <out_file>\n");
    return -1; // too few arguments 
  }
  FILE *flin=fopen(argv[1],"rb"); 
  FILE *flout=fopen(argv[2],"wb"); 
  if((flin==NULL)||(flout==NULL))
  {
	  printf("Error opening in/out file\n");
	  return -1;
  }
  char buf1[409600],buf2[409600]; //400KB each 
  int size=fread(buf1,1,409600,flin); 
  size=compress(size,(uint8_t*)buf1,0,(uint8_t*)buf2);
  fwrite(buf2,1,size,flout); 
  if(size>0x7C6)
	  printf("This level will not work on an e-reader.\n");
  fclose(flin);fclose(flout);
  return 0; 
} 

A-Z 		 = 00-19
		 = 1A-1B undefined
',.		 = 1C-1E
		 = 1F	undefined
a-z 		 = 20-39
ÄÖÜÂÀÇ		 = 3A-3F
ÉÈÊËÎÏÔŒ	 = 40-47
ÙÛÁÍÑÓÚÌ	 = 48-4F
Òäöüßéâà	 = 50-57
çèêëîïôœ	 = 58-5F
ùûáíñóúì	 = 60-67
ò°[er][re]e¿¡a	 = 68-6F
”“’‘«»		 = 70-75
0-9		 = 76-7F
… „“‚‘		 = 80-85
		 = 86-C3 undefined
[mushroom] 	 = C4
[flower]   	 = C5
[star]     	 = C6
[Circle]   	 = C7
[Heart]    	 = C8
[Monospaced A-U] = C9-DD
		 = DE-DF undefined
?!-[space]	 = E0-E3
[Superscript 0-9]= E4-ED
[Subscript 0-9]	 = EE-F7
e		 = F8
[Monospaced V-Z] = F9-FD
[Promotional]	 = FE
[Null]		 = FF