kang-occ-shortest-program/kang.c

12 lines
294 B
C

#include <stdio.h>
long long n,u,m,b;main(e,r)char **r;
{for(;n++||(e=getchar()|32)>=0;
b="ynwtsflrabg"[n%=11]-e?b:b*8+n)
for(r=b%64-25;e<47&&b;b/=8)for(n=19
;n;n["1+DIY/.K430x9\
G(kC["]-42&255^b||(m+=n>15?n:n>9
?m%u*~-u:~(int)r?n+
!(int)r*16:n*16,b=0))u=1ll<<6177%n
--*4;
printf("%llx\n",m);}