Move To Front Encode by nu

i;a[];main(c,k){for(;read(-i,&c,1);a[i%=58]+=k>i+a[i])i++?a[c]=48-c:putchar(k=c+a[c]);}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page