TXR ASHU ROBOT POWERFULL TROLL SCRIPT

 ((...) v={,,,,;,;,;;;,,,,;;;;,;,,,;,;,,,;,,,;;,;,;,,,,,,}  (S) v[S-(--(-))]  S,R  ({{-,-+};{-+;-};{-+,-+}})  R[-]<R[--(-)] v[R[-]],v[R[-]],R[-+],R[--(-)]=v[R[--(-)]],v[R[-]],R[+-]+(-+),R[--(-)]-(+-)    S=.sub  R=.concat  c=.len  s=.char  n=v  m={P=--(-);[]=-,[]=+-,O=-+,y=-,H=-;d=-;[]=+-;s=--(-);X=+-;x=--(-);[]=-+,[]=--(-),g=-+,G=-,T=-,n=--(-),W=-,f=-;V=-+;o=--(-);K=-+;w=+-;l=--(-);[]=-,N=--(-),F=+-;[]=-,S=-,D=--(-);E=--(-),k=-;U=--(-),B=--(-),c=-+;v=+-;Z=+-,L=-;i=+-,a=--(-);I=-,[]=+-,z=--(-),q=+-,Q=--(-);t=-,A=-+;b=-+,m=-+,j=-;R=--(-);C=--(-);J=+-,p=--(-);[]=-,h=-+;r=+-,M=-;u=--(-),e=+-,[]=-+;[]=-+,Y=-,[]=-} z=.floor  N=  f=.insert  v=--(-),#n,+-   A=n[v] (A)==  N=(A) Y={} V=-+  x=-  y=-  V<=N   v=(A,V,V) R=m[v] R  x=x+R*(-)^((--(-))-y)y=y+(+-) y==-+  y=+-  v=(x/(-)) S=((x%(+-))/(-)) R=x%(+-)(Y,(v,S,R))x=-+   v== (Y,((x/(-)))) V>=N  (A,V+(+-),V+(-))~= (Y,(((x%(--(-)))/(-))))   V=V+(+-) n[v]=(Y)   ((v,c,s,n,m,z,N,r,A,V,f,y,b,Y,R,F,x,h,g,E,L)L,V,A,y,g,R,E,h,b,x,f,Y,F,r=(v,S) c=(S) s=(s,n,m,z,N) (v,{s,n,m,z;N},S,c)  s ,+-,{},(v) S,R=-,v[-] R  A[R],S=A[R]-(-+),(+-)+S  A[R]==-+  A[R],f[R]=,  R=v[S] ,(v,S) c=(S) s=(s,n,m) (v,{s;n,m},S,c)  s ,(R,s,n,m) X,C,A,O,w,T,H,l,d,U,W,t,Z,K,M,J,j,x,p,G,e,q,a,V,o,D,B,P,I,y,i,r,N,k  R   R<-   R<-   R<+   R<-   R<+   R<+   R<-(-) W=+- U=()I=+- f[U]=N R=f[X]N=(W,I)W=()f[W]=N R=+- I=R M=(-(-),{})C=(-)R=+- O=R N=v[C]C={(M)}R={(C)}C=R N=-+ R=C[N]M=R Z=(--(-))N=(+-)R=v[N]T=f[x]i=v[Z]Z=(M)i=(-+)P=(Z,i)T={()}N=((T))T=()f[T]=N P=f[W]N=+- i=P P=-+ Z=P R=-+ P=-+ a=Z<P P=N-Z  V=-+ x=f[n[+-]]R={}A=R y=x x=-+ r=x x=- t=r<x x=V-r R=+   R=+    R<-  R=(-(-),{y})i={()}N={(i)}R=v[(--(-))] R=N  -(-)-+     R<-   R<-  R=-(-)t=f[r]N=t  T=#C a=-+ M=T==a R=M -+  -    R<+  R=-(-)x=f[n[-+]]V=x==A N=V  f[V]=N R=-(-)     R<-(-)  R<-   R<-+   R<+  Z=(-+)R=v[Z]e=(+-)a=v[e]Z=(a)R=(+-)v[R]=Z R=-(-) R= R=R -+  +   e=()f[e]=P K=(--(-))N=v[K]j=-+ K=(--(-))R=N[K]B=- K=- J=(-)N=(K,B)K=()f[K]=N B=+- l=+- R=f[X]N=(B,l)B=()f[B]=N R=f[X]q=--(-)l=-+ k=f[K]N=(l,k)l=()w=-+ f[l]=N N=f[X]k=(j,q)d=--(-)N=--(-)R=k==N q=(-+)k=()f[k]=R H=v[J]p=f[X]R=(+-)G={(d,w)}N=(-+)R=M[R]J=((G))H=(-+)o=J..H j=q..o R=(M,N,j)j=()q=(+-)f[j]=R N=v[q]o=(-,{X;e;W;x,V;T;k;j;K,l;B;U})q={(o)}R={(q)}q=R R=f[k]R=R  -(-)-+    R<-+  A=(--(-))N=(-+)R=v[N]N=v[A]A=(--(-))v[A]=R A=(-)v[A]=N R=-(-)A=f[n[+-]]V=() R=-+     R<-(-)  R<+  G=-+ p=q[G]G=f[j]R=- J=p==G o=J  M=T B=M R=-+ C[M]=B M=    R<+  x=+ N=--(-)V=(-+)A=V^x R=N-A N=(-+)A=R R=N/A N={R}R=v[(+-)] R=-       R<-+   R<-(-)  R<+   R<-   R<+  R=-(-)T=#C a=--(-)M=T==a  N=o R=H R=-(-)  x=(x)t= M= I= W=(W)T=(T)r=(r)x= X=(X)C= O= U=(U)V=(V)V= y=(y)I={}R=-(-)W=()t=(+-)r=v[t]t=(-+)y=r[t]X=(-)D= r=()D=(-)f[r]=y M=- t=v[X]O=()X=(+-)y=t[X]X=v[D]D=(-+)t=X[D]U=(+-)D=v[U]U=(-)T=+- X=D[U]a=T U=()T=- D=-+ e=T f[U]=D D=+- f[W]=D D={}f[O]=I C={}T=- K=e<T T=M-e I=--(-)   R<-  t= y= X= R=-(-) N={}R= f[n[-+]]=R R=v[(-)]    R<-+   R<+  R=f[n[+-]]R=R  -  +  X=- R={}r=-+ f[n[-+]]=R R=+ N=f[n[-+]]y=N N=V%r D=(--(-))f[n[--(-)]]=N W=- t=V%X X=--(-)r=t+X f[n[-+]]=r X=v[D]D=(+-)t=X[D]X=(A)D=--(-)t=(+-)x[V]=t t=+- I=W W=-+ U=X O=I<W W=D-I    R<-(-) x=- V=f[n[-]]A=V~=x R=A  +  +  T=--(-)a=#C M=(T,a)R=-+ T=(C,M)a=f[O]B=+- M= K=T-B e=(K)a[T]=e T=      R<-   R<+   R<-   R<+  T=()K=(--(-))J= X= M={}f[T]=M e=()N={}t= M=()a=(-,{T,U,W;r})q=(--(-))k=(-)I= r=(r)B={}f[M]=a a={}f[e]=a a=v[K]j=f[e]D= l={[k]=j;[q]=J}y= K=(B,l)C= a=(-,{e;T,O,U,W;M})X=(-+)U=(U)x=K O=(O)e=(e)r=(-+)I=+ W=(W)W=(-+)T=(T)y=v[r]M=(M)t=v[X]V=a U=(W,I)V= D=x[U]U=(-)U=t[U]X={(t,D)}r=((X))y=()x= R=v[(--(-))] U=(-(-),{})D=(-)N=(-)R=v[N]y=(-+)A=f[n[+-]]x=v[y]X=v[D]D={(U)}X=+- t={(D)}r=t[X]y=(r)x=(-+)V=(y,x)A={()}N=((A))A=N V=f[n[+-]]R=V  + -+ N=V   A=s[--(-)]R=f[n[-+]]V=s[+-]x=R R=x[V]R=R  + -+    R<-(-) a=(-)R=v[a]a=(+-)v[a]=R R=-(-) P=P+Z N=P<=i e= a N=e  N e=P>=i e=a  e N=e  N e=-+ R=N  e N=-+ R=R  N     R<-+   R<-(-) R= R=R  -  -(-) i=f[V]P=i R=i  -  +    R<+  U=+- V=f[n[+-]]x=--(-)A=V%x y=f[n[--(-)]]I=-+ X=f[n[--(-)]]M=f[n[-+]]C=M-A M=--(-)O=C/M W=I-O D=U^W t=X/D I=-+ r=(t)y=-(-)x=r%y D=--(-)r=-+ y=r^A A= V=x/y y=f[n[--(-)]]X=V%D D=-(-)t=X*D r=(t)X=- y=f[n[+-]]U=- t=(V)x=r+t r=-+ y=x%r V= t=x-y r=t/X X=+- t=y%X D=y-t R=-+ X=D/U U=-+ D=r%U W=r-D U=W/I W={t,X;D,U}D= f[n[+-]]=W X= t= U= r= x= y=  x=(-+)A=s X=(--(-))r=()R= V=()f[V]=R N=v[x]x=(+-)R=N[x]x=()f[x]=R y=()R=(+,{})f[y]=R R= f[r]=R t=v[X]D=(-(-),{r})X=(D)N=X R=X  -(-) +        R<-   R<-(-)  R<+   R<-(-)  R<-+   R<+  J=- R=-(-)H=q[J]o=H  W=W+I D=W<=U C= O D=C  D C=W>=U C=O  C D=C  D C=-(-)R=D  C D=-(-)R=R  D   X= t x=x+r V=x<=y V=X  V X=x>=y X=t  X V=X  V X=-+ R=V  X V=+ R=R  V    R<-+  f[V]=o G=f[l]d=- p=G+d J=q[p]H=I+J J=+- R=H%J p=f[B]I=R J=O+p p=+- R=- H=J%p O=H  R=W N=U R=U -+ -+     R<+   R<-+  N={}R=v[(-)] R=-    R<-  r=-+ V=f[n[-]]y=- x=(y,r)V=--(-)A=x==V R=A  -(-) + N=A  C=(-)O=v[C]C=(--(-))R=+ I=O[C]U=I      R<-   R<-(-)  R<-+   R<-(-) V=f[n[--(-)]]x=- A=V*x V=+ N=A+V A=- R=N%A f[n[--(-)]]=R R=+ A=f[n[-]]V=--(-)N=A~=V  N={}R=v[(-)]  R=v[(-)]N={V}   R<+  K=(K)l=(l)k=(k)B=(B)R=- q= e=(e)j=(j) R=-     R<-(-)  R<-(-) f[n[-+]]=N R=- A=  H=f[V]o=H R=H  -  -(-)   R<-  N=+ V=(+-)x=+ A=V^x R=N-A N=(-)A=R R=N/A N={R}R=v[(-)] i=I==O P=i R=+       R<-+   R<+   R<-   R<+   R<+  R=f[X]Z=--(-)a=- i=(Z,a)R=(--(-))v[R]=i a=(-+)Z=v[a]a=-+ R=Z>a R=R  -  +  Z=(-+)D=W i=v[Z]Z=(+-)P=i[Z]i=(A,D)P=f[n[--(-)]]Z=()D= T=i+Z M=T+t T=- C=M%T Z=--(-)T=x[V]t=C i=t+Z P=y[i]M=T..P x[V]=M R=-+   o=f[V]N=o R=o  -(-) -    R<-  f[V]=P R=f[V]R=R  -(-) +  N=(--(-))A=(-+)R=v[N]N=(A)N={}R=v[(+-)]    R<+   R<-  R=f[n[-]]V=f[n[+-]]A[R]=V R=f[n[-]]V={(A)}N={(V)}R=v[(--(-))] x=--(-)A=(+-)R=v[A]V=f[n[--(-)]]A=(V,x)R=+    R<+  R= R=-(-) U=+- V=x D=+- R=f[n[--(-)]]X=(D,U)R=- A[V]=X V=      R<-   R<-   R<-   R<-  T=T+e M=T<=a B= K M=B  M B=T>=a B=K  B M=B  M B=- R=M  B M=-+ R=R  M  O=(-)X=(-+)t=N N=v[X]X=(-+)R=N[X]D=(+-)X=()f[X]=R N=v[D]D=(--(-))R=N[D]W=R I=v[O]D=R R=I  +  -(-)U=I   x=(+-)V=v[x]x=(--(-))A=V[x]x=f[n[-+]]R=v[(-)]V={(x)}N={(V)}   R<+  x=+- R=+ V=f[n[-+]]A=V*x V=-+ N=A%V f[n[-+]]=N  A=f[n[+-]]N=#A A=- R=N==A R=R -+  -     R<-+   R<+  H=R G=-+ p=q[G]G= J=p==G o=J R=J  +  -(-) V=f[n[-+]]x=f[n[+-]]A=V==x R=+ N=A    R<-(-) R= R=R  + -+  W=(-+)U=v[W]R=+ N=U        R=#m  (N),(v,S) c=(S) s=(s,n) (v,{s,n},S,c)  s ,(v)A[v]=A[v]-(--(-)) A[v]==--(-) A[v],f[v]=,  ,(v,S) c=(S) s=() (v,{},S,c)  s ,(v) S=+-,#v,--(-) A[v[S]]=(--(-))+A[v[S]]  s   R=() c=(R)c[(-)],c[(-)],c[(-)]=v,y,()--   R   ({},{[(--(-))]=y;[(-+)]=v;[(--(-))]=()--(-)}) ,{},()V=(+-)+V A[V]=--(-) V ,(v,S) c=(S) s=(s,n,m,z) (v,{s,n;m;z},S,c)  s ,(v,S) c=(S) s=(...) (v,{...},S,c)  s  ((-,{}))((N)))(getfenv  () _ENV,  [(+-)],newproxy,,,,{...}))(...)