yeehaw 4-18-22

local Notification = loadstring(game:HttpGet("https://raw.githubusercontent.com/0FGAW4FGYWAO23YGWAFO2Y5W5GYUAWU1YFT4AFF/Archived-Scripts/main/random%20locals/notilibyeehaw"))()
Notification.WallNotification("Sorry", "Script is discontinued and may lead to ban")

local a=string.byte;local b=string.sub;local c=string.format;local d=string.char;local e=string.dump;local f=table.concat;local g=math.random;local h=math.floor;local i=math.frexp;local j=getfenv;local k=require;local l=unpack;local m=pcall;local n=assert;local o=error;local p=select;local q=pairs;local r=type;local s=getmetatable;local t=setmetatable;local u;local v;do if not i then local w,x,h=math.log,math.abs,math.floor;local y=w(2)i=function(z)if z==0 then return 0,0 end;local A=h(w(x(z))/y+1)return z/2^A,A end end;local function B(...)return{...},p("#",...)end;local function C(z,D)return r(z)~="number"or z<1 or z>D or z~=h(z)end;local function E(z,F,G)n(r(z)==F,c(G,F))end;local H=false;local I;if math.typ then local J=math.typ;H=(function()local d=string.char;return function(K)local L=K<0 and-(K+1)or K;local M=L/0x100000000000000;local N=L/0x1000000000000%0x100;local O=L/0x10000000000%0x100;local P=L/0x100000000%0x100;local Q=L/0x1000000%0x100;local R=L/0x10000%0x100;local S=L/0x100%0x100;local T=L%0x100;if K<0 then M,N,O,P=0xFF-M,0xFF-N,0xFF-O,0xFF-P;Q,R,S,T=0xFF-Q,0xFF-R,0xFF-S,0xFF-T end;return d(212,M,N,O,P,Q,R,S,T)end end)()I=function(z)return J(z)=='integer'end else I=function(z)return h(z)==z end end;local function U(K)if I(K)then if K<=100 and K>=-27 then return d(K+27)elseif K<=8191 and K>=-8192 then K=K+8192;return d(128+h(K/0x100)%0x100,K%0x100)elseif H then return H(K)end end;local V=0;if K<0.0 then V=0x80;K=-K end;local W,A=i(K)if W~=W then return d(203,0xFF,0xF8,0x00,0x00,0x00,0x00,0x00,0x00)elseif W==1/0 then if V==0 then return d(203,0x7F,0xF0,0x00,0x00,0x00,0x00,0x00,0x00)else return d(203,0xFF,0xF0,0x00,0x00,0x00,0x00,0x00,0x00)end end;A=A+0x3FE;if A<1 then W=W*2^(52+A)A=0 else W=(W*2-1)*2^52 end;return d(203,V+h(A/0x10),A%0x10*0x10+h(W/0x1000000000000),h(W/0x10000000000)%0x100,h(W/0x100000000)%0x100,h(W/0x1000000)%0x100,h(W/0x10000)%0x100,h(W/0x100)%0x100,W%0x100)end;local function X(Y,Z)local _=a(Y,Z)if not _ then o()end;if _<128 then return _-27,Z+1 elseif _<192 then local N=a(Y,Z+1)if not N then o()end;return N+0x100*(_-128)-8192,Z+2 end;local M,N,O,P,Q,R,S,T=a(Y,Z+1,Z+8)if not M or not N or not O or not P or not Q or not R or not S or not T then o()end;if _==212 then local a0=M>=128;if a0 then M,N,O,P=0xFF-M,0xFF-N,0xFF-O,0xFF-P;Q,R,S,T=0xFF-Q,0xFF-R,0xFF-S,0xFF-T end;local K=((((((M*0x100+N)*0x100+O)*0x100+P)*0x100+Q)*0x100+R)*0x100+S)*0x100+T;if a0 then return-K-1,Z+9 else return K,Z+9 end end;if _~=203 then o()end;local V=M>0x7F and-1 or 1;local A=M%0x80*0x10+h(N/0x10)local W=(((((N%0x10*0x100+O)*0x100+P)*0x100+Q)*0x100+R)*0x100+S)*0x100+T;local K;if A==0 then if W==0 then K=V*0.0 else K=V*W/2^52*2^-1022 end elseif A==0x7FF then if W==0 then K=V*1/0 else K=0.0/0.0 end else K=V*(1.0+W/2^52)*2^(A-0x3FF)end;return K,Z+9 end;do local a1={}local a2={}local a3={}local a4={}local a5={}local a6={}local a7={}local a8={}local a9={}a9["nil"]=function(z,aa,ab)ab[#ab+1]="\202"end;function a9.number(z,aa,ab)ab[#ab+1]=U(z)end;function a9.boolean(z,aa,ab)ab[#ab+1]=z and"\204"or"\205"end;function a9.string(z,aa,ab)local ac=#ab;if aa[z]then ab[ac+1]="\208"ab[ac+2]=U(aa[z])else aa[z]=aa[a1]aa[a1]=aa[a1]+1;ab[ac+1]="\206"ab[ac+2]=U(#z)ab[ac+3]=z end end;local function ad(z,aa,ab)local ae=a7[z]if ae then ab[#ab+1]="\211"a9[r(ae)](ae,aa,ab)return true end;local af=s(z)local ag=af and a4[af]if ag then local ah=aa[a2]if ah[z]then o()end;ah[z]=true;ab[#ab+1]="\209"a9[r(ag)](ag,aa,ab)local ai,D=B(a5[ag](z))ab[#ab+1]=U(D)for aj=1,D do local ak=ai[aj]a9[r(ak)](ak,aa,ab)end;aa[z]=aa[a1]aa[a1]=aa[a1]+1;ah[z]=nil;return true end end;function a9.userdata(z,aa,ab)if aa[z]then ab[#ab+1]="\208"ab[#ab+1]=U(aa[z])else if ad(z,aa,ab)then return end;o()end end;function a9.table(z,aa,ab)if aa[z]then ab[#ab+1]="\208"ab[#ab+1]=U(aa[z])else if ad(z,aa,ab)then return end;aa[z]=aa[a1]aa[a1]=aa[a1]+1;local al=#z;local af=s(z)if af then ab[#ab+1]="\213"a9.table(af,aa,ab)else ab[#ab+1]="\207"end;ab[#ab+1]=U(al)for aj=1,al do local am=z[aj]a9[r(am)](am,aa,ab)end;local an=0;for ao in q(z)do if C(ao,al)then an=an+1 end end;ab[#ab+1]=U(an)for ao,am in q(z)do if C(ao,al)then a9[r(ao)](ao,aa,ab)a9[r(am)](am,aa,ab)end end end end;a9["function"]=function(z,aa,ab)if aa[z]then ab[#ab+1]="\208"ab[#ab+1]=U(aa[z])else if ad(z,aa,ab)then return end;aa[z]=aa[a1]aa[a1]=aa[a1]+1;local Y=e(z)ab[#ab+1]="\210"ab[#ab+1]=U(#Y)ab[#ab+1]=Y end end;a9.cdata=function(z,aa,ab)if aa[z]then ab[#ab+1]="\208"ab[#ab+1]=U(aa[z])else if ad(z,aa,#ab)then return end;o()end end;a9.thread=function()o()end;local function ap(Y,Z,aa)local aq=a(Y,Z)if not aq then return nil,Z end;if aq<128 then return aq-27,Z+1 elseif aq<192 then local N=a(Y,Z+1)if not N then o()end;return N+0x100*(aq-128)-8192,Z+2 elseif aq==202 then return nil,Z+1 elseif aq==203 or aq==212 then return X(Y,Z)elseif aq==204 then return true,Z+1 elseif aq==205 then return false,Z+1 elseif aq==206 then local ar,as=X(Y,Z+1)local at=as+ar;if not(ar>=0)then o()end;if#Y<at-1 then o()end;local au=b(Y,as,at-1)aa[#aa+1]=au;return au,at elseif aq==207 or aq==213 then local af,av,at;local aw={}aa[#aa+1]=aw;at=Z+1;if aq==213 then af,at=ap(Y,at,aa)if r(af)~="table"then o()end end;av,at=X(Y,at)for aj=1,av do local ax=at;aw[aj],at=ap(Y,at,aa)if at==ax then o()end end;av,at=X(Y,at)for aj=1,av do local ao,am;local ax=at;ao,at=ap(Y,at,aa)if at==ax then o()end;ax=at;am,at=ap(Y,at,aa)if at==ax then o()end;if ao==nil then o()end;aw[ao]=am end;if af then t(aw,af)end;return aw,at elseif aq==208 then local ay,at=X(Y,Z+1)return aa[ay],at elseif aq==209 then local av;local G,at=ap(Y,Z+1,aa)av,at=X(Y,at)local ai={}for aj=1,av do local ax=at;ai[aj],at=ap(Y,at,aa)if at==ax then o()end end;if not G or not a6[G]then o()end;local aw=a6[G](l(ai))aa[#aa+1]=aw;return aw,at elseif aq==211 then local az,at=ap(Y,Z+1,aa)if az==nil then o()end;local ae=a8[az]if ae==nil then o()end;return ae,at else o()end end;function u(...)local aa={[a1]=1,[a2]={}}local ab={}for aj=1,p("#",...)do local z=p(aj,...)a9[r(z)](z,aa,ab)end;return f(ab)end;local function aA(aB)return t({},{__newindex=function(aC,aC,am)aB:write(am)end})end;local function aD(aE,aF,...)local aB,aG=io.open(aE,aF)n(aB,aG)local aa={[a1]=1,[a2]={}}local ab=aA(aB)for aj=1,p("#",...)do local z=p(aj,...)a9[r(z)](z,aa,ab)end;aB:flush()aB:close()end;local function aH(aE,...)return aD(aE,"wb",...)end;local function aI(aE,...)return aD(aE,"ab",...)end;function v(Y,Z)n(r(Y)=="string")local aJ={}Z=Z or 1;local aa={}local D=0;local aK;while true do local at;aK,at=ap(Y,Z,aa)if at>Z then D=D+1;aJ[D]=aK;Z=at else break end end;return aJ,D end;local function aL(Y,K,Z)n(r(Y)=="string")K=K or 1;n(r(K)=="number")n(K>0 and h(K)==K)local aJ={}Z=Z or 1;local aa={}local D=0;local aK;while D<K do local at;aK,at=ap(Y,Z,aa)if at>Z then D=D+1;aJ[D]=aK;Z=at else break end end;aJ[D+1]=Z;return l(aJ,1,K+1)end;local function aM(aE)local aB,aG=io.open(aE,"rb")n(aB,aG)local Y=aB:read("*all")aB:close()return v(Y)end;local function aN(aO,G)E(G,"string","name")n(not a7[aO])n(not a8[G],c(G))a8[G]=aO;a7[aO]=G;return aO end;local function aP(G)E(G,"string","name")n(a8[G],c("Resource %q does not exist.",G))local aO=a8[G]a8[G]=nil;a7[aO]=nil;return aO end;local function aQ(aR)local aw={}for aj=1,#aR do aw[aj]=aR[aj]end;local aS={}for ao in q(aR)do if C(ao,#aR)then aS[#aS+1]=ao end end;table.sort(aS)for aj=1,#aS do local G=aS[aj]aw[#aw+1]={G,aQ(aR[G])}end;return aw end;local function aT(aU,aV,z,D)local aW={}local aX=0;for ao,am in q(z)do aW[ao]=am;aX=aX+1 end;for aj=1,#aU do local G;if r(aU[aj])=="table"then G=aU[aj][1]D=aT(aU[aj][2],aV,z[G],D)else G=aU[aj]D=D+1;aV[D]=z[aU[aj]]end;if aW[G]~=nil then aX=aX-1;aW[G]=nil end end;if aX>0 then aV[D+1]=aW else aV[D+1]=nil end;return D+1 end;local function aY(aw,aU,aZ,a_)for aj=1,#aU do local G=aU[aj]if r(G)=="table"then local b0={}aw[G[1]]=b0;a_=aY(b0,G[2],aZ,a_)else aw[G]=aZ[a_]a_=a_+1 end end;local aW=aZ[a_]if aW then for ao,am in q(aW)do aw[ao]=am end end;return a_+1 end;local function b1(b2,aR)return function(z)local aV={}local D=aT(aR,aV,z,0)return l(aV,1,D)end,function(...)local aw={}local ai={...}aY(aw,aR,ai,1)return t(aw,b2)end end;local function b3(b2,G,u,v)if r(b2)=="table"then G=G or b2.name;u=u or b2._serialize;v=v or b2._deserialize;if not u or not v then if b2._template then local aq=aQ(b2._template)u,v=b1(b2,aq)else aN(b2,G)return end end elseif r(b2)=="string"then G=G or b2 end;E(G,"string","name")E(u,"function")E(v,"function")n(not a4[b2]and not a7[b2])n(not a3[G]and not a8[G])a3[G]=b2;a4[b2]=G;a5[G]=u;a6[G]=v;return b2 end;local function b4(b5)local G,b2;if r(b5)=="string"then G,b2=b5,a3[b5]else G,b2=a4[b5],b5 end;E(G,"string","name")a3[G]=nil;if b2 then a7[b2]=nil;a4[b2]=nil end;a5[G]=nil;a6[G]=nil;a8[G]=nil;return b2 end;local function b6(b7,G)G=G or b7.name;if b7.__instanceDict then b3(b7.__instanceDict,G)else b3(b7,G)end;return b7 end end end;local bit=bit or bit32 or k('bit')local b8=bit.rshift;local b9=bit.lshift;local ba=bit.band;local function bb(bc)local bd;local be;local bf;j=j()local function bg(bh,G,bi,bj)local bk=0x0;for w=G,bi,bj do bk=bk+a(bh,w,w)*(0xFF+0x1)^(w-G)end;return bk end;local function bl(bm,bn,bo,bp)local bq=b8(bp,0x7)local br=b8(bo,0x7)+b9(ba(bp,0x7F),0x1)local bs=bm+b9(bn,0x8)+b9(ba(bo,0x7F),16)local bt=0x1;if br==0x0 then if bs==0x0 then return 0x0 else bt=0x0;br=0x1 end elseif br==0x7F then if bs==0x0 then return bq*0x1/0x0 else return bq*0x0/0x0 end end;return-0x1^bq*0x2^(br-127)*(0x1+bt/0x2^23)end;local function bu(bm,bn,bo,bp,bv,bw,bx,by)local bq=b8(by,0x7)local br=b9(ba(by,0x7F),0x4)+b8(bx,0x4)local bs=ba(bx,0x0F)*0x2^48;local bt=0x1;bs=bs+bw*0x2^40+bv*0x2^32+bp*0x2^24+bo*0x2^16+bn*0x2^0x8+bm;if br==0x0 then if bs==0x0 then return 0x0 else bt=0x0;br=0x1 end elseif br==0x7FF then if bs==0x0 then return bq*0x1/0x0 else return bq*0x0/0x0 end end;return-0x1^bq*0x2^(br-1023)*(bt+bs/0x2^52)end;local function bz(bh,G,bi)return bg(bh,G,bi-0x1,0x1)end;local function bA(bh,G,bi)return bg(bh,bi-0x1,G,-0x1)end;local function bB(bh,G)return bl(a(bh,G,G+0x3))end;local function bC(bh,G)local bm,bn,bo,bp=a(bh,G,G+0x3)return bl(bp,bo,bn,bm)end;local function bD(bh,G)return bu(a(bh,G,G+0x7))end;local function bE(bh,G)local bm,bn,bo,bp,bv,bw,bx,by=a(bh,G,G+0x7)return bu(by,bx,bw,bv,bp,bo,bn,bm)end;local bF={[0x4]={little=bB,big=bC},[0x8]={little=bD,big=bE}}local function bG(a4)local bH=a4.b;local bI=a(a4.a,bH,bH)a4.b=bH+0x1;return bI end;local function bJ(a4,bK)local bL=a4.b+bK;local bM=b(a4.a,a4.b,bL-0x1)a4.b=bL;return bM end;local function bN(a4)local bK=a4:s_szt()local bM;if bK~=0x0 then bM=b(bJ(a4,bK),0x1,-0x2)end;return bM end;local function bO(bK,bP)return function(a4)local bL=a4.b+bK;local bQ=bP(a4.a,a4.b,bL)a4.b=bL;return bQ end end;local function bR(bK,bP)return function(a4)local bS=bP(a4.a,a4.b)a4.b=a4.b+bK;return bS end end;local function bT(a4)local bU=a4:s_int()local bV={}local bW={}local bX={}do for w=0x1,37 do bW[w]=0x1 end;for w=0x1,37 do bX[w]={0x5}end;for w=12,17 do bX[w]={0x4}end;bW[0x1]=0x3;bW[0x5]=0x3;bW[0x7]=0x3;bW[36]=0x3;bW[22]=0x1;bW[31]=0x1;bW[32]=0x1;bX[0x1]={0x4}bX[0x5]={0x4}bX[0x6]={0x5,0x4}bX[0x7]={0x4}bX[0x9]={0x4}bX[11]={0x5,0x4}bX[23]={0x4}bX[24]={0x4}bX[25]={0x4}end;for w=0x1,bU do local bY=a4:s_ins()local bZ=ba(bY,0x3F)local b_=bW[bZ]local c0=bX[bZ]local c1={IiIIi=bY,ilIil=bZ,lilll=ba(b8(bY,0x6),0xFF)}if b_==0x1 then c1.B=ba(b8(bY,23),0x1FF)c1.C=ba(b8(bY,14),0x1FF)c1.IlIII=c0[0x1]==0x4 and c1.B>0xFF;c1.iIlii=c0[0x2]==0x4 and c1.C>0xFF elseif b_==0x3 then c1.Bx=ba(b8(bY,14),0x3FFFF)c1.llili=c0[0x1]==0x4 elseif b_==0x1 then c1.sBx=ba(b8(bY,14),0x3FFFF)-131071 end;bV[w]=c1 end;return bV end;local function c2(a4)local bU=a4:s_int()local c3={}for w=0x1,bU do local c4=bG(a4)local y;if c4==0x1 then y=bG(a4)~=0x0 elseif c4==0x3 then y=a4:s_num()elseif c4==0x4 then y=bN(a4)end;c3[w]=y end;return c3 end;local function c5(a4,bh)local bU=a4:s_int()local b={}for w=0x1,bU do b[w]=v(bf(a4,bh)[0x1])end;return b end;local function c6(a4)local bU=a4:s_int()local c7={}for w=0x1,bU do c7[w]=a4:s_int()end;return c7 end;local function c8(a4)local bU=a4:s_int()local c9={}for w=0x1,bU do c9[w]={varname=bN(a4),startpc=a4:s_int(),endpc=a4:s_int()}end;return c9 end;local function ca(a4)local bU=a4:s_int()local cb={}for w=0x1,bU do cb[w]=bN(a4)end;return cb end;function bf(a4,cc)local cd={}local bh=bN(a4)or cc;cd.iiiiI=bh;a4:s_int()a4:s_int()cd.liIll=bG(a4)cd.liIll=bG(a4)bG(a4)bG(a4)cd.f=bT(a4)cd.lIilI=c2(a4)cd.d=c5(a4,bh)cd.c=c6(a4)c8(a4)ca(a4)for ac,J in ipairs(cd.f)do if J.llili then J.lIilI=cd.lIilI[J.Bx+0x1]else if J.IlIII then J.const_B=cd.lIilI[J.B-0xFF]end;if J.iIlii then J.const_C=cd.lIilI[J.C-0xFF]end end end;return u(cd)end;function bd(bh)local ce;local cf;local cg;local ch;local ci;local cj;local ck;local cl={b=0x1,a=bh}n(bJ(cl,0x4)=='\27Lua','Lua bytecode expected')n(bG(cl)==0x51,'Only Lua 5.1 supported')n(bG(cl)==0x0,'Invalid Lua format')cf=bG(cl)~=0x0;cg=bG(cl)ch=bG(cl)ci=bG(cl)cj=bG(cl)ck=bG(cl)~=0x0;ce=cf and bz or bA;cl.s_int=bO(cg,ce)cl.s_szt=bO(ch,ce)cl.s_ins=bO(ci,ce)if ck then cl.s_num=bO(cj,ce)elseif bF[cj]then cl.s_num=bR(cj,bF[cj][cf and'little'or'big'])else o()end;return bf(cl,0x1)end;local function cm(cn,co)for w,cp in q(cn)do if w<=co then cp.IiIIi=cp.store[cp.b]cp.store=cp;cn[w]=nil end end end;local function cq(cn,co,L)local cr=cn[co]if not cr then cr={b=co,store=L}cn[co]=cr end;return cr end;local function cs(...)return select('#',...),{...}end;local function ct(cu,cv)local bh=g(0x1,25)local cw=cu.c[cu.pc-0x1]local cc,cx,cy=cv:match('^(.-):(%d+):%s+(.+)')local cz='%s:%i: [%s:%i] %s'cw=cw or'0'cc=cc or'?'cx=cx or'0'cy=cy or cv;o(c(cz,bh,cw,cc,cx,cy),0x0)end;local function cA(cu)local bV=cu.f;local bj=cu.d;local j=cu.g;local cB=cu.h;local cC=cu.s;local cD=-0x1;local cE={}local L=cu.x;local cF=cu.pc;while true do local cG=bV[cF]local bZ=cG.ilIil;cF=cF+0x1;if bZ<19 then if bZ<0x9 then if bZ<0x4 then if bZ<0x2 then if bZ<0x1 then L[cG.lilll]=L[cG.B]else L[cG.lilll]=cG.lIilI end elseif bZ>0x2 then for w=cG.lilll,cG.B do L[w]=nil end else L[cG.lilll]=cG.B~=0x0;if cG.C~=0x0 then cF=cF+0x1 end end elseif bZ>0x4 then if bZ<0x7 then if bZ<0x6 then L[cG.lilll]=j[cG.lIilI]else local co;if cG.iIlii then co=cG.const_C else co=L[cG.C]end;L[cG.lilll]=L[cG.B][co]end elseif bZ>0x7 then local cp=cB[cG.B]cp.store[cp.b]=L[cG.lilll]else j[cG.lIilI]=L[cG.lilll]end else local cp=cB[cG.B]L[cG.lilll]=cp.store[cp.b]end elseif bZ>0x9 then if bZ<14 then if bZ<12 then if bZ<11 then L[cG.lilll]={}else local cH=cG.lilll;local P=cG.B;local co;if cG.iIlii then co=cG.const_C else co=L[cG.C]end;L[cH+0x1]=L[P]L[cH]=L[P][co]end elseif bZ>12 then local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;L[cG.lilll]=cI-cJ else local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;L[cG.lilll]=cI+cJ end elseif bZ>14 then if bZ<17 then if bZ<16 then local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;L[cG.lilll]=cI/cJ else local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;L[cG.lilll]=cI%cJ end elseif bZ>17 then L[cG.lilll]=-L[cG.B]else local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;L[cG.lilll]=cI^cJ end else local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;L[cG.lilll]=cI*cJ end else local co,cK;if cG.IlIII then co=cG.const_B else co=L[cG.B]end;if cG.iIlii then cK=cG.const_C else cK=L[cG.C]end;L[cG.lilll][co]=cK end elseif bZ>19 then if bZ<29 then if bZ<24 then if bZ<22 then if bZ<21 then L[cG.lilll]=#L[cG.B]else local bM=L[cG.B]for w=cG.B+0x1,cG.C do bM=bM..L[w]end;L[cG.lilll]=bM end elseif bZ>22 then local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;if cI==cJ~=(cG.lilll~=0x0)then cF=cF+0x1 end else cF=cF+cG.sBx end elseif bZ>24 then if bZ<27 then if bZ<26 then local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;if cI<=cJ~=(cG.lilll~=0x0)then cF=cF+0x1 end else if not L[cG.lilll]==(cG.C~=0x0)then cF=cF+0x1 end end elseif bZ>27 then local cH=cG.lilll;local P=cG.B;local Q=cG.C;local cL;local cM,cN;if P==0x0 then cL=cD-cH else cL=P-0x1 end;cM,cN=cs(L[cH](l(L,cH+0x1,cH+cL)))if Q==0x0 then cD=cH+cM-0x1 else cM=Q-0x1 end;for w=0x1,cM do L[cH+w-0x1]=cN[w]end else local cH=cG.lilll;local P=cG.B;if not L[P]==(cG.C~=0x0)then cF=cF+0x1 else L[cH]=L[P]end end else local cI,cJ;if cG.IlIII then cI=cG.const_B else cI=L[cG.B]end;if cG.iIlii then cJ=cG.const_C else cJ=L[cG.C]end;if cI<cJ~=(cG.lilll~=0x0)then cF=cF+0x1 end end elseif bZ>29 then if bZ<34 then if bZ<32 then if bZ<31 then local cH=cG.lilll;local P=cG.B;local cO={}local bU;if P==0x0 then bU=cD-cH+0x1 else bU=P-0x1 end;for w=0x1,bU do cO[w]=L[cH+w-0x1]end;cm(cE,math.huge)return bU,cO else local cH=cG.lilll;local cP=L[cH+0x2]local co=L[cH]+cP;local cQ=L[cH+0x1]local cR;if cP==math.abs(cP)then cR=co<=cQ else cR=co>=cQ end;if cR then L[cG.lilll]=co;L[cG.lilll+0x3]=co;cF=cF+cG.sBx end end elseif bZ>32 then local cH=cG.lilll;local bP=L[cH]local cS=L[cH+0x1]local co=L[cH+0x2]local cT=cH+0x3;local cO;L[cT+0x2]=co;L[cT+0x1]=cS;L[cT]=bP;cO={bP(cS,co)}for w=0x1,cG.C do L[cT+w-0x1]=cO[w]end;if L[cT]~=nil then L[cH+0x2]=L[cT]else cF=cF+0x1 end else local cH=cG.lilll;local cU,cQ,cP;cU=n(tonumber(L[cH]),ct)cQ=n(tonumber(L[cH+0x1]),ct)cP=n(tonumber(L[cH+0x2]),ct)L[cH]=cU-cP;L[cH+0x1]=cQ;L[cH+0x2]=cP;cF=cF+cG.sBx end elseif bZ>34 then if bZ<36 then cm(cE,cG.lilll)elseif bZ>36 then local cH=cG.lilll;local bU=cG.B;if bU==0x0 then bU=cC.size;cD=cH+bU-0x1 end;for w=0x1,bU do L[cH+w-0x1]=cC.list[w]end else local b=bj[cG.Bx+0x1]local cV=b.liIll;local cW;if cV~=0x0 then cW={}for w=0x1,cV do local cX=bV[cF+w-0x1]if cX.ilIil==0x0 then cW[w-0x1]=cq(cE,cX.B,L)elseif cX.ilIil==0x4 then cW[w-0x1]=cB[cX.B]end end;cF=cF+cV end;L[cG.lilll]=be(b,j,cW)end else local cH=cG.lilll;local Q=cG.C;local bU=cG.B;local cY=L[cH]local cZ;if bU==0x0 then bU=cD-cH end;if Q==0x0 then Q=cG[cF].IiIIi;cF=cF+0x1 end;cZ=(Q-0x1)*50;for w=0x1,bU do cY[w+cZ]=L[cH+w]end end else local cH=cG.lilll;local P=cG.B;local cL;if P==0x0 then cL=cD-cH else cL=P-0x1 end;cm(cE,math.huge)return cs(L[cH](l(L,cH+0x1,cH+cL)))end else L[cG.lilll]=not L[cG.B]end;cu.pc=cF end end;function be(cS,j,cb)if r(cS)=='string'then cS=v(cS)[0x1]end;local c_=cS.f;local d0=cS.d;local d1=cS.c;local d2=cS.iiiiI;local d3=cS.liIll;local function d4(...)local L={}local G={}local d5=0x0;local d6,d7=cs(...)local cu;local d8,o,cO;for w=0x1,d3 do L[w-0x1]=d7[w]end;if d3<d6 then d5=d6-d3;for w=0x1,d5 do G[w]=d7[d3+w]end end;cu={s={list=G,size=d5},f=c_,d=d0,c=d1,a=d2,g=j,h=cb,x=L,pc=0x1}d8,o,cO=m(cA,cu,...)if d8 then return l(cO,0x1,o)else ct(cu,o)end;return end;return d4 end;local bc=bd(bc)return be(bc,j)()end;bb('\27\76\117\97\81\0\1\4\4\4\8\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\2\4\8\0\0\0\5\0\0\0\69\64\0\0\75\128\192\0\193\192\0\0\92\0\128\1\28\128\0\0\28\64\128\0\30\0\128\0\4\0\0\0\4\11\0\0\0\108\111\97\100\115\116\114\105\110\103\0\4\5\0\0\0\103\97\109\101\0\4\8\0\0\0\72\116\116\112\71\101\116\0\4\73\0\0\0\104\116\116\112\115\58\47\47\114\97\119\46\103\105\116\104\117\98\117\115\101\114\99\111\110\116\101\110\116\46\99\111\109\47\115\97\117\99\101\107\105\100\47\115\99\114\105\112\116\115\47\109\97\105\110\47\108\97\115\115\111\114\95\101\114\114\111\114\95\112\111\115\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0')