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