florfliege

#define w ,t=s[i],s[i]=s[j],s[j]=t
unsigned short s[65536] ,i,j,t;
void main(int argc,char**argv){
_setmode(0,32768);_setmode(1,32768);
while(++i)s[i]=i;while(j+=s[i]+
argv[1][i%strlen(argv[1])]w,++i
);int d=-1; while(d--)j+=s[++i]
w;for(j=0;d=~getchar();putchar(
~ d ^ s [t+=s[i]]))j+=s[++i]w;}