fe r15 animation script is back

--niggr v2 animation hub
--one time key https://discord.gg/hcuk5DhUjG
--L to open and close menu

local a=function(b,c)local d=string;local e=d.char;local f=d.byte;local g=d.sub;local h=d.reverse;local i=d.find;local j=function(k,l)local m,n=i(k,l)return m-c.a end;local o=function(...)local k=b.a;local p={...}for q=c.a,#p do k=k..p[q]end;return k end;local r=select;local s=table;local t=math;local u=error;local v=pairs;local w=ipairs;local x=s.concat;local y=s.insert;local z=function(...)return{}end;local A=s.unpack or unpack;local B=function(...)return{n=r(e(c.b),...),...}end;local C=function(D,E,F,G,H)for q=c.c,F-E do H[G+q]=D[E+q]end end;local I=function(...)local J={}local K={...}for q=c.a,#K do for L=c.a,#K[q]do y(J,K[q][L])end end;return J end;local M=getfenv;local N=t.floor;local O=t.max;local P=pcall;local Q=t.abs;local R=tonumber;local S=function(T,U,V)V=V or c.a;local W=U and T or c.a;U=U or T;local m={}for q=W,U,V do y(m,q)end;return m end;local X=function()local function Y(Z,...)if(Z or c.c)==c.c then return...end;return Y(N(Z/c.d),Z%c.d,...)end;local function _(Z)if Z==c.c then return{c.c}end;return{Y(Z)}end;local function _0(_1)local function _2(Z,_3,...)if not _3 then return Z end;Z,_3=_(Z),_(_3)local _4,_5=#Z,#_3;local _6,_7={},O(_4,_5)for q=c.c,_7-c.a do local _8,_9=Z[_4-q],_3[_5-q]if not(_8 or _9)then break end;_6[_7-q]=_1((_8 or c.c)~=c.c,(_9 or c.c)~=c.c)and c.a or c.c end;return _2(R(x(_6),c.d),...)end;return _2 end;local _a=_0(function(m,_b)return m and _b end)local function _c(Z,_d)return N(Z)*c.d^_d end;local function _e(Z,_d)return N(N(Z)/c.d^_d)end;return _a,_e,_c end;local _f,_g,_h=X()local _i;local _j;local _k;local function _l(D,_m,_n,_o)local _p=c.c;for q=_m,_n,_o do local _q=c.e^Q(q-_m)_p=_p+_q*f(D,q,q)end;return _p end;local function _r(_s,_t,_u,_v,_w,_x,_y,_z)local _A=(-c.a)^_g(_z,c.f)local _B=_h(_f(_z,c.g),c.h)+_g(_y,c.h)local _C=_f(_y,c.i)*c.d^c.j;local _D=c.a;_C=_C+_x*c.d^c.k+_w*c.d^c.l+_v*c.d^c.m+_u*c.d^c.n+_t*c.d^c.o+_s;if _B==c.c then if _C==c.c then return _A*c.c else _D=c.c;_B=c.a end elseif _B==c.p then if _C==c.c then return _A*c.a/c.c else return _A*c.c/c.c end end;return _A*c.d^(_B-c.q)*(_D+_C/c.d^c.r)end;local function _E(D,_m,_n)return _l(D,_m,_n-c.a,c.a)end;local function _F(D,_m)return _r(f(D,_m,_m+c.f))end;local function _G(_H)local _I=_H[c.a]local _J=f(_H[c.d],_I,_I)_H[c.a]=_I+c.a;return _J end;local function _K(_H,_L)local _M=_H[c.a]+_L;local k=g(_H[c.d],_H[c.a],_M-c.a)_H[c.a]=_M;return k end;local function _N(_H)local _M=_H[c.a]+c.d;local _O=_E(_H[c.d],_H[c.a],_M)_H[c.a]=_M;return _O end;local function _P(_H)local _M=_H[c.a]+c.h;local _O=_E(_H[c.d],_H[c.a],_M)_H[c.a]=_M;return _O end;local function _Q(_H)local _M=_H[c.a]+c.o;local _O=_E(_H[c.d],_H[c.a],_M)_H[c.a]=_M;return _O end;local function _R(_H)local _S=_F(_H[c.d],_H[c.a])_H[c.a]=_H[c.a]+c.o;return _S end;local function _T(_H)local _L=_Q(_H)local k;if _L~=c.c then k=g(_K(_H,_L),c.a,-c.d)end;return k end;local function _U(_H)local _L=_Q(_H)local _V=z(_L)for q=c.a,_L do local _W=_N(_H)local _X=_f(_g(_W,c.h),c.s)local _Y=_f(_g(_W,c.d),c.t)local _Z=_f(_g(_W,c.a),c.a)==c.a;local __=_f(_W,c.a)==c.a;local _00={}_00[c.f]=_X;_00[c.n]=_G(_H)if _Y==c.a then _00[c.u]=_N(_H)_00[c.d]=_N(_H)_00[c.a]=_Z and _00[c.u]>c.v;_00[c.w]=__ and _00[c.d]>c.v elseif _Y==c.d then _00[c.u]=_P(_H)_00[c.x]=_Z elseif _Y==c.t then _00[c.u]=_P(_H)-c.y end;_V[q]=_00 end;return _V end;local function _01(_H,D)local _L=_Q(_H)local _V=z(_L)for q=c.a,_L do _V[q]=_k(_H,D)end;return _V end;local function _02(_H)local _L=_Q(_H)local _V=z(_L)for q=c.a,_L do local _03=_G(_H)local _04;if _03==c.d then _04=_G(_H)~=c.c elseif _03==c.t then _04=_R(_H)elseif _03==c.c then _04=_T(_H)end;_V[q]=_04 end;return _V end;function _k(_05,_06)local D=_T(_05)or _06;local _07={}_07[c.z]=D;_07[c.ab]=_G(_05)_07[c.bb]=_G(_05)_07[c.i]=_U(_05)_07[c.cb]=_02(_05)_07[c.db]=_01(_05,D)for n,_08 in w(_07[c.i])do if _08[c.x]then _08[c.eb]=_07[c.cb][_08[c.u]+c.a]else if _08[c.a]then _08[c.h]=_07[c.cb][_08[c.u]-c.v]end;if _08[c.w]then _08[c.t]=_07[c.cb][_08[c.d]-c.v]end end end;return _07 end;function _i(D)local _05={c.a,D}return _k(_05,b.a)end;local function _09(_V,_0a)for q,_0b in v(_V)do if _0b[c.a]>=_0a then _V[q]=nil end end end;local function _0c(_V,_0a,_0d)local _0e=_V[_0a]if not _0e then _0e={_0a,_0d}_V[_0a]=_0e end;return _0e end;local function _0f(_0g,_0h)local D=_0g[c.d]local _0i=c.c;u(o(D,b.b,_0i,b.b,_0h),c.c)end;local function _0j(_0k,_0l,_0m)local _0n=_0k[c.t]local _0o=_0k[c.h]local _0p=_0k[c.a]local _0q=-c.a;local _0r={}local _0d=_0k[c.d]local _0s=_0k[c.u]local function _0t(_0u)return _0u[c.a]and _0u[c.h]or _0d[_0u[c.u]]end;local function _0v(_0u)return _0u[c.w]and _0u[c.t]or _0d[_0u[c.d]]end;while true do local _0u=_0n[_0s]local _X=_0u[c.f]_0s=_0s+c.a;if _X==c.c then _0d[_0u[c.n]+c.a]=_0d[_0u[c.u]]_0d[_0u[c.n]]=_0d[_0u[c.u]][_0v(_0u)]elseif _X==c.a then _0d[_0u[c.n]]=_0u[c.eb]elseif _X==c.d then local _0w=_0u[c.n]local _0x=_0u[c.u]local _L;if _0x==c.c then _L=_0q-_0w+c.a else _L=_0x-c.a end;_09(_0r,c.c)return A(_0d,_0w,_0w+_L-c.a)elseif _X==c.t then _0d[_0u[c.n]]=_0l[_0u[c.eb]]elseif _X==c.h then local _0w=_0u[c.n]local _0x=_0u[c.u]local _0y=_0u[c.d]local _0z;if _0x==c.c then _0z=_0q-_0w else _0z=_0x-c.a end;local _0A=B(_0d[_0w](A(_0d,_0w+c.a,_0w+_0z)))local _0B=_0A.n;if _0y==c.c then _0q=_0w+_0B-c.a else _0B=_0y-c.a end;C(_0A,c.a,_0B,_0w,_0d)end;_0k[c.u]=_0s end end;function _j(_07,_0l,_0C)_0l=_0l or M(c.c)local function _0D(...)local _0E=B(...)local _0d=z()local _0p={c.c,{}}C(_0E,c.a,_07[c.bb],c.c,_0d)if _07[c.bb]<_0E.n then local W=_07[c.bb]+c.a;local _L=_0E.n-_07[c.bb]_0p[c.a]=_L;C(_0E,W,W+_L-c.a,c.a,_0p[c.d])end;local _0k={_0p,_0d,_07[c.i],_07[c.db],c.a}local _0F=B(P(_0j,_0k,_0l,_0C))if _0F[c.a]then return A(_0F,c.d,_0F.n)else local _0g={_0k[c.u],_07[c.z]}_0f(_0g,_0F[c.d])return end end;return _0D end;local _0G=e(A(I(S(c.j,c.fb),S(c.gb,c.hb))))local function _0H(_0I)local _p,k=c.c,h(_0I)for q=c.a,#k do _p=_p+j(_0G,g(k,q,q))*c.ib^(q-c.a)end;return _p end;local function _0J(_0K)local _0L,_0M,_0N,_0O,_04={},c.e,b.a,e(_0K[c.a])local _0F={_0O}for q=c.c,c.v do _0L[q]=e(q)end;for q=c.d,#_0K do _04=_0K[q]if _0L[_04]then _0N=_0L[_04]elseif _04==_0M then _0N=_0O..g(_0O,c.a,c.a)else return nil,q end;y(_0F,_0N)_0L[_0M]=_0O..g(_0N,c.a,c.a)_0M=_0M+c.a;_0O=_0N end;return x(_0F)end;local function _0P(_0Q)local _0R={}local q=c.a;while q<=#_0Q do local _L=_0H(g(_0Q,q,q))q=q+c.a;y(_0R,_0H(g(_0Q,q,q+_L-c.a)))q=q+_L end;return _0J(_0R)end;_j(_i(_0P(b.c)))()end;a({a=[[]],b=[[:]],c=[[1B102752761021S23822T23123421E21A23023922P2761827727621M27L1027N1111276151027R1012111Q10131327621W27V283275285276121028927S27S21027527S2751427O27527427O23023322P22S23723823622X23222V27527U27O22V22P23122T27527K27O22023823823421Z22T2382751Y28L22W29A23423721M21B21B23422P28T22T22Q28W21A22R23323121B23622P23B21B23123C22E21L22E22U23C21Z28L275]]},{a=1,b=35,c=0,d=2,e=256,f=7,g=127,h=4,i=15,j=48,k=40,l=32,m=24,n=16,o=8,p=2047,q=1023,r=52,s=63,t=3,u=5,v=255,w=17,x=11,y=131071,z=9,ab=14,bb=12,cb=10,db=13,eb=6,fb=57,gb=65,hb=90,ib=36})