Run it
Copy the script and paste it into your executor.
((...) Y={,;;;;,,,;;,;;,,;,;,,,,,,;,,;,;;,;,;,,,;,,;,;,,,;,;,;,,,;;,;,;,,,;,;,;,,;,;,;,;,,;;;;,;;;;,;;,,,;;;;;;,,,;;;;;,,,;,;;,,;,,;;;;;;;;;,;;;;;;;;,;;,,,,,,,;,;,,;,,,,;,;,,,,;;;;;,,,;,,;;;;;,,;,,;;;;;,;;;;;,;,,;;;;,;,;,,;} (V) Y[V+(-+)] V,w ({{--(-),--(-)},{-,-};{-+;+-}}) w[--(-)]<w[-] Y[w[--(-)]],Y[w[-]],w[-],w[-+]=Y[w[-+]],Y[w[-+]],w[-]+(-+),w[-+]-(-+) V=.sub w=.concat Z={S=-+,V=+-;O=--(-);c=--(-);[]=--(-);h=-+;l=--(-),T=+-,w=+-;j=-;J=-,[]=+-;[]=+-;B=--(-);x=--(-);Y=--(-),s=-+,[]=--(-),R=+-;Q=+-,[]=+-;I=--(-);i=-,N=-+,M=--(-),m=--(-);X=+-;q=--(-);u=-,e=--(-);r=-+;y=-+;[]=--(-);p=-+,n=+-;C=--(-),[]=--(-);[]=-,d=-;[]=-+;P=+-;K=-+;o=+-;g=+-;[]=+-;b=--(-),[]=+-,a=--(-);H=-+;[]=-,Z=-,A=--(-);E=-+;W=+-;D=+-,U=+-;F=+-;z=--(-);k=-;f=+-;v=-+;G=-;L=--(-),t=--(-)} u=Y i=.char Q=.floor M=.insert n=.len X= Y=-,#u,+- G=u[Y] (G)== X=(G) F={} B=-+ h=+- J=- B<=X Y=(G,B,B) w=Z[Y] w h=h+w*(--(-))^((-)-J)J=J+(+-) J==- J=- Y=(h/(+-)) V=((h%(-+))/(--(-))) w=h%(--(-))(F,(Y,V,w))h=+- Y== (F,((h/(--(-))))) B>=X (G,B+(+-),B+(+-))~= (F,(((h%(-))/(-)))) B=B+(-) u[Y]=(F) ((Y,Z,u,i,Q,M,n,L,B,j,P,X,F,q,b,f,w,h,J,G,y,D)B,G,h,P,L,q,f,X,y,w,J,b,F,j,D=-,{},(Y) V=--(-),#Y,-+ G[Y[V]]=G[Y[V]]+(+-) u w=() Z=(w)Z[(-+)],Z[(-)],Z[(-+-)]=Y,J,()-- w ({},{[(-+)]=J;[(-)]=Y;[(-)]=()-- }) ,(Y,V) Z=(V) u=(u) (Y,{u},V,Z) u ,(Y)G[Y]=G[Y]-(--(-))-+==G[Y] G[Y],X[Y]=, ,(Y,V) Z=(V) u=(u,i,Q,M) (Y,{u;i,Q;M},V,Z) u ,(Y,V) Z=(V) u=(...) (Y,{...},V,Z) u ,{},(Y,V) Z=(V) u=() (Y,{},V,Z) u ,(w,u,i,Q) U,p,G,v,x,o,R,A,k,c,S,J,z,n,O,K,l,r,m,W,d,s,C,t,I,g,h,e,B,N,E,T,a,f w w<-(-) w<-(-) w<- w<+ w<--(-) w<-+ w<+- B=(--(-))n=- h=- G=B^h w=n-G G=w n=(--(-))w=n/G n={w}w=Y[(+-)] J=- B=X[i[-]]f=- h=(J,f)B=--(-)G=h==B n=G w=G -+ + t=X[f]n=t w=- w<+ e=()I={}S= K=(+-)m=(+-)l= T=()x={}X[e]=x p=(-+,{e,c,O;f})x=()z= t= C=(+-)E= X[x]=p p={}X[T]=p p=Y[C]f=(f)U= W=X[T]A={[K]=W,[m]=l}C=(I,A)h= p=(+,{T;e,g,c,O;x})c=(c)X[B]=C O=(O)e=(e)X[J]=p h={}O=- g=(g)t=X[B]c=(--(-))p=(+-)x=(x)z=X[J]S=(c,O)T=(T)f=t[S]S=(+-)z=Y[S]c=X[B]g=(-+)U=- O=X[J]E=(g,U)S=c[E]g=(--(-))t=z[S]c=X[B]O=X[J]U=-+ T=- E=(g,U)S=c[E]E=(-)O=Y[E]U=X[B]E=(+-)E=O[E]x=X[J]e=(p,T)g=U[e]E=(O,g)g=X[B]p=-(-)U=X[J]e=(--(-))x=(e,p)e=(--(-))O=g[x]c=E[O]g=X[B]U=X[J]p=-+ x=(e,p)E=g[x]g=(-+)g=c[g]O={(c,E)}z=(S,(O))h[f]=z O=(-)z=X[B]E=- S=X[J]c=(O,E)O=(-)E=- t=z[c]f=h[t]z=X[B]S=X[J]c=(O,E)t=z[c]z= f[t]=z z=X[B]O=(-+)E=-+ S=X[J]c=(O,E)x=(-)e=- t=z[c]f=h[t]O=(-)z=X[B]S=X[J]E=+ c=(O,E)t=z[c]O=(+-)c=Y[O]E=X[B]g=X[J]U=(x,e)O=E[U]U=(-+)S=c[O]x=+ O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]O=-(-)f[t]=z t=X[B]c=(--(-))z=X[J]S=(c,O)f=t[S]U=-+ S=(+-)z=Y[S]c=X[B]O=X[J]g=(+-)E=(g,U)U=-(-)S=c[E]e=-(-)t=z[S]c=X[B]O=X[J]g=(+-)E=(g,U)S=c[E]E=X[B]x=(+-)g=X[J]U=(x,e)O=E[U]c=h[O]z=(S,c)h[f]=z z=X[B]O=(--(-))S=X[J]E=+ c=(O,E)t=z[c]E=+ O=(-+)f=h[t]z=X[B]S=X[J]c=(O,E)E=+ t=z[c]O=(--(-))z=+- f[t]=z z=X[B]S=X[J]x=-(-)c=(O,E)E=- t=z[c]f=h[t]O=(-)z=X[B]S=X[J]c=(O,E)t=z[c]U=(-+)c=(-+)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]U=(-+)c=- O=-+ x=-(-)E=+- S=(c,O,E)O=(-+)E=-+ f[t]=S z=X[B]S=X[J]c=(O,E)t=z[c]f=h[t]O=(--(-))z=X[B]E=-(-)S=X[J]c=(O,E)t=z[c]c=(+-)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]x=+ E=- O=-+ g=-+ c=- S=(c,O,E,g)f[t]=S z=X[B]U=(-+)E=-+ O=(-+)S=X[J]c=(O,E)t=z[c]O=(--(-))f=h[t]z=X[B]E=- w=Y[(-+)]S=X[J]c=(O,E)t=z[c]c=(--(-))S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]U=(+-)z=S[c]E=+- e=- g=--(-)c=--(-)O=--(-)S=(c,O,E,g)f[t]=S O=(+-)z=X[B]S=X[J]E=-(-)c=(O,E)O=(-)E=+ t=z[c]f=h[t]z=X[B]S=X[J]x=+ c=(O,E)t=z[c]c=(+-)S=Y[c]O=X[B]E=X[J]g=(U,x)x=(-+)E=+- c=O[g]z=S[c]U=-+ c=+- O=- S=(c,O,E)f[t]=S c=(--(-))g=(-)O=-(-)t=X[B]z=X[J]S=(c,O)f=t[S]S=(--(-))z=Y[S]c=X[B]O=X[J]E=(g,U)U=-+ S=c[E]t=z[S]g=(-+)c=X[B]O=X[J]E=(g,U)S=c[E]E=X[B]g=X[J]U=(x,e)O=E[U]c=h[O]z=(S,c)h[f]=z t=X[B]x=(-)c=(+-)O=-+ z=X[J]U=-+ g=(+-)S=(c,O)e=+ f=t[S]S=(+-)z=Y[S]c=X[B]O=X[J]E=(g,U)g=(--(-))S=c[E]U=-+ t=z[S]c=X[B]O=X[J]E=(g,U)S=c[E]E=X[B]g=X[J]U=(x,e)O=E[U]c=h[O]z=(S,c)h[f]=z E=-+ O=(--(-))z=X[B]x=-+ S=X[J]c=(O,E)t=z[c]E=-(-)f=h[t]z=X[B]O=(+-)S=X[J]c=(O,E)t=z[c]E=-(-)O=(--(-))z=-+ f[t]=z z=X[B]S=X[J]c=(O,E)E=-(-)t=z[c]f=h[t]z=X[B]O=(-)S=X[J]c=(O,E)E=+ t=z[c]O=(+-)z=- f[t]=z z=X[B]S=X[J]c=(O,E)t=z[c]f=h[t]z=X[B]S=X[J]O=(-)E=-(-)c=(O,E)t=z[c]U=(-)c=(-)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]U=(--(-))c=--(-)O=--(-)E=--(-)S=(c,O,E)f[t]=S x=+ z=X[B]E=-(-)O=(--(-))S=X[J]c=(O,E)O=(-+)t=z[c]f=h[t]E=+ z=X[B]S=X[J]c=(O,E)t=z[c]c=(+-)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]g=--(-)E=-+ c=- O=+- S=(c,O,E,g)f[t]=S z=X[B]E=- O=(-)S=X[J]c=(O,E)t=z[c]f=h[t]z=X[B]E=+ S=X[J]x=+ O=(--(-))c=(O,E)g=- t=z[c]S=X[B]c=X[J]E=(--(-))O=(E,g)z=S[O]f[t]=z z=X[B]g=+ O=(-+)S=X[J]E=+ c=(O,E)t=z[c]f=h[t]z=X[B]E=- S=X[J]O=(+-)c=(O,E)E=(-+)t=z[c]S=X[B]c=X[J]O=(E,g)z=S[O]f[t]=z z=X[B]O=(--(-))S=X[J]E=-(-)c=(O,E)O=(-+)t=z[c]f=h[t]z=X[B]E=-(-)S=X[J]c=(O,E)t=z[c]c=(+-)S=Y[c]U=(+-)O=X[B]E=X[J]g=(U,x)c=O[g]O=- z=S[c]c=-+ E=-+ g=-+ S=(c,O,E,g)f[t]=S O=-(-)c=(--(-))g=(--(-))t=X[B]U=-(-)e=-+ z=X[J]S=(c,O)f=t[S]S=(-+)z=Y[S]x=(-+)c=X[B]O=X[J]E=(g,U)S=c[E]t=z[S]c=X[B]O=X[J]U=+ g=(-+)E=(g,U)S=c[E]E=X[B]g=X[J]U=(x,e)O=E[U]c=h[O]z=(S,c)E=+ h[f]=z U=(-)O=(-)z=X[B]S=X[J]c=(O,E)t=z[c]O=(+-)f=h[t]E=-(-)z=X[B]S=X[J]c=(O,E)O=(+-)t=z[c]z=-+ E=- f[t]=z z=X[B]S=X[J]c=(O,E)E=-(-)t=z[c]f=h[t]z=X[B]O=(+-)S=X[J]c=(O,E)t=z[c]z=- E=-(-)f[t]=z x=-+ z=X[B]S=X[J]O=(+-)c=(O,E)t=z[c]O=(-+)f=h[t]z=X[B]E=-(-)S=X[J]c=(O,E)t=z[c]c=(-+)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]O=+- E=- c=-+ S=(c,O,E)f[t]=S E=+ x=- O=(-)z=X[B]S=X[J]c=(O,E)U=(+-)O=(+-)E=-(-)t=z[c]f=h[t]z=X[B]S=X[J]c=(O,E)t=z[c]c=(-)S=Y[c]O=X[B]e=-(-)E=X[J]g=(U,x)c=O[g]z=S[c]O=-+ g=--(-)E=- c=-+ S=(c,O,E,g)x=-+ f[t]=S E=-(-)O=(-)z=X[B]S=X[J]g=+ c=(O,E)t=z[c]f=h[t]E=-+ z=X[B]O=(--(-))S=X[J]c=(O,E)t=z[c]S=X[B]E=(-+)U=(--(-))c=X[J]O=(E,g)z=S[O]f[t]=z z=X[B]S=X[J]O=(-+)E=- c=(O,E)t=z[c]f=h[t]E=+ z=X[B]O=(+-)g=- S=X[J]c=(O,E)t=z[c]S=X[B]c=X[J]E=(--(-))O=(E,g)z=S[O]f[t]=z O=(-+)z=X[B]E=- S=X[J]c=(O,E)t=z[c]E=+ O=(--(-))f=h[t]z=X[B]S=X[J]c=(O,E)t=z[c]c=(-+)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]E=-+ O=- c=- g=+- x=(--(-))S=(c,O,E,g)f[t]=S t=X[B]z=X[J]c=(--(-))O=- S=(c,O)U=+ f=t[S]g=(-+)S=(-)z=Y[S]c=X[B]O=X[J]E=(g,U)S=c[E]t=z[S]c=X[B]O=X[J]U=-(-)g=(+-)E=(g,U)S=c[E]E=X[B]g=X[J]U=(x,e)O=E[U]c=h[O]z=(S,c)h[f]=z z=X[B]O=(--(-))S=X[J]E=-(-)c=(O,E)E=+ O=(-)t=z[c]U=(-)f=h[t]z=X[B]S=X[J]c=(O,E)t=z[c]O=(+-)E=-+ z=--(-)f[t]=z z=X[B]S=X[J]c=(O,E)t=z[c]f=h[t]z=X[B]E=- O=(--(-))S=X[J]c=(O,E)t=z[c]z=- f[t]=z E=-(-)O=(+-)z=X[B]x=-+ S=X[J]c=(O,E)t=z[c]f=h[t]z=X[B]S=X[J]O=(--(-))E=- c=(O,E)t=z[c]c=(--(-))S=Y[c]O=X[B]E=X[J]g=(U,x)E=-+ U=(-)c=O[g]z=S[c]O=--(-)c=+- S=(c,O,E)f[t]=S z=X[B]O=(--(-))x=-+ E=+ S=X[J]c=(O,E)t=z[c]O=(-)f=h[t]z=X[B]E=-(-)S=X[J]c=(O,E)t=z[c]c=(-)S=Y[c]O=X[B]E=X[J]g=(U,x)E=- c=O[g]z=S[c]O=- c=+- g=--(-)S=(c,O,E,g)f[t]=S z=X[B]S=X[J]E=+ O=(-)c=(O,E)t=z[c]E=- f=h[t]z=X[B]g=-+ O=(-)S=X[J]c=(O,E)t=z[c]E=(--)S=X[B]c=X[J]O=(E,g)z=S[O]f[t]=z x=-+ e=- E=-+ g=-+ z=X[B]S=X[J]O=(-)c=(O,E)t=z[c]f=h[t]z=X[B]O=(+-)E=- S=X[J]c=(O,E)t=z[c]S=X[B]E=(-+)c=X[J]O=(E,g)z=S[O]O=(--(-))U=(--(-))f[t]=z E=-+ z=X[B]S=X[J]c=(O,E)t=z[c]f=h[t]E=-+ z=X[B]S=X[J]O=(-)c=(O,E)t=z[c]c=(-+)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]g=-+ O=-+ c=--(-)E=--(-)S=(c,O,E,g)f[t]=S t=X[B]z=X[J]g=(+-)c=(-)O=-+ U=-+ S=(c,O)f=t[S]S=(-)z=Y[S]c=X[B]O=X[J]E=(g,U)S=c[E]t=z[S]x=(--(-))g=(+-)c=X[B]O=X[J]U=+ E=(g,U)S=c[E]E=X[B]g=X[J]U=(x,e)O=E[U]c=h[O]z=(S,c)h[f]=z z=X[B]E=-(-)S=X[J]O=(-)c=(O,E)E=-(-)t=z[c]O=(-+)f=h[t]z=X[B]S=X[J]c=(O,E)O=(+-)t=z[c]E=- z=- f[t]=z z=X[B]S=X[J]x=-+ c=(O,E)U=(--(-))t=z[c]f=h[t]O=(+-)z=X[B]S=X[J]E=-(-)c=(O,E)E=+ t=z[c]O=(-+)z=- f[t]=z z=X[B]S=X[J]c=(O,E)t=z[c]f=h[t]z=X[B]E=+ S=X[J]O=(--(-))c=(O,E)t=z[c]c=(+-)S=Y[c]O=X[B]E=X[J]g=(U,x)U=(+-)E=- c=O[g]z=S[c]x=+ O=--(-)c=+- S=(c,O,E)E=+ f[t]=S z=X[B]S=X[J]O=(--(-))c=(O,E)t=z[c]f=h[t]E=- O=(--(-))z=X[B]S=X[J]c=(O,E)t=z[c]c=(--(-))S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]O=+- z=S[c]c=--(-)E=+- x=-(-)g=-+ S=(c,O,E,g)E=+ U=(-+)O=(-)f[t]=S z=X[B]S=X[J]c=(O,E)E=- t=z[c]O=(-+)f=h[t]z=X[B]S=X[J]c=(O,E)t=z[c]c=(-+)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]g=--(-)c=+- O=--(-)E=-+ S=(c,O,E,g)E=-(-)f[t]=S z=X[B]U=(+-)O=(+-)S=X[J]c=(O,E)O=(+-)t=z[c]f=h[t]z=X[B]S=X[J]E=-(-)c=(O,E)t=z[c]x=-+ c=(--(-))S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]E=-+ O=+- z=S[c]c=-+ S=(c,O,E)f[t]=S E=- z=X[B]O=(-)S=X[J]c=(O,E)e=- t=z[c]E=-(-)f=h[t]O=(-+)z=X[B]S=X[J]c=(O,E)E=(-)t=z[c]g=-+ S=X[B]c=X[J]O=(E,g)c=(-+)z=S[O]O=+ f[t]=z U=-(-)t=X[B]z=X[J]S=(c,O)f=t[S]S=(-+)z=Y[S]g=(+-)c=X[B]O=X[J]E=(g,U)U=-+ S=c[E]t=z[S]x=(+-)c=X[B]O=X[J]g=(+-)E=(g,U)S=c[E]E=X[B]g=X[J]U=(x,e)O=E[U]c=h[O]z=(S,c)h[f]=z z=X[B]O=(+-)x=-+ S=X[J]E=-+ c=(O,E)t=z[c]O=(+-)f=h[t]E=-+ z=X[B]S=X[J]c=(O,E)t=z[c]E=-(-)z=+- O=(--(-))f[t]=z z=X[B]S=X[J]c=(O,E)t=z[c]f=h[t]E=-+ O=(-+)z=X[B]S=X[J]c=(O,E)t=z[c]z=-+ f[t]=z z=X[B]S=X[J]E=+ O=(-+)c=(O,E)E=- t=z[c]f=h[t]z=X[B]O=(+-)S=X[J]U=(+-)c=(O,E)t=z[c]c=(--(-))S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]U=(--(-))E=- c=+- O=- x=-+ S=(c,O,E)f[t]=S O=(--(-))z=X[B]S=X[J]E=-(-)c=(O,E)t=z[c]f=h[t]O=(+-)E=-+ z=X[B]S=X[J]c=(O,E)t=z[c]c=(-+)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]g=--(-)E=+- O=- z=S[c]x=+ c=--(-)S=(c,O,E,g)E=-+ O=(+-)f[t]=S U=(-)z=X[B]S=X[J]c=(O,E)t=z[c]f=h[t]E=- z=X[B]O=(--(-))S=X[J]c=(O,E)t=z[c]c=(-)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]O=+- U=(+-)E=-+ z=S[c]c=- S=(c,O,E)f[t]=S O=(+-)z=X[B]S=X[J]E=-+ c=(O,E)t=z[c]f=h[t]O=(+-)z=X[B]E=-(-)S=X[J]c=(O,E)t=z[c]g=- S=X[B]c=X[J]E=(--(-))O=(E,g)E=-(-)z=S[O]f[t]=z z=X[B]O=(--(-))S=X[J]c=(O,E)g=-(-)t=z[c]f=h[t]E=-(-)z=X[B]S=X[J]O=(-+)x=-+ c=(O,E)t=z[c]S=X[B]E=(-+)c=X[J]O=(E,g)z=S[O]f[t]=z z=X[B]S=X[J]O=(-+)E=- c=(O,E)O=(+-)t=z[c]f=h[t]z=X[B]E=-(-)S=X[J]c=(O,E)t=z[c]c=(-+)S=Y[c]O=X[B]E=X[J]g=(U,x)c=O[g]z=S[c]c=+- O=-+ E=-+ g=-+ S=(c,O,E,g)f[t]=S S=X[B]c=X[J]E=(--(-))g=- O=(E,g)z=S[O]t=h[z]g=+ S=X[B]E=(-+)c=X[J]O=(E,g)z=S[O]f=t[z]z=(-,{B;J})t=(-)O=(--(-))t=f[t]E=-+ t=(f,z)z=X[B]S=X[J]c=(O,E)t=z[c]z=(-)f=h[t]t=Y[z]n={f,t} w=-(-)B=X[i[--(-)]]h=-+ G=B*h B=+- n=G%B X[i[+-]]=n w<+ w<-+ w<-(-) h=(-)B=Y[h]h=(-)G=B[h]w=Y[(-)]h=X[i[-+]]B={(h)}n={(B)} X[B]=n w=-+ U= g O=O+E S=O<=c S=U S U=O>=c U=g U S=U S U=+ w=S U S=-+ w=w S w<+ G=u[--(-)]B=u[-+]w=X[i[+-]]h=w w=h[B]w=w -+ + G= X[i[+-]]=n w=-(-) w<+ w<- w<- w<-(-) w=(-,{J})d={()}n={(d)}w=Y[(-+)] n=(--(-))G=(-)w=Y[n]n=Y[G]G=(+-)Y[G]=w w=-(-)G=(--(-))Y[G]=n G=X[i[-]]B=() w=N n=s w=- w<+ p=+- w=X[z]R=-+ d=(R,p)w=(+-)Y[w]=d p=(-+)R=Y[p]p=-+ w=R>p w=w -(-) - w=-(-) w<-(-) w<-(-) w<-+ n=(-)G=(+-)w=Y[n]n=(G)w=Y[(-+)]n={} w=- r=--(-)v=m[r]r=X[W]l=v==r s=l s=X[B]w=s - - n=s w<- w=Y[(+-)]n={B} B=X[i[--(-)]]h=-+ E=--(-)G=B%h J=X[i[+-]]c=- z=X[i[--(-)]]x=X[i[-]]U=x-G x=+- g=U/x O=E-g S=c^O t=z/S f=(t)J=- S=-+ h=f%J f=--(-)J=f^G B=h/J J=X[i[--(-)]]G= z=B%S S=-(-)t=z*S f=(t)J=X[i[+-]]t=(B)h=f+t f=-+ J=h%f z=- t=h-J f=t/z c=--(-)z=+- t=J%z h= B= S=J-t z=S/c J= E=+- c=-+ S=f%c O=f-S f= c=O/E O={t;z;S,c}w=-(-)t= S= z= c= X[i[+-]]=O w<-(-) w<-+ w<-+ w<-+ w<+ w=X[i[-+]]B=X[i[-+]]G[w]=B w=X[i[-+]]B={(G)}w=Y[(-+)]n={(B)} B=+- w={}h=X[i[--(-)]]J=h h=+- G=w f=h w=-(-)h=--(-)t=f<h h=B-f G=X[i[-+]]n=#G G=+- w=n==G w=w + - w<- w=+ k=- X[B]=s r=X[A]v=r+k l=m[v]N=E+l l=-+ w=N%l E=w v=X[I]l=g+v v=-+ N=l%v g=N w=-(-) w<-+ w<+ w<- h=-+ B=X[i[-+]]G=B~=h w=G -+ -+ N=X[B]s=N w=N -+ + e=#U p=--(-)x=e==p w=x --(-) + w<-+ w= h=(--(-))z=(-+)B=()X[B]=w J=()G=u n=Y[h]h=(-+)w=n[h]h=()f=()X[h]=w w=(-+,{})X[J]=w S=(+,{f})w= X[f]=w t=Y[z]z=(S)w=z - -(-)n=z C=(C)K=(K)W=(W)I=(I)A=(A)w=-+ m= T=(T) w<-+ w<- w<-(-) w<- B,f=(G,B)w=B -+ - w=n - - l=-+ w=-(-)N=m[l]s=N w<-+ w=-+ w=X[i[+-]]B=h S=- c=- z=(S,c)w=-+ G[B]=z B= w<+ w<- S=O R=(-)d=Y[R]R=(--(-))o=d[R]d=(G,S)o=X[i[-]]R=()e=d+R x=e+t w=-+ R=--(-)e=- U=x%e t=U e=h[B]d=t+R o=J[d]x=e..o h[B]=x S= B=X[i[-]]h=-+ G=B*h B=+ n=G+B G=- w=n%G X[i[-]]=w w=+ G=X[i[+-]]B=- n=G~=B w<+ X[B]=o w=X[B]w=w + + n=- B=(+-)h=+ G=B^h w=n-G n=(-+)G=w w=n/G n={w}w=Y[(-)] w<-+ w<-(-) w<-(-) w<+ w<-+ w<-(-) w= w=+ w= w=w + -(-) T= p o=o+R n=o<=d n=T n T=o>=d T=p T n=T n T=- w=n T n=-+ w=w n w<+ I= C e=e+T x=e<=p x=I x I=e>=p I=C I x=I x I=-(-)w=x I x=-+ w=w x f=-(-)w={}X[i[--(-)]]=w n=X[i[+-]]J=n n=B%f S=(--(-))w=-+ X[i[--(-)]]=n z=-+ t=B%z z=--(-)f=t+z X[i[--(-)]]=f O=- z=Y[S]S=(--(-))t=z[S]z=(G)t=(+-)h[B]=t S=- t=- E=O c=z O=+- g=E<O O=S-E w<- w<- w<-+ z= t h=h+f B=h<=J B=z B z=h>=J z=t z B=z B z=- w=B z B=- w=w B w=-+ t= z= J= c=(c)B=(B)B= E= x= U= J=(J)h=(h)g= O=(O)S= h= t= U={}z=(z)J=()e=(e)f=(f)x=- X[J]=B t=(+-)z=(-)B=()X[B]=h f=Y[t]t=(-+)E={}h=f[t]f=()X[f]=h c=(--(-))t=Y[z]O=()z=(-)h=t[z]S=(--(-))z=Y[S]S=(+-)t=z[S]S=Y[c]e=+- c=(-)z=S[c]S=+- c=()p=e g=()X[c]=S S=+- X[O]=S X[g]=E E=--(-)w=-(-)e=-+ S={}T=e e=--(-)C=T<e e=x-T w<-+ U=(-)g=Y[U]U=(-)w=-(-)E=g[U]c=E G=(--(-))w=Y[G]B=X[i[-]]h=--(-)G=(B,h)w=- w<-(-) w<-+ w<- w<-+ d=X[B]o=d w=d - + w= w=w - - S=(-)z=(-+)t=n n=Y[z]z=(--(-))w=n[z]z=()g=(+-)X[z]=w n=Y[S]S=(-+)w=n[S]O=w S=w E=Y[g]c=E w=E -+ -(-) w<- h=X[i[-]]w=- B=h==G n=B t=-+ f=(--(-))w=X[i[-]]n=(-+)B=X[i[-+]]h=X[i[-]]J=(f,t)G=B[J]n=w[n]n=(w,G)w=Y[(+-)]n={} w<+ w<+ w=Y[(-+)]n={} C=(-+)T=()X[T]=o l=(-+)A=-+ I=+- n=Y[C]C=(-+)w=n[C]C=+- n=(C,I)W=- I=- C=()X[C]=n w=X[z]k=-+ n=(I,A)I=()X[I]=n A=- m=--(-)w=X[z]K=X[C]a=-+ n=(A,K)A=()X[A]=n n=X[z]K=(W,m)m=(-+)n=--(-)w=K==n n=(+-)K=()X[K]=w N=Y[l]v=X[z]r={(k,a)}l=((r))N=(-)w=(+-)w=x[w]s=l..N W=m..s w=(x,n,W)W=()X[W]=w s=(-+,{z;T;O,h;B,e;K,W,C,A,I;c})m=(--(-))n=Y[m]m={(s)}w={(m)}m=w w=X[K]w=w - -(-) w<+ p=(-)w=Y[p]p=(+-)Y[p]=w w=- J=B w=()J= X[w]=f t=(-+-)f=w w=Y[t]z=(-,{f;i[--(-)],i[-]})f=(f)t=(z)w=+ w<-+ w<+ w<-+ w<-+ w<+ w=+ w=- B=X[i[+-]]h=X[i[--(-)]]G=B==h n=G c=()O=-+ E=+- X[c]=n x=(-,{})w=X[z]n=(O,E)O=()w=+- X[O]=n U=(-+)E=w w=--(-)R=(--(-))n=Y[U]U={(x)}n=--(-)g=w w={(U)}U=w w=U[n]x=w n=(--(-))w=Y[n]e=X[h]d=Y[R]R=(x)d=(--(-))o=(R,d)e={()}n=((e))e=()X[e]=n n=-+ o=X[O]d=o o=--(-)R=o o=-+ p=R<o w=-(-)o=n-R w<-(-) R=(-+)w=Y[R]T=(--(-))p=Y[T]R=(p)w=(+-)Y[w]=R w=+ w=X[i[-+]]w=w + -(-) w<-(-) w<-+ w<+ w=-(-) w=Y[(--(-))]n={} e=#U w=+ p=-+ x=e==p w<-+ x=e I=x U[x]=I w=-(-)x= p=#U e=- x=(e,p)w=- e=(U,x)I=+- x= p=X[g]C=e-I T=(C)p[e]=T e= w<-(-) w<+ w<-(-) w<-+ w=Y[(+-)]n={} w=-(-)d=E==g o=d O=(+-)c=Y[O]n=c w=- w<-+ w= w=w - + w=O w=c -+ - n=c w<-+ w<+ N=w r=-+ v=m[r]r= l=v==r w=l -(-) - s=l w= X[i[+-]]=w n={}w=Y[(-)] w<- n=(+-)w=Y[n]S=(-)G=X[i[--(-)]]J=(+-)h=Y[J]z=Y[S]c=(-+,{})S={(c)}t={(S)}z=-+ f=t[z]J=(f)h=(-+)B=(J,h)G={()}n=((G))B=X[i[+-]]G=n n=B w=B - + n=(-+)c=(--(-))f=(--(-))O=+ w=Y[n]J=Y[f]t=X[i[--(-)]]z=X[i[+-]]S=(c,O)f=t[S]h=J[f]f=(-)f=h[f]J={(h)}h={((J))}G=h[--(-)]B=h[-+]w=- n=h[-]h=n w=#Q (n),(Y) V,w=+-,Y[-] w G[w],V=G[w]-(-+),V+(-)--(-)==G[w] G[w],X[w]=, w=Y[V] ,(Y,V) Z=(V) u=(u,i,Q) (Y,{u,i;Q},V,Z) u ,()B=(-)+B G[B]=- B ,(Y,V) Z=(V) u=(u,i,Q,M,n) (Y,{u;i;Q,M;n},V,Z) u ,(Y,V) Z=(V) u=(u,i) (Y,{u,i},V,Z) u ((-,{}))((n)))(getfenv () _ENV, [(+-)],newproxy,,,,{...}))(...)Obfuscated. The code is scrambled, so you can't read what it does. Common for key systems, but take care.
e

Universal