--[[
WARNING: Heads up! This script has not been verified by ScriptBlox. Use at your own risk!
]]
do local a=[[77fuscator 0.5.0 - discord.gg/CEHsVcBcuf]];return(function(b,c,d,e,f,f,g,h,i,j,k,l,l,m,n,o,p,q,r,s,t,u,u,v,w,w,x,y,y,z,z,z,ba,ba,bb,bb,bb,bc)local bd,be,bf,bg,bh,bi,bj,bk,bl,bm,bn,bo,bp,bq,br,bs,bt,bu,bv,bw,bx,by,bz,ca,cb,cc,cd,ce,cf,cg,ch,ci,cj,ck,cl,cm,cn,co,cp,cq,cr=0 while true do if bd<=17 then if bd<=8 then if bd<=3 then if bd<=1 then if bd==0 then be,bf,bg,bh,bi,bj,bk=string.sub,table.concat,string.char,tonumber,next,((table.create or function(cs,ct)local cu={};for cv=1,cs do cu[cv]=ct;end;return cu;end)or tostring)else bl=1 end else if 3~=bd then bm=function(bi)local bk,cs,ct,cu,cv,cw,cx,cy=0 while true do if bk<=5 then if bk<=2 then if bk<=0 then cs,ct=g,g else if 1==bk then cu=bj(#bi)else cv=256 end end else if bk<=3 then cw=bj(cv)else if bk==4 then for bj=0,(cv-1)do cw[bj]=bg(bj)end else cx=1 end end end else if bk<=8 then if bk<=6 then cy=function()local bj,cz,da=0 while true do if bj<=2 then if bj<=0 then cz=bh(be(bi,cx,cx),36)else if bj==1 then cx=(cx+1)else da=bh(be(bi,cx,(cx+cz-1)),36)end end else if bj<=3 then cx=(cx+cz)else if 4<bj then break else return da end end end bj=bj+1 end end else if 7==bk then cs=bg(cy())else cu[1]=cs end end else if bk<=9 then while cx<#bi and not(#a~=d)do local a=cy()if cw[a]then ct=cw[a]else ct=cs..be(cs,1,1)end cw[cv]=(cs..be(ct,1,1))cu[(#cu+1)],cs,cv=ct,ct,(cv+1)end else if 11>bk then return bf(cu)else break end end end end bk=bk+1 end end else bn=bm(b)end end else if bd<=5 then if bd<5 then bo={}else c={k,i,l,x,m,u,w,y,q,o,j,s,nil,nil,nil};end else if bd<=6 then bp=v else if bd<8 then bq=bp(bo)else br,bs=1,((-6311+(function()local a,b,c,d,k=0 while true do if a<=0 then b,c,d,k=0 else if 1<a then break else while true do if(b<1 or b==1)then if not(0~=b)then c,d=0,1 else k=(function(q)local s,v=0 while true do if s<=0 then v=0 else if 1==s then while true do if v>0 then break else q(q(q))end v=(v+1)end else break end end s=s+1 end end)(function(q)local s,v=0 while true do if s<=0 then v=0 else if 2~=s then while true do if(v<=2)then if(v<=0)then if c>312 then return q end else if 2~=v then c=(c+1)else d=((d*80)%14524)end end else if v<=3 then if(((d%1904)==952 or(d%1904)>952))then return q((q(q)and q(q)))else return q end else if v>4 then break else return q end end end v=(v+1)end else break end end s=s+1 end end)end else if(b>2)then break else return d;end end b=b+1 end end end a=a+1 end end)()))end end end end else if bd<=12 then if bd<=10 then if bd<10 then bt={}else bu=function(a,b)local c,d=0 while true do if c<=1 then if 1>c then d=0 else for k=0,31 do local q=(a%2)local s=(b%2)if not(q~=0)then if not(s~=1)then b=b-1 d=(d+2^k)end else a=a-1 if not(s~=0)then d=(d+2^k)else b=b-1 end end b=b/2 a=(a/2)end end else if c~=3 then return d else break end end c=c+1 end end end else if bd<12 then bv=function(a,b)local c=0 while true do if 0<c then break else return(a*2^b);end c=c+1 end end else bw=function()local a,b,c=0 while true do if a<=1 then if a==0 then b,c=h(bn,br,br+2)else b,c=bu(b,bs),bu(c,bs);end else if a<=2 then br=(br+2);else if a>3 then break else return((bv(c,8))+b);end end end a=a+1 end end end end else if bd<=14 then if bd>13 then bx=bt else do for a,b in o,l(bl)do bt[a]=b;end;end;end else if bd<=15 then by=function(a,b)local c=0 while true do if c==0 then return p((a/2^b));else break end c=c+1 end end else if bd<17 then bz=(2^32-1)else ca=function(a,b)local c=0 while true do if c>0 then break else return((((a+b)-bu(a,b)))/2)end c=c+1 end end end end end end end else if bd<=26 then if bd<=21 then if bd<=19 then if 18==bd then cb=bw()else cc=function(a,b)local c=0 while true do if c==0 then return bz-ca((bz-a),(bz-b))else break end c=c+1 end end end else if bd==20 then cd=function(a,b,c)local d=0 while true do if d<1 then if c then local c=(a/2^(b-1))%(2^((c-1)-(b-1)+1))return(c-(c%1))else local b=(2^(b-1))return(((a%(b+b)>=b)and 1)or 0)end else break end d=d+1 end end else ce=bw()end end else if bd<=23 then if 23>bd then cf=function()local a,b,c,d,k=0 while true do if a<=1 then if a==0 then b,c,d,k=h(bn,br,br+3)else b,c,d,k=bu(b,cb),bu(c,cb),bu(d,cb),bu(k,cb);end else if a<=2 then br=br+4;else if 3<a then break else return(bv(k,24)+bv(d,16)+bv(c,8))+b;end end end a=a+1 end end else cg=function()local a,b=0 while true do if a<=1 then if a>0 then br=(br+1);else b=bu(h(bn,br,br),cb)end else if a~=3 then return b;else break end end a=a+1 end end end else if bd<=24 then ch,ci,cj=nil else if 26>bd then ch=((-753+(function()local a=778;local b=1556;local c=790;local d=2487;local k=576;local p=253;local q=376;local s=752;local v=32511;local w=310;local x=163;local y=155;local be=36797;local bf=54;local bg=472;local bh=2;local bi=3;local bj=7082;local bk=267;local bs=425;local bw=534;local by=430;local bz=10958;local ca=31;local cc=1;local ce=0;local cs,ct=ce,1;local a=(function(cu,cv,cw,cx)cw(cv(cu,cw,cv,cw),(cx(cx,cx,cv,cw)and cw(cv,cx,cw,cv)),cx(cu,cw,cv,(cv and cw)),cw(cx and cx,cw,cu,cu)and cx(cw,cx,cu,cu))end)(function(cu,cv,cw,cx)if cs>by then local by=ce while true do by=(by+cc)if not(by~=cc)then return cv else break end end end cs=cs+cc ct=(ct*ca)%bz if((ct%bw)<bk or(ct%bw)==bk)then local bk=ce while true do bk=bk+cc if(bk<cc or bk==cc)then ct=((ct*bs)%bj)else if bk<bi then return cx(cw(cv and cv,cx,cw,cx),cv(cx,cx,cw and cw,cw),cx(cw,cv,cx,cw),cw(cx,cw,cv,cu))else break end end end else local bi=ce while true do bi=(bi+cc)if(bi<bh)then return cv else break end end end return cw end,function(bi,bj,bk,bs)if cs>bg then local bg=ce while true do bg=(bg+cc)if(bg>cc)then break else return bj end end end cs=cs+cc ct=((ct+bf)%be)if(ct%w)<y then local w=ce while true do w=(w+cc)if not(w~=cc)then return bj else break end end else local w=ce while true do w=(w+cc)if w<bh then return bi(bi((bi and bk),bi,bj,bs and bi),bs(bs,bj,bk,bs)and bk(bs,bi,bj,bs),bs(bj,bk,bk,bk)and bi(bk,bs,bs,bk),bk(bk,bk,bs,bj))else break end end end return bs(bj(bj and bi,bs,bj,bj),bj(bk,bk,bj and bi,bk),bs(bj,bj,bs,bs),bk(bj,bs,bk,bs and bs))end,function(w,y,be,bf)if cs>x then local x=ce while true do x=(x+cc)if not(x~=bh)then break else return w end end end cs=cs+cc ct=(ct-k)%v if((ct%s)==q or(ct%s)>q)then local k=ce while true do k=(k+cc)if not(k~=bh)then break else return w(w(be,be and bf,bf,w),bf(bf,w,(y and w),y),y(y,bf,bf,bf),w(be,bf,w,bf))end end else local k=ce while true do k=k+cc if k>cc then break else return be end end end return bf end,function(k,q,s,v)if cs>p then local p=ce while true do p=(p+cc)if not(p~=cc)then return k else break end end end cs=cs+cc ct=((ct+c)%d)if((ct%b)>a or(ct%b)==a)then local a=ce while true do a=a+cc if a<bh then return k else break end end else local a=ce while true do a=(a+cc)if(a<bh)then return q(s(v,q,v,v),q(q,k,k,k)and k(v,s,(s and q),v),q(k and s,s,s,s and s),v(q,k,v,s))else break end end end return v(k(v,k,s,v),k(q,q,v,q)and q(v,s,k,q and s),k((v and v),q,v,q and s),v(q,k and k,q,v and s))end)return ct;end)()));else ci=((-9934+(function()local a,b,c,d,k,p,q,s,v,w,x,y,be,bf,bg,bh,bi,bj,bk,bs,bw,by,bz,ca,cc,ce,cs,ct,cu,cv,cw=0 while true do if a<=0 then b,c,d,k,p,q,s,v,w,x,y,be,bf,bg,bh,bi,bj,bk,bs,bw,by,bz,ca,cc,ce,cs,ct,cu,cv,cw=0 else if 1<a then break else while true do if(b<14 or b==14)then if(b<=6)then if(b<2 or b==2)then if(b<0 or b==0)then c=757 else if 1<b then k=15731 else d=1514 end end else if(b<=4)then if 3<b then q=375 else p=672 end else if(b<6)then s=325 else v=750 end end end else if(b==10 or b<10)then if b<=8 then if(8>b)then w=641 else x=17436 end else if b<10 then y=485 else be=374 end end else if(b==12 or b<12)then if not(b~=11)then bf=970 else bg=652 end else if not(13~=b)then bh=49022 else bi=403 end end end end else if b<=21 then if(b==17 or b<17)then if b<=15 then bj=46689 else if b<17 then bk=317 else bs=968 end end else if(b==19 or b<19)then if not(18~=b)then bw=3 else by=44174 end else if(b<21)then bz=634 else ca=2 end end end else if(b<=25)then if(b<23 or b==23)then if(22==b)then cc=606 else ce=130 end else if 24==b then cs=1 else ct=0 end end else if(b<27 or b==27)then if 26==b then cu,cv=ct,cs else cw=(function(cx,cy,cz,da)local db,dc=0 while true do if db<=0 then dc=0 else if 2>db then while true do if 0<dc then break else da(cy(((cy and cy)),da,cz,da),cz(cx,cx,cz,cz),cy(da,cy,cx,(da and cz)),cx(cz,cz,((cx and cx)),cy))end dc=dc+1 end else break end end db=db+1 end end)(function(cx,cy,cz,da)local db,dc=0 while true do if db<=0 then dc=0 else if db<2 then while true do if(dc==2 or dc<2)then if dc<=0 then if(cu>ce)then local ce=ct while true do ce=((ce+cs))if not(not(ce==ca))then break else return da end end end else if(dc~=2)then cu=((cu+cs))else cv=(((cv+cc))%by)end end else if(dc<=3)then if((((cv%bz))<bk)or not(((cv%bz)~=bk)))then local bk=ct while true do bk=(bk+cs)if((bk>ca or bk==ca))then if not(not(not(bk~=bw)))then break else return da end else cv=((cv-bs)%bj)end end else local bj=ct while true do bj=((bj+cs))if(bj<ca)then return da(cx(cy,(cx and cy),cy,cx),cx(da,da,da,((cy and da))),cx(cy,cz,cy and cx,da),cx(da,cz,cx,((cx and cz))))else break end end end else if(dc<5)then return cx(cy(cx,cz,cz,cz and cx),((cy(cy,da,da,cz)and da(cz,((cy and da)),cz,cx))),cy(cz,cz,cx,cz),cz(cy,((da and cy)),((cy and cy)),cz))else break end end end dc=dc+1 end else break end end db=db+1 end end,function(bj,bk,bs,bw)local by,bz=0 while true do if by<=0 then bz=0 else if 2~=by then while true do if bz<=2 then if(bz<=0)then if(cu>bi)then local bi=ct while true do bi=(bi+cs)if not(not((bi==ca)))then break else return bs end end end else if(1<bz)then cv=(((cv-bg))%bh)else cu=((cu+cs))end end else if(bz<3 or bz==3)then if(((cv%bf)>y))then local y=ct while true do y=(y+cs)if not(not((y==cs)))then return bk else break end end else local y=ct while true do y=y+cs if not(not(y==ca))then break else return bj(bj(bk,bw,bw,bk),bw(bj,((bw and bk)),bk,bs),bj(bk,(bj and bs),bs,bj),bk((bs and bw),bs,bk,bw))end end end else if(5~=bz)then return bw(((bw((bj and bs),bj,bw,bs)and bj(bk,(bs and bw),bk,bw))),bw(bs,(bs and bj),bw,bk),(bk(bw,bj,bj,bs)and bk(bk,bw,bw,bk)),bk(bk,bs and bk,bj,bj))else break end end end bz=bz+1 end else break end end by=by+1 end end,function(y,bf,bg,bh)local bi,bj=0 while true do if bi<=0 then bj=0 else if bi>1 then break else while true do if(bj<2 or bj==2)then if bj<=0 then if((cu>be))then local be=ct while true do be=(be+cs)if((be<ca))then return bf else break end end end else if not(bj~=1)then cu=((cu+cs))else cv=((((cv-w))%x))end end else if(bj<=3)then if((cv%v)==q or((cv%v))<q)then local q=ct while true do q=(q+cs)if not(not((q==cs)))then return y((bg(y,bg,bh,bh)and bh((bg and bf),(bh and bh),bh,bf)),bf(y,bf,bf,bf),bf(bf,(bg and y),y,y),bg(y,bg,bf,bf))else break end end else local q=ct while true do q=(q+cs)if q>cs then break else return bf end end end else if 4<bj then break else return bg end end end bj=bj+1 end end end bi=bi+1 end end,function(q,v,w,x)local y,be=0 while true do if y<=0 then be=0 else if y~=2 then while true do if(be<=2)then if(be==0 or be<0)then if(cu>s)then local s=ct while true do s=((s+cs))if not((s~=cs))then return v else break end end end else if be>1 then cv=((((cv-p))%k))else cu=((cu+cs))end end else if(be<=3)then if((cv%d)<c)then local c=ct while true do c=(c+cs)if(c<ca)then return w else break end end else local c=ct while true do c=((c+cs))if not(c~=cs)then return v(q(x,x,x,q),x(v,x,v,q)and v(w,w,x,q),v((q and x),v,v,x),x(v,x,q,x))else break end end end else if be<5 then return x(x((q and v),w,v,v),q((v and v),w,w,v),q(w,q and x,v,q),q(v,v,x,v))else break end end end be=be+1 end else break end end y=y+1 end end)end else if not(28~=b)then return cv;else break end end end end end b=b+1 end end end a=a+1 end end)()));end end end end else if bd<=31 then if bd<=28 then if 27==bd then cj=((-10257+(function()local a=1060;local b=480;local c=1411;local d=960;local k=559;local p=808;local q=444;local s=1616;local v=22622;local w=212;local x=341;local y=3;local be=17870;local bf=994;local bg=397;local bh=794;local bi=35598;local bj=1;local bk=325;local bs=2;local bw=0;local by=379;local bz,ca=0,bj;local a=(function(cc,ce,cs)cc(cc((ce and ce),ce,cc),cc(cc,ce,cc),cc(cc,cs,ce))end)(function(cc,ce,cs)if(bz>by)then local by=bw while true do by=(by+bj)if not(by~=bs)then break else return cc end end end bz=bz+bj ca=(ca*bk)%bi if((ca%bh)>bg or(ca%bh)==bg)then local bg=bw while true do bg=bg+bj if(bg>bs or bg==bs)then if not(bg~=y)then break else return ce end else ca=(ca*bf)%be end end else local y=bw while true do y=(y+bj)if not(y~=bj)then return cs((cs(cs,ce,cc and cs)and cc(cs,cs,cs)),cs(cc and cc,ce and cc,cc),cs(cs,cc,(ce and cs)))else break end end end return cc(cc((ce and cs),cc,ce),ce((ce and ce),cs,ce),(cs(cc and cc,(ce and cs),cc)and ce(ce,cs,cc)))end,function(y,be,bg)if(bz>x)then local x=bw while true do x=x+bj if x>bj then break else return be end end end bz=(bz+bj)ca=((ca+w)%v)if(ca%s)<p then local p=bw while true do p=p+bj if(p<bs)then return be(y(y,be,be),bg(y,be,bg),(bg(be,bg,be)and be(bg,y,bg)))else break end end else local p=bw while true do p=(p+bj)if p>bj then break else return bg end end end return be end,function(p,s,v)if bz>q then local q=bw while true do q=q+bj if(q>bj)then break else return s end end end bz=bz+bj ca=((ca*k)%c)if(ca%d)<b then local b=bw while true do b=b+bj if(b==bj or b<bj)then ca=(ca+bf)%a else if b>bs then break else return s((v(v,p,(v and v))and p(s,v,(v and p))),s(s,v,p),(p(v,v,p)and p(v,s,v)))end end end else local a=bw while true do a=a+bj if(a>bj)then break else return p end end end return s end)return ca;end)()));else ck=function()local a,b,c,d,k,p,q=0 while true do if a<=3 then if a<=1 then if 1~=a then b,c=cf(),cf()else if(b==0 and c==0)then return 0;end;end else if a==2 then d=1 else k=(cd(c,1,20)*(2^32))+b end end else if a<=5 then if a~=5 then p=cd(c,21,31)else q=((-1)^cd(c,32))end else if a<=6 then if(p==0)then if((k==0))then return(q*0);else p=1;d=0;end;elseif(p==2047)then if(not(k~=0))then return q*((1/0));else return(q*(0/0));end;end;else if 7<a then break else return(q*2^(p-1023)*(d+(k/(2^52))))end end end end a=a+1 end end end else if bd<=29 then cl="\46"else if 31>bd then cm=function()local a,b,c=0 while true do if a<=1 then if a==0 then b,c=h(bn,br,(br+2))else b,c=bu(b,cb),bu(c,cb);end else if a<=2 then br=(br+2);else if a==3 then return(bv(c,8))+b;else break end end end a=a+1 end end else cn=cf end end end else if bd<=33 then if bd>32 then cp=cf else co=function()local a,b,c,d,k=0 while true do if a<=2 then if a<=0 then b=g else if 1==a then c=888 else d=0 end end else if a<=3 then k={}else if a==4 then while(d<9)do d=(d+1);while(d<17 and c%990<495)do c=(c-20)local p=(d+c)if((c%10840)==5420 or(c%10840)>5420)then c=((c+86))while(d<940 and c%1432<716)do c=(c*37)local p=((d+c))if((c%15392)==7696 or(c%15392)>7696)then c=(c+37)local p=56474 if not k[p]then k[p]=1;return z(b,cl,function(p)local q,s=0 while true do if q<=0 then s=0 else if q<2 then while true do if not(s==1)then return i(h(p))else break end s=s+1 end else break end end q=q+1 end end);end elseif(not((c%4)==0))then c=((c*22))local p=19381 if not k[p]then k[p]=1;end else c=((c-73))d=d+1 local p=19228 if not k[p]then k[p]=1;return z(b,cl,function(p)local q,s=0 while true do if q<=0 then s=0 else if 1==q then while true do if not(s~=0)then return i(h(p))else break end s=s+1 end else break end end q=q+1 end end);end end;d=d+1;end elseif not(c%4==0)then c=((c*2))while d<82 and c%1614<807 do c=((c+39))local p=(d+c)if(((c%15318)==7659 or(c%15318)>7659))then c=((c*29))local p=90860 if not k[p]then k[p]=1;return z(b,cl,function(p)local q,s=0 while true do if q<=0 then s=0 else if 1<q then break else while true do if s<1 then return i(h(p))else break end s=s+1 end end end q=q+1 end end);end elseif((c%4~=0))then c=(c*73)local p=72370 if not k[p]then k[p]=1;return z(b,cl,function(p)local q,s=0 while true do if q<=0 then s=0 else if 1<q then break else while true do if not(1==s)then return i(h(p))else break end s=(s+1)end end end q=q+1 end end);end else c=((c+97))d=d+1 local p=46261 if not k[p]then k[p]=1;return z(b,cl,function(p)local q,s=0 while true do if q<=0 then s=0 else if q==1 then while true do if s~=1 then return i(h(p))else break end s=(s+1)end else break end end q=q+1 end end);end end;d=(d+1);end else c=(c+51)d=d+1 while(d<947)and(((c%498)<249))do c=((c*74))local p=(d+c)if(((c%17130)>8565 or(c%17130)==8565))then c=(((c+41)))local p=34251 if not k[p]then k[p]=1;local p,q=cn(),g;if not(not(p==0))then return g;end;b=j(bn,br,(((br+p)-1)));br=br+p;return z(b,cl,function(p)local q,s=0 while true do if q<=0 then s=0 else if q~=2 then while true do if not(0~=s)then return i(h(p))else break end s=s+1 end else break end end q=q+1 end end);end elseif not(not(((c%4))~=0))then c=((c+81))local p=71505 if not k[p]then k[p]=1;end else c=((c*28))d=(d+1)local p=9101 if not k[p]then k[p]=1;return z(b,cl,function(b)local k,p=0 while true do if k<=0 then p=0 else if k<2 then while true do if not(1==p)then return i(h(b))else break end p=(p+1)end else break end end k=k+1 end end);end end;d=((d+1));end end;d=(d+1);end c=((c-356))if((d>80))then break;end;end;else break end end end a=a+1 end end end else if bd<=34 then cq=function(...)local a=0 while true do if 0<a then break else return{...},n("\35",...)end a=a+1 end end else if bd>35 then break else cr=function()local a,b,c,d,k,p,q,s,v,w=0 while true do if a<=9 then if a<=4 then if a<=1 then if a<1 then b,c,d,k={},{},{},{}else p=m({[ch]=b,nil,[ci]=c,nil,[491]=k,[472]=bb,[472]=nil},{['\95\95\116\111\115\116\114\105\110\103']=function(...)return j(bn,br,br);end,})end else if a<=2 then q={}else if 4>a then s=684 else v=0 end end end else if a<=6 then if 6>a then w={}else while(v<5)do v=v+1;while(v<843 and s%448<224)do s=((s-10))local d=(v+s)if((s%156))>78 then s=(((s+59)))while(v<828)and s%1616<808 do s=(((s*13)))local d=(v+s)if(((s%17964))>8982)then s=(s*91)local d=86597 if not w[d]then w[d]=1;q[cf()]=nil;end elseif(not(s%4==0))then s=(s+86)local d=34676 if not w[d]then w[d]=1;q[cf()]=nil;end else s=(((s-54)))v=(v+1)local d=85339 if not w[d]then w[d]=1;q[cf()]=nil;end end;v=v+1;end elseif not(s%4==0)then s=(s+2)while v<792 and s%290<145 do s=((s-59))local d=((v+s))if((((s%13876))<6938))then s=(((s+65)))local d=48178 if not w[d]then w[d]=1;for d=1,cf()do local j=cg();if((j==1))then q[d]=nil;elseif(not(j~=3))then q[d]=((not(cg()==0)));elseif(not(not(j==2)))then q[d]=ck();elseif(not((j~=0)))then q[d]=co();end;end;p[cj]=q;end elseif not(not((s%4)~=0))then s=((s-87))local d=47515 if not w[d]then w[d]=1;q[cf()]=nil;end else s=(((s*79)))v=(v+1)local d=6851 if not w[d]then w[d]=1;q[cf()]=nil;end end;v=(v+1);end else s=(((s+49)))v=(v+1)while(((v<137)and(s%234<117)))do s=((s*57))local d=((v+s))if(((s%150)>=75))then s=((s-77))local d=19937 if not w[d]then w[d]=1;q[cf()]=nil;end elseif(not((s%4)==0))then s=((s-59))local d=71764 if not w[d]then w[d]=1;q[cf()]=nil;end else s=((s+52))v=((v+1))local d=61574 if not w[d]then w[d]=1;q[cf()]=nil;end end;v=v+1;end end;v=v+1;end s=((s+222))if(v>23)then break;end;end;end else if a<=7 then for d=1,cf()do c[d-1]=cr();end;else if a>8 then s=651 else p[6]=cg();end end end end else if a<=14 then if a<=11 then if 11>a then v=0 else w={}end else if a<=12 then while(v<4)do v=((v+1));while(v<535 and s%620<310)do s=((s*16))local c=(v+s)if((s%2042)<1021 or(s%2042)==1021)then s=((s-94))while((v<453 and((s%406)<203)))do s=(s+84)local c=(v+s)if((s%1666)<=833)then s=((s-15))local c=20264 if not w[c]then w[c]=1;local c=1;local d=2;local j=3;local k=4;for k=1,cf()do local x=cg();local y=cd(x,c,c);if((not(y~=0)))then local x,y,bb=cd(x,d,j),cd(x,4,6),m({[693]=cm(),[475]=cm(),nil,nil},{['\95\95\116\111\115\116\114\105\110\103']=function(...)return cd(x,d,j);end,})if((not(x~=0))or(not(x~=c)))then bb[818]=cf();if(((x==0)))then bb[43]=cf();end;elseif((x==d)or(not(x~=j)))then bb[818]=((cf()-(e)));if(not((not(x==j))))then bb[43]=cm();end;end;if(not(not(cd(y,c,c)==c)))then bb[475]=q[bb[475]];end;if((cd(y,d,d)==c))then bb[818]=q[bb[818]];end;if(((cd(y,j,j)==c)))then bb[43]=q[bb[43]];end;b[k]=bb;end;end;end elseif not(s%4==0)then s=((s-25))local b=92944 if not w[b]then w[b]=1;end else s=(((s+59)))v=(v+1)local b=64382 if not w[b]then w[b]=1;end end;v=((v+1));end elseif s%4~=0 then s=(s+15)while(v<412 and(s%268)<134)do s=((s+17))local b=v+s if(((s%12558)>=6279))then s=(((s*45)))local b=11956 if not w[b]then w[b]=1;end elseif not((s%4)==0)then s=((s*30))local b=51460 if not w[b]then w[b]=1;end else s=((s*87))v=(v+1)local b=85210 if not w[b]then w[b]=1;end end;v=(v+1);end else s=(((s-76)))v=(v+1)while(((v<424)and(s%1758<879)))do s=((s-94))local b=(v+s)if((s%1446))>723 then s=((s+75))local b=73023 if not w[b]then w[b]=1;end elseif not((s%4)==0)then s=((s+26))local b=91749 if not w[b]then w[b]=1;end else s=(((s*54)))v=(v+1)local b=58502 if not w[b]then w[b]=1;end end;v=(v+1);end end;v=((v+1));end s=(((s+257)))if(v>77)then break;end;end;else if 14>a then do for b=1,#p[ch]do local b=p[ch][b]local c,d,e=b[475],b[818],b[43]if not(not(bp(c)==f))then c=z(c,cl,function(j,k,k)local k,q=0 while true do if k<=0 then q=0 else if 1<k then break else while true do if not(q~=0)then return i(bu(h(j),cb))else break end q=q+1 end end end k=k+1 end end)b[475]=c end if not(not(bp(d)==f))then d=z(d,cl,function(c,j)local j,k=0 while true do if j<=0 then k=0 else if 2>j then while true do if k>0 then break else return i(bu(h(c),cb))end k=k+1 end else break end end j=j+1 end end)b[818]=d end if(not(not(bp(e)==f)))then e=z(e,cl,function(c,d,d,d)local d,j=0 while true do if d<=0 then j=0 else if 2~=d then while true do if 0<j then break else return i(bu(h(c),cb))end j=(j+1)end else break end end d=d+1 end end)b[43]=e end;end;p[cj]=nil;end;else s=84 end end end else if a<=16 then if 16~=a then v=0 else w={}end else if a<=17 then while(v<2)do v=((v+1));while((v<217)and(s%232)<116)do s=(((s-94)))local b=((v+s))if(((s%18106))==9053 or((s%18106))>9053)then s=(((s*89)))while(((v<751)and(s%1384<692)))do s=(((s+34)))local b=v+s if(((s%7838)>3919)or(s%7838)==3919)then s=((s-7))local b=43832 if not w[b]then w[b]=1;p[472]=function(...)local b,c,d,e,h=0 while true do if b<=0 then c,d,e,h=0 else if 2~=b then while true do if(c==2 or c<2)then if(c<=0)then d=n(1,...)else if(c<2)then e=({...})else do for d=0,#e do if not(bp(e[d])~=bq)then for i,i in o,e[d]do if not(not(bp(i)==bp(g)))then t(bo,i)end end else t(bo,e[d])end end end end end else if(c<=3)then h=function(d)local g,i,j=0 while true do if g<=0 then i,j=0 else if g>1 then break else while true do if i<=1 then if(0==i)then j=u(d)else for j=0,#bo do if ba(d,bo[j])then return bm(f);end end end else if not(i~=2)then return false else break end end i=i+1 end end end g=g+1 end end else if(5>c)then for d=0,#e do if not(bp(e[d])~=bq)then return h(e[d])end end else break end end end c=(c+1)end else break end end b=b+1 end end end elseif not(((s%4)==0))then s=((s*59))local b=15062 if not w[b]then w[b]=1;return p end else s=((s*44))v=(v+1)local b=65253 if not w[b]then w[b]=1;return p end end;v=v+1;end elseif not(not((s%4)~=0))then s=(s*36)while((v<773)and s%170<85)do s=((s*27))local b=(v+s)if(s%11412)>=5706 then s=(s+19)local b=15852 if not w[b]then w[b]=1;end elseif not(s%4==0)then s=((s-57))local b=466 if not w[b]then w[b]=1;return p end else s=(((s-65)))v=(v+1)local b=62180 if not w[b]then w[b]=1;return p end end;v=(v+1);end else s=((s*51))v=(v+1)while((v<263)and s%442<221)do s=(((s+46)))local b=((v+s))if(((s%8632)<4316))then s=(((s+1)))local b=70908 if not w[b]then w[b]=1;return p end elseif not((s%4)==0)then s=(((s*63)))local b=56724 if not w[b]then w[b]=1;return p end else s=(s+35)v=(v+1)local b=65617 if not w[b]then w[b]=1;return p end end;v=v+1;end end;v=((v+1));end s=((s+443))if(v>4)then break;end;end;else if a==18 then return p;else break end end end end end a=a+1 end end end end end end end end bd=bd+1 end local function a(b,c)local d if bp(l)==bq then d=l;else d=l(bl);end local e={}for f,g in o,d do if g~=b then e[f]=g else e[f]=c;end end if bc then return bc(bl,e)else l=e;return l;end end;local function b(...)local c=n(bl,...);local d=n(2,...);local e=n(3,...);local f=c[ci];local g=c[472];local h=c[ch];local i=c[6];local j=c[472];local c=c[491];local c=bt[ba(bx,j)];return function(...)local j,k,n,o,p,q,s,u=cq,1,-1,{},{...},(n("\35",...)-1),{},{};for v=0,q,1 do if(v>=i)then o[v-i]=p[v+1];else u[v]=p[v+1];end;end;local v,w,x,y=(q-i+1),nil,nil,{};while true do w=h[k];x=w[693];if 95>=x then if x<=47 then if x<=23 then if 11>=x then if x<=5 then if 2>=x then if 0>=x then u[w[475]][w[818]]=w[43];elseif x~=2 then local y;u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];y=w[475]u[y]=u[y](r(u,y+1,w[818]))else local y=w[475]u[y]=u[y](r(u,y+1,n))end;elseif 3>=x then if u[w[475]]then k=k+1;else k=w[818];end;elseif 4==x then local y;u={};for z=0,q,1 do if z<i then u[z]=p[z+1];else break;end;end;k=k+1;w=h[k];u[w[475]]=false;k=k+1;w=h[k];u[w[475]]=e[w[818]];k=k+1;w=h[k];for z=w[475],w[818],1 do u[z]=nil;end;k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];y=w[475]u[y]=u[y](u[y+1])else local y=f[w[818]];local z={};local ba={};for bb=1,w[43]do k=k+1;local bc=h[k];if bc[693]==28 then ba[bb-1]={u,bc[818]};else ba[bb-1]={d,bc[818]};end;s[#s+1]=ba;end;m(z,{['\95\95\105\110\100\101\120']=function(bb,bb)local bb=ba[bb];return bb[1][bb[2]];end,['\95\95\110\101\119\105\110\100\101\120']=function(bb,bb,bc)local ba=ba[bb]ba[1][ba[2]]=bc;end;});u[w[475]]=b(y,z,e);end;elseif 8>=x then if x<=6 then if(u[w[475]]~=u[w[43]])then k=w[818];else k=k+1;end;elseif 7==x then local y=w[475]u[y](r(u,y+1,w[818]))else e[w[818]]=u[w[475]];end;elseif 9>=x then u[w[475]]=u[w[818]][w[43]];elseif x~=11 then u[w[475]]=u[w[818]]+w[43];else u[w[475]]();end;elseif 17>=x then if 14>=x then if(x==12 or x<12)then a(c,g);elseif(14>x)then u[w[475]]={r({},1,w[818])};else local y,z=0 while true do if y<=7 then if y<=3 then if y<=1 then if 1~=y then z=nil else u[w[475]]=u[w[818]];end else if 2<y then w=h[k];else k=k+1;end end else if y<=5 then if 4<y then k=k+1;else u[w[475]]=w[818];end else if y>6 then u[w[475]]=w[818];else w=h[k];end end end else if y<=11 then if y<=9 then if 8==y then k=k+1;else w=h[k];end else if y<11 then u[w[475]]=w[818];else k=k+1;end end else if y<=13 then if y==12 then w=h[k];else z=w[475]end else if y~=15 then u[z]=u[z](r(u,z+1,w[818]))else break end end end end y=y+1 end end;elseif x<=15 then local y;u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];y=w[475]u[y]=u[y](r(u,y+1,w[818]))elseif x>16 then local y=w[475];local z=u[w[818]];u[y+1]=z;u[y]=z[w[43]];else local y;u[w[475]]={};k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]={};k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=e[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];y=w[475]u[y](r(u,y+1,w[818]))end;elseif 20>=x then if x<=18 then if(u[w[475]]<=w[43])then k=(k+1);else k=w[818];end;elseif 19==x then local y;local z;u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]={r({},1,w[818])};k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];z=w[475];y=u[z];for ba=z+1,w[818]do t(y,u[ba])end;else local y;u={};for z=0,q,1 do if z<i then u[z]=p[z+1];else break;end;end;k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=#u[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];y=w[475];u[y]=u[y]-u[y+2];k=w[818];end;elseif 21>=x then local y;u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];y=w[475]u[y]=u[y](r(u,y+1,w[818]))elseif x<23 then u[w[475]][w[818]]=u[w[43]];else if(u[w[475]]~=u[w[43]])then k=k+1;else k=w[818];end;end;elseif 35>=x then if 29>=x then if 26>=x then if(24==x or 24>x)then local y=0 while true do if(y==8 or y<8)then if(y==3 or y<3)then if(y==1 or y<1)then if(1>y)then a(c,g);else k=k+1;end else if(y==2)then w=h[k];else u={};end end else if(y==5 or y<5)then if not(5==y)then for z=0,q,1 do if z<i then u[z]=p[(z+1)];else break;end;end;else k=k+1;end else if(y<=6)then w=h[k];else if(7<y)then k=(k+1);else u[w[475]]=w[818];end end end end else if(y==12 or y<12)then if y<=10 then if y~=10 then w=h[k];else u[w[475]]=e[w[818]];end else if(y>11)then w=h[k];else k=k+1;end end else if(y==14 or y<14)then if y>13 then k=(k+1);else u[w[475]]=e[w[818]];end else if(y<15 or y==15)then w=h[k];else if(17~=y)then u[w[475]]=u[w[818]][w[43]];else break end end end end end y=y+1 end elseif(26~=x)then local y=w[475];local z=u[y];for ba=y+1,w[818]do t(z,u[ba])end;else do return end;end;elseif x<=27 then if(u[w[475]]<u[w[43]])then k=k+1;else k=w[818];end;elseif 29~=x then u[w[475]]=u[w[818]];else local y=w[475];local z=u[y];for ba=y+1,n do t(z,u[ba])end;end;elseif x<=32 then if 30>=x then local y=w[475]u[y]=u[y]()elseif x>31 then local y;u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][u[w[43]]];k=k+1;w=h[k];y=w[475]u[y]=u[y](r(u,y+1,w[818]))else local y=w[475]local z,ba=j(u[y](r(u,y+1,w[818])))n=ba+y-1 local ba=0;for bb=y,n do ba=ba+1;u[bb]=z[ba];end;end;elseif x<=33 then local y,z=0 while true do if y<=11 then if y<=5 then if y<=2 then if y<=0 then z=nil else if 2~=y then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if y<=3 then w=h[k];else if 5~=y then u[w[475]]=d[w[818]];else k=k+1;end end end else if y<=8 then if y<=6 then w=h[k];else if 8~=y then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if y<=9 then w=h[k];else if y==10 then u[w[475]]=d[w[818]];else k=k+1;end end end end else if y<=17 then if y<=14 then if y<=12 then w=h[k];else if y>13 then k=k+1;else u[w[475]]=u[w[818]][w[43]];end end else if y<=15 then w=h[k];else if 16<y then k=k+1;else u[w[475]]=d[w[818]];end end end else if y<=20 then if y<=18 then w=h[k];else if 19==y then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if y<=22 then if y>21 then z=w[475]else w=h[k];end else if y==23 then u[z]=u[z](r(u,z+1,w[818]))else break end end end end end y=y+1 end elseif x<35 then if(w[475]<u[w[43]])then k=k+1;else k=w[818];end;else local y=w[475];do return r(u,y,n)end;end;elseif x<=41 then if 38>=x then if 36>=x then local y;u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];y=w[475]u[y]=u[y](r(u,y+1,w[818]))elseif x>37 then u[w[475]]=u[w[818]]+u[w[43]];else local y=w[475];local z,ba,bb=u[y],u[y+1],u[y+2];local z=z+bb;u[y]=z;if bb>0 and z<=ba or bb<0 and z>=ba then k=w[818];u[y+3]=z;end;end;elseif 39>=x then u[w[475]]=u[w[818]]%w[43];elseif x>40 then if u[w[475]]then k=k+1;else k=w[818];end;else local y;u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];y=w[475]u[y]=u[y](r(u,y+1,w[818]))end;elseif x<=44 then if x<=42 then local y=w[475];local z=w[43];local ba=y+2;local bb={u[y](u[y+1],u[ba])};for bc=1,z do u[ba+bc]=bb[bc];end local y=u[y+3];if y then u[ba]=y;k=w[818];else k=k+1 end;elseif 43<x then u[w[475]]=e[w[818]];else local y=w[475];u[y]=u[y]-u[y+2];k=w[818];end;elseif 45>=x then local y=w[475]u[y]=u[y](r(u,y+1,n))elseif 46<x then local y=w[475];local z=u[w[818]];u[y+1]=z;u[y]=z[w[43]];else local y;u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][u[w[43]]];k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];y=w[475]u[y]=u[y](r(u,y+1,w[818]))end;elseif x<=71 then if x<=59 then if 53>=x then if x<=50 then if x<=48 then local y=w[475]u[y](u[y+1])elseif 50~=x then u[w[475]]={};else local y=w[475];do return r(u,y,n)end;end;elseif x<=51 then u[w[475]]=u[w[818]]+w[43];elseif x<53 then u[w[475]]=w[818];else local y;local z;u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=e[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];z=w[475];y=u[z];for ba=z+1,w[818]do t(y,u[ba])end;end;elseif 56>=x then if 54>=x then local y;u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];y=w[475]u[y]=u[y](r(u,y+1,w[818]))elseif 56>x then u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]]={};k=k+1;w=h[k];u[w[475]]={};k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];else u[w[475]]=u[w[818]]-w[43];end;elseif x<=57 then local y=f[w[818]];local z={};local ba={};for bb=1,w[43]do k=k+1;local bc=h[k];if bc[693]==28 then ba[bb-1]={u,bc[818]};else ba[bb-1]={d,bc[818]};end;s[#s+1]=ba;end;m(z,{['\95\95\105\110\100\101\120']=function(m,m)local m=ba[m];return m[1][m[2]];end,['\95\95\110\101\119\105\110\100\101\120']=function(m,m,bb)local m=ba[m]m[1][m[2]]=bb;end;});u[w[475]]=b(y,z,e);elseif x<59 then for m=w[475],w[818],1 do u[m]=nil;end;else e[w[818]]=u[w[475]];end;elseif 65>=x then if(62>x or 62==x)then if(x<60 or x==60)then u[w[475]]=#u[w[818]];elseif(61==x)then local m=0 while true do if m<=13 then if m<=6 then if m<=2 then if m<=0 then u[w[475]]=u[w[818]][w[43]];else if 1<m then w=h[k];else k=k+1;end end else if m<=4 then if 4>m then u[w[475]][w[818]]=u[w[43]];else k=k+1;end else if m>5 then u[w[475]]=u[w[818]][w[43]];else w=h[k];end end end else if m<=9 then if m<=7 then k=k+1;else if 9~=m then w=h[k];else u[w[475]][w[818]]=u[w[43]];end end else if m<=11 then if m==10 then k=k+1;else w=h[k];end else if 13>m then u[w[475]][w[818]]=w[43];else k=k+1;end end end end else if m<=20 then if m<=16 then if m<=14 then w=h[k];else if m~=16 then u[w[475]][w[818]]=w[43];else k=k+1;end end else if m<=18 then if 17<m then u[w[475]]={};else w=h[k];end else if m<20 then k=k+1;else w=h[k];end end end else if m<=24 then if m<=22 then if 21<m then k=k+1;else u[w[475]]={};end else if 24~=m then w=h[k];else u[w[475]]=u[w[818]][w[43]];end end else if m<=26 then if 26>m then k=k+1;else w=h[k];end else if m<28 then u[w[475]][w[818]]=u[w[43]];else break end end end end end m=m+1 end else if(u[w[475]]~=u[w[43]])then k=w[818];else k=(k+1);end;end;elseif(63==x or 63>x)then local m=w[475]local y={u[m](u[m+1])};local z=0;for ba=m,w[43]do z=(z+1);u[ba]=y[z];end elseif(x==64)then local m,y=0 while true do if m<=7 then if m<=3 then if m<=1 then if 1~=m then y=nil else u[w[475]]=u[w[818]];end else if 2==m then k=k+1;else w=h[k];end end else if m<=5 then if m~=5 then u[w[475]]=w[818];else k=k+1;end else if m==6 then w=h[k];else u[w[475]]=w[818];end end end else if m<=11 then if m<=9 then if m==8 then k=k+1;else w=h[k];end else if m<11 then u[w[475]]=w[818];else k=k+1;end end else if m<=13 then if 12==m then w=h[k];else y=w[475]end else if 15>m then u[y]=u[y](r(u,y+1,w[818]))else break end end end end m=m+1 end else local m=w[475];do return u[m](r(u,(m+1),w[818]))end;end;elseif 68>=x then if(x<=66)then local m=u[w[43]];if not m then k=(k+1);else u[w[475]]=m;k=w[818];end;elseif x<68 then a(c,g);else u[w[475]]=(u[w[818]]+u[w[43]]);end;elseif x<=69 then local a;u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];a=w[475]u[a]=u[a](r(u,a+1,w[818]))elseif 71~=x then local a;u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];a=w[475]u[a]=u[a](r(u,a+1,w[818]))else do return u[w[475]]end end;elseif 83>=x then if x<=77 then if 74>=x then if 72>=x then u[w[475]]=b(f[w[818]],nil,e);elseif 73<x then d[w[818]]=u[w[475]];else local a=w[475];local c=u[a];for g=a+1,w[818]do t(c,u[g])end;end;elseif x<=75 then u[w[475]]=d[w[818]];elseif 76==x then u[w[475]]=#u[w[818]];else for a=w[475],w[818],1 do u[a]=nil;end;end;elseif 80>=x then if(78>=x)then local a=0 while true do if(a<=7)then if a<=3 then if(a==1 or a<1)then if(0==a)then u[w[475]][w[818]]=w[43];else k=(k+1);end else if(2==a)then w=h[k];else u[w[475]]=u[w[818]][w[43]];end end else if(a<=5)then if not(5==a)then k=k+1;else w=h[k];end else if(7>a)then u[w[475]][w[818]]=u[w[43]];else k=(k+1);end end end else if(a<=11)then if(a<9 or a==9)then if(8<a)then u[w[475]][w[818]]=w[43];else w=h[k];end else if(11~=a)then k=(k+1);else w=h[k];end end else if(a<=13)then if(12<a)then k=k+1;else u[w[475]]=u[w[818]][w[43]];end else if(a<14 or a==14)then w=h[k];else if(a<16)then u[w[475]][w[818]]=u[w[43]];else break end end end end end a=a+1 end elseif(x<80)then u[w[475]]=(u[w[818]]/w[43]);else d[w[818]]=u[w[475]];end;elseif 81>=x then local a;u[w[475]]=u[w[818]]%u[w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]]+w[43];k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]];k=k+1;w=h[k];a=w[475]u[a]=u[a](r(u,a+1,w[818]))elseif x<83 then local a=w[475]u[a](r(u,a+1,n))else u[w[475]][w[818]]=u[w[43]];end;elseif 89>=x then if x<=86 then if 84>=x then local a;u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]={};k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];a=w[475]u[a](r(u,a+1,w[818]))elseif x<86 then u[w[475]]=u[w[818]]%w[43];else local a=w[475]u[a]=u[a]()end;elseif 87>=x then local a=w[475]u[a](u[a+1])elseif x<89 then local a;local c;u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]={};k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]={};k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]]={};k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]]={r({},1,w[818])};k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];c=w[475];a=u[c];for g=c+1,w[818]do t(a,u[g])end;else if(w[475]<u[w[43]])then k=k+1;else k=w[818];end;end;elseif 92>=x then if x<=90 then local a;local c,g;local m;u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];m=w[475]c,g=j(u[m](r(u,m+1,w[818])))n=g+m-1 a=0;for g=m,n do a=a+1;u[g]=c[a];end;elseif 91==x then local a=w[475];u[a]=u[a]-u[a+2];k=w[818];else u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=w[43];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];end;elseif 93>=x then u[w[475]]();elseif 95>x then u[w[475]]=(not u[w[818]]);else u={};for a=0,q,1 do if a<i then u[a]=p[a+1];else break;end;end;k=k+1;w=h[k];u[w[475]]=e[w[818]];k=k+1;w=h[k];u[w[475]]=e[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=(not u[w[818]]);k=k+1;w=h[k];u[w[475]][w[818]]=u[w[43]];k=k+1;w=h[k];u[w[475]]=e[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];if(u[w[475]]~=w[43])then k=w[818];else k=k+1;end;end;elseif 143>=x then if 119>=x then if(107>x or 107==x)then if(101==x or 101>x)then if(x==98 or x<98)then if(x<96 or x==96)then local a,c=0 while true do if a<=17 then if a<=8 then if a<=3 then if a<=1 then if 1>a then c=nil else u={};end else if 3>a then for g=0,q,1 do if g<i then u[g]=p[g+1];else break;end;end;else k=k+1;end end else if a<=5 then if 4<a then u[w[475]]={};else w=h[k];end else if a<=6 then k=k+1;else if a==7 then w=h[k];else u[w[475]]=d[w[818]];end end end end else if a<=12 then if a<=10 then if a>9 then w=h[k];else k=k+1;end else if 12~=a then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if a<=14 then if 13<a then u[w[475]]=d[w[818]];else w=h[k];end else if a<=15 then k=k+1;else if a>16 then u[w[475]]=u[w[818]][w[43]];else w=h[k];end end end end end else if a<=26 then if a<=21 then if a<=19 then if a==18 then k=k+1;else w=h[k];end else if a==20 then u[w[475]]={};else k=k+1;end end else if a<=23 then if 22<a then u[w[475]]=w[818];else w=h[k];end else if a<=24 then k=k+1;else if 26~=a then w=h[k];else u[w[475]]=w[818];end end end end else if a<=30 then if a<=28 then if a>27 then w=h[k];else k=k+1;end else if 29==a then u[w[475]]=w[818];else k=k+1;end end else if a<=32 then if a<32 then w=h[k];else c=w[475];end else if a<=33 then u[c]=u[c]-u[c+2];else if 34==a then k=w[818];else break end end end end end end a=a+1 end elseif 97==x then u[w[475]]=(u[w[818]]-u[w[43]]);else local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if a<1 then c=nil else u[w[475]]=d[w[818]];end else if 2<a then w=h[k];else k=k+1;end end else if a<=5 then if a<5 then u[w[475]]=w[818];else k=k+1;end else if 6<a then u[w[475]]=w[818];else w=h[k];end end end else if a<=11 then if a<=9 then if a<9 then k=k+1;else w=h[k];end else if 10==a then u[w[475]]=w[818];else k=k+1;end end else if a<=13 then if 13~=a then w=h[k];else c=w[475]end else if 14<a then break else u[c]=u[c](r(u,c+1,w[818]))end end end end a=a+1 end end;elseif(x<99 or x==99)then u[w[475]]=d[w[818]];elseif(101>x)then local a=0 while true do if a<=6 then if a<=2 then if a<=0 then u={};else if a<2 then for c=0,q,1 do if c<i then u[c]=p[c+1];else break;end;end;else k=k+1;end end else if a<=4 then if a==3 then w=h[k];else u[w[475]]=e[w[818]];end else if 5==a then k=k+1;else w=h[k];end end end else if a<=10 then if a<=8 then if 7==a then u[w[475]]=u[w[818]];else k=k+1;end else if a<10 then w=h[k];else for c=w[475],w[818],1 do u[c]=nil;end;end end else if a<=12 then if a<12 then k=k+1;else w=h[k];end else if 13==a then k=w[818];else break end end end end a=a+1 end else u[w[475]]=w[818];end;elseif x<=104 then if x<=102 then local a=w[475]u[a](r(u,a+1,w[818]))elseif 104>x then local a=(u[w[475]]+w[43]);u[w[475]]=a;if(a<=u[w[475]+1])then k=w[818];end;else local a,c,g,m,y=0 while true do if a<=11 then if a<=5 then if a<=2 then if a<=0 then c=nil else if 2>a then g,m=nil else y=nil end end else if a<=3 then u[w[475]]=u[w[818]][u[w[43]]];else if a~=5 then k=k+1;else w=h[k];end end end else if a<=8 then if a<=6 then u[w[475]]=u[w[818]];else if a==7 then k=k+1;else w=h[k];end end else if a<=9 then u[w[475]]=w[818];else if 10==a then k=k+1;else w=h[k];end end end end else if a<=17 then if a<=14 then if a<=12 then u[w[475]]=w[818];else if a>13 then w=h[k];else k=k+1;end end else if a<=15 then u[w[475]]=w[818];else if 17~=a then k=k+1;else w=h[k];end end end else if a<=20 then if a<=18 then y=w[475]else if 19==a then g,m=j(u[y](r(u,y+1,w[818])))else n=m+y-1 end end else if a<=21 then c=0;else if a<23 then for m=y,n do c=c+1;u[m]=g[c];end;else break end end end end end a=a+1 end end;elseif(105>x or 105==x)then local a,c=0 while true do if a<=10 then if(a<=4)then if(a<=1)then if not(a==1)then c=nil else u[w[475]]=d[w[818]];end else if a<=2 then k=k+1;else if(3<a)then u[w[475]]=u[w[818]][w[43]];else w=h[k];end end end else if(a<=7)then if(a<=5)then k=k+1;else if not(a~=6)then w=h[k];else u[w[475]]=d[w[818]];end end else if a<=8 then k=(k+1);else if(a==9)then w=h[k];else u[w[475]]=u[w[818]][u[w[43]]];end end end end else if(a<15 or a==15)then if(a<=12)then if not(11~=a)then k=k+1;else w=h[k];end else if(a==13 or a<13)then u[w[475]]=d[w[818]];else if a==14 then k=(k+1);else w=h[k];end end end else if a<=18 then if(a<16 or a==16)then u[w[475]]=u[w[818]][w[43]];else if a>17 then w=h[k];else k=k+1;end end else if(a==19 or a<19)then c=w[475]else if a==20 then u[c]=u[c](r(u,(c+1),w[818]))else break end end end end end a=a+1 end elseif not(x==107)then k=w[818];else local a=0 while true do if a<=11 then if a<=5 then if a<=2 then if a<=0 then u={};else if 1==a then for c=0,q,1 do if c<i then u[c]=p[c+1];else break;end;end;else k=k+1;end end else if a<=3 then w=h[k];else if a>4 then k=k+1;else u[w[475]]=e[w[818]];end end end else if a<=8 then if a<=6 then w=h[k];else if 7<a then k=k+1;else u[w[475]]=u[w[818]][w[43]];end end else if a<=9 then w=h[k];else if a~=11 then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end end end else if a<=17 then if a<=14 then if a<=12 then w=h[k];else if 13==a then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if a<=15 then w=h[k];else if 16<a then k=k+1;else u[w[475]]=u[w[818]][w[43]];end end end else if a<=20 then if a<=18 then w=h[k];else if 20>a then u[w[475]][w[818]]=u[w[43]];else k=k+1;end end else if a<=21 then w=h[k];else if a==22 then do return end;else break end end end end end a=a+1 end end;elseif x<=113 then if x<=110 then if(x==108 or x<108)then local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if 0<a then u={};else c=nil end else if a>2 then k=k+1;else for g=0,q,1 do if g<i then u[g]=p[g+1];else break;end;end;end end else if a<=5 then if a<5 then w=h[k];else u[w[475]]=e[w[818]];end else if 7~=a then k=k+1;else w=h[k];end end end else if a<=11 then if a<=9 then if a==8 then u[w[475]]=d[w[818]];else k=k+1;end else if 10<a then u[w[475]]=u[w[818]][w[43]];else w=h[k];end end else if a<=13 then if 12<a then w=h[k];else k=k+1;end else if a<=14 then c=w[475]else if 15<a then break else u[c](u[c+1])end end end end end a=a+1 end elseif(x>109)then local a=w[475];local c=u[a];for g=(a+1),n do t(c,u[g])end;else local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if a==0 then c=nil else u[w[475]]=u[w[818]];end else if 3>a then k=k+1;else w=h[k];end end else if a<=5 then if a<5 then u[w[475]]=w[818];else k=k+1;end else if 6<a then u[w[475]]=w[818];else w=h[k];end end end else if a<=11 then if a<=9 then if a>8 then w=h[k];else k=k+1;end else if a~=11 then u[w[475]]=w[818];else k=k+1;end end else if a<=13 then if 13>a then w=h[k];else c=w[475]end else if 15~=a then u[c]=u[c](r(u,c+1,w[818]))else break end end end end a=a+1 end end;elseif(x==111 or x<111)then u[w[475]]=b(f[w[818]],nil,e);elseif(113>x)then local a=w[475];n=a+v-1;for c=a,n do local a=o[c-a];u[c]=a;end;else u[w[475]]=u[w[818]];end;elseif 116>=x then if(x<=114)then u[w[475]][w[818]]=w[43];elseif(116>x)then local a,c=0 while true do if a<=10 then if a<=4 then if a<=1 then if 0<a then u={};else c=nil end else if a<=2 then for f=0,q,1 do if f<i then u[f]=p[f+1];else break;end;end;else if 4>a then k=k+1;else w=h[k];end end end else if a<=7 then if a<=5 then u[w[475]]=d[w[818]];else if a<7 then k=k+1;else w=h[k];end end else if a<=8 then u[w[475]]=u[w[818]][w[43]];else if 10>a then k=k+1;else w=h[k];end end end end else if a<=16 then if a<=13 then if a<=11 then u[w[475]]=d[w[818]];else if a<13 then k=k+1;else w=h[k];end end else if a<=14 then u[w[475]]=d[w[818]];else if 16>a then k=k+1;else w=h[k];end end end else if a<=19 then if a<=17 then u[w[475]]=u[w[818]][u[w[43]]];else if 18<a then w=h[k];else k=k+1;end end else if a<=20 then c=w[475]else if a>21 then break else u[c](u[c+1])end end end end end a=a+1 end else u[w[475]]=u[w[818]]-u[w[43]];end;elseif(x<=117)then local a=w[475]local c={}for f=1,#s do local g=s[f]for m=1,#g do local g=g[m]local m,m=g[1],g[2]if(m>a or m==a)then c[m]=u[m]g[1]=c s[f]=nil;end end end elseif x<119 then local a=0 while true do if a<=8 then if a<=3 then if a<=1 then if 1~=a then u={};else for c=0,q,1 do if c<i then u[c]=p[c+1];else break;end;end;end else if 2<a then w=h[k];else k=k+1;end end else if a<=5 then if 4==a then u[w[475]]=d[w[818]];else k=k+1;end else if a<=6 then w=h[k];else if 8~=a then u[w[475]]=u[w[818]]+w[43];else k=k+1;end end end end else if a<=12 then if a<=10 then if 10~=a then w=h[k];else d[w[818]]=u[w[475]];end else if a>11 then w=h[k];else k=k+1;end end else if a<=14 then if a==13 then u[w[475]]=d[w[818]];else k=k+1;end else if a<=15 then w=h[k];else if 17~=a then u[w[475]]();else break end end end end end a=a+1 end else u[w[475]]=e[w[818]];end;elseif x<=131 then if x<=125 then if(122==x or 122>x)then if(x<120 or x==120)then u[w[475]]=false;elseif not(121~=x)then u={};for a=0,q,1 do if a<i then u[a]=p[a+1];else break;end;end;else local a=0 while true do if a<=11 then if a<=5 then if a<=2 then if a<=0 then u={};else if a==1 then for c=0,q,1 do if c<i then u[c]=p[c+1];else break;end;end;else k=k+1;end end else if a<=3 then w=h[k];else if 4==a then u[w[475]]=e[w[818]];else k=k+1;end end end else if a<=8 then if a<=6 then w=h[k];else if 7==a then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if a<=9 then w=h[k];else if a~=11 then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end end end else if a<=17 then if a<=14 then if a<=12 then w=h[k];else if a==13 then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if a<=15 then w=h[k];else if a<17 then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end end else if a<=20 then if a<=18 then w=h[k];else if 20>a then u[w[475]][w[818]]=u[w[43]];else k=k+1;end end else if a<=21 then w=h[k];else if a<23 then do return end;else break end end end end end a=a+1 end end;elseif 123>=x then local a=w[475]u[a]=u[a](r(u,a+1,w[818]))elseif 125>x then if not u[w[475]]then k=(k+1);else k=w[818];end;else u[w[475]]=(u[w[818]]*w[43]);end;elseif x<=128 then if x<=126 then local a=w[475]u[a]=u[a](u[a+1])elseif x~=128 then if(u[w[475]]<=u[w[43]])then k=k+1;else k=w[818];end;else u[w[475]]=u[w[818]][u[w[43]]];end;elseif 129>=x then do return u[w[475]]end elseif 130==x then if(u[w[475]]<=u[w[43]])then k=k+1;else k=w[818];end;else local a;u[w[475]]=u[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];a=w[475]u[a]=u[a](r(u,a+1,w[818]))end;elseif x<=137 then if(134>x or 134==x)then if 132>=x then local a=w[475];n=(a+v)-1;for c=a,n do local a=o[c-a];u[c]=a;end;elseif(x>133)then if(u[w[475]]<u[w[43]])then k=(k+1);else k=w[818];end;else local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if 1>a then c=nil else u[w[475]]=u[w[818]];end else if a>2 then w=h[k];else k=k+1;end end else if a<=5 then if a~=5 then u[w[475]]=w[818];else k=k+1;end else if 6==a then w=h[k];else u[w[475]]=w[818];end end end else if a<=11 then if a<=9 then if 8<a then w=h[k];else k=k+1;end else if 11>a then u[w[475]]=w[818];else k=k+1;end end else if a<=13 then if 12==a then w=h[k];else c=w[475]end else if a~=15 then u[c]=u[c](r(u,c+1,w[818]))else break end end end end a=a+1 end end;elseif(135>x or 135==x)then local a=u[w[43]];if not a then k=k+1;else u[w[475]]=a;k=w[818];end;elseif not(x~=136)then local a,c=0 while true do if a<=10 then if a<=4 then if a<=1 then if 1~=a then c=nil else u={};end else if a<=2 then for f=0,q,1 do if f<i then u[f]=p[f+1];else break;end;end;else if a>3 then w=h[k];else k=k+1;end end end else if a<=7 then if a<=5 then u[w[475]]=d[w[818]];else if 6==a then k=k+1;else w=h[k];end end else if a<=8 then u[w[475]]=u[w[818]][w[43]];else if a==9 then k=k+1;else w=h[k];end end end end else if a<=16 then if a<=13 then if a<=11 then u[w[475]]=d[w[818]];else if 13~=a then k=k+1;else w=h[k];end end else if a<=14 then u[w[475]]=d[w[818]];else if a==15 then k=k+1;else w=h[k];end end end else if a<=19 then if a<=17 then u[w[475]]=u[w[818]][u[w[43]]];else if a<19 then k=k+1;else w=h[k];end end else if a<=20 then c=w[475]else if 22~=a then u[c](u[c+1])else break end end end end end a=a+1 end else u[w[475]]=u[w[818]]%u[w[43]];end;elseif x<=140 then if x<=138 then local a=w[475]u[a](r(u,(a+1),n))elseif x<140 then local a;u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];a=w[475]u[a]=u[a](r(u,a+1,w[818]))else if not u[w[475]]then k=k+1;else k=w[818];end;end;elseif x<=141 then local a;u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];u[w[475]]=w[818];k=k+1;w=h[k];u[w[475]]=d[w[818]];k=k+1;w=h[k];u[w[475]]=u[w[818]][w[43]];k=k+1;w=h[k];a=w[475]u[a]=u[a](r(u,a+1,w[818]))elseif x>142 then u[w[475]]=u[w[818]]*w[43];else u[w[475]]=true;end;elseif 167>=x then if x<=155 then if(149==x or 149>x)then if 146>=x then if(x<=144)then local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if a==0 then c=nil else u[w[475]]=u[w[818]][w[43]];end else if 2==a then k=k+1;else w=h[k];end end else if a<=5 then if 5>a then u[w[475]]=u[w[818]];else k=k+1;end else if a==6 then w=h[k];else u[w[475]]=d[w[818]];end end end else if a<=11 then if a<=9 then if 8<a then w=h[k];else k=k+1;end else if 11>a then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if a<=13 then if 12<a then c=w[475]else w=h[k];end else if 14==a then u[c]=u[c](r(u,c+1,w[818]))else break end end end end a=a+1 end elseif(x>145)then u[w[475]]={};else local a,c=0 while true do if a<=8 then if a<=3 then if a<=1 then if a>0 then u[w[475]]=u[w[818]][w[43]];else c=nil end else if 2==a then k=k+1;else w=h[k];end end else if a<=5 then if 5>a then u[w[475]]=d[w[818]];else k=k+1;end else if a<=6 then w=h[k];else if a<8 then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end end end else if a<=13 then if a<=10 then if a==9 then w=h[k];else u[w[475]]=d[w[818]];end else if a<=11 then k=k+1;else if a>12 then u[w[475]]=u[w[818]][w[43]];else w=h[k];end end end else if a<=15 then if a==14 then k=k+1;else w=h[k];end else if a<=16 then c=w[475]else if a~=18 then u[c]=u[c](r(u,c+1,w[818]))else break end end end end end a=a+1 end end;elseif(x==147 or x<147)then local a,c=0 while true do if a<=8 then if a<=3 then if a<=1 then if 0<a then u[w[475]]=u[w[818]][w[43]];else c=nil end else if 2<a then w=h[k];else k=k+1;end end else if a<=5 then if 4<a then k=k+1;else u[w[475]]=d[w[818]];end else if a<=6 then w=h[k];else if a>7 then k=k+1;else u[w[475]]=u[w[818]][u[w[43]]];end end end end else if a<=13 then if a<=10 then if a<10 then w=h[k];else u[w[475]]=d[w[818]];end else if a<=11 then k=k+1;else if 13~=a then w=h[k];else u[w[475]]=u[w[818]][w[43]];end end end else if a<=15 then if a==14 then k=k+1;else w=h[k];end else if a<=16 then c=w[475]else if a<18 then u[c]=u[c](r(u,c+1,w[818]))else break end end end end end a=a+1 end elseif not(149==x)then local a=0 while true do if a<=9 then if a<=4 then if a<=1 then if a~=1 then u[w[475]]=u[w[818]]/w[43];else k=k+1;end else if a<=2 then w=h[k];else if a>3 then k=k+1;else u[w[475]]=u[w[818]]-u[w[43]];end end end else if a<=6 then if 6~=a then w=h[k];else u[w[475]]=u[w[818]]/w[43];end else if a<=7 then k=k+1;else if a~=9 then w=h[k];else u[w[475]]=u[w[818]]*w[43];end end end end else if a<=14 then if a<=11 then if 11>a then k=k+1;else w=h[k];end else if a<=12 then u[w[475]]=u[w[818]];else if 14>a then k=k+1;else w=h[k];end end end else if a<=16 then if 16>a then u[w[475]]=u[w[818]];else k=k+1;end else if a<=17 then w=h[k];else if a==18 then k=w[818];else break end end end end end a=a+1 end else local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if a==0 then c=nil else u[w[475]]=d[w[818]];end else if a==2 then k=k+1;else w=h[k];end end else if a<=5 then if a==4 then u[w[475]]=w[818];else k=k+1;end else if a<7 then w=h[k];else u[w[475]]=w[818];end end end else if a<=11 then if a<=9 then if a>8 then w=h[k];else k=k+1;end else if a<11 then u[w[475]]=w[818];else k=k+1;end end else if a<=13 then if 13>a then w=h[k];else c=w[475]end else if 14<a then break else u[c]=u[c](r(u,c+1,w[818]))end end end end a=a+1 end end;elseif(x==152 or x<152)then if 150>=x then u[w[475]]=(not u[w[818]]);elseif(152~=x)then local a=0 while true do if a<=8 then if a<=3 then if a<=1 then if 0==a then u={};else for c=0,q,1 do if c<i then u[c]=p[c+1];else break;end;end;end else if 2==a then k=k+1;else w=h[k];end end else if a<=5 then if a==4 then u[w[475]]=d[w[818]];else k=k+1;end else if a<=6 then w=h[k];else if 8>a then u[w[475]]=u[w[818]]+w[43];else k=k+1;end end end end else if a<=12 then if a<=10 then if 10>a then w=h[k];else d[w[818]]=u[w[475]];end else if a>11 then w=h[k];else k=k+1;end end else if a<=14 then if 13<a then k=k+1;else do return end;end else if a<=15 then w=h[k];else if 17>a then do return end;else break end end end end end a=a+1 end else u[w[475]]=u[w[818]][w[43]];end;elseif(153>x or 153==x)then if(w[475]==u[w[43]]or w[475]<u[w[43]])then k=k+1;else k=w[818];end;elseif(x>154)then u={};for a=0,q,1 do if a<i then u[a]=p[(a+1)];else break;end;end;else local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if a~=1 then c=nil else u[w[475]]=u[w[818]];end else if a==2 then k=k+1;else w=h[k];end end else if a<=5 then if a>4 then k=k+1;else u[w[475]]=w[818];end else if a>6 then u[w[475]]=w[818];else w=h[k];end end end else if a<=11 then if a<=9 then if 9~=a then k=k+1;else w=h[k];end else if 10<a then k=k+1;else u[w[475]]=w[818];end end else if a<=13 then if 13>a then w=h[k];else c=w[475]end else if a==14 then u[c]=u[c](r(u,c+1,w[818]))else break end end end end a=a+1 end end;elseif(x<=161)then if(158>=x)then if(x==156 or x<156)then u[w[475]][u[w[818]]]=u[w[43]];elseif(x<158)then local a=w[475]local c,f=j(u[a](r(u,a+1,w[818])))n=(f+a)-1 local f=0;for g=a,n do f=f+1;u[g]=c[f];end;else u[w[475]]=(u[w[818]]/w[43]);end;elseif(x<=159)then local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if 1~=a then c=nil else u[w[475]]=u[w[818]][w[43]];end else if a==2 then k=k+1;else w=h[k];end end else if a<=5 then if 5~=a then u[w[475]]=u[w[818]];else k=k+1;end else if a>6 then u[w[475]]=d[w[818]];else w=h[k];end end end else if a<=11 then if a<=9 then if 9>a then k=k+1;else w=h[k];end else if a==10 then u[w[475]]=u[w[818]][w[43]];else k=k+1;end end else if a<=13 then if 13>a then w=h[k];else c=w[475]end else if 14==a then u[c]=u[c](r(u,c+1,w[818]))else break end end end end a=a+1 end elseif not(160~=x)then u[w[475]]=false;else local a,c,f=0 while true do if a<=9 then if a<=4 then if a<=1 then if a==0 then c=nil else f=nil end else if a<=2 then u[w[475]]=u[w[818]][w[43]];else if a==3 then k=k+1;else w=h[k];end end end else if a<=6 then if 6>a then u[w[475]][w[818]]=u[w[43]];else k=k+1;end else if a<=7 then w=h[k];else if 8==a then u[w[475]]={r({},1,w[818])};else k=k+1;end end end end else if a<=14 then if a<=11 then if a~=11 then w=h[k];else u[w[475]]=w[818];end else if a<=12 then k=k+1;else if a<14 then w=h[k];else u[w[475]]=w[818];end end end else if a<=17 then if a<=15 then k=k+1;else if a<17 then w=h[k];else f=w[475];end end else if a<=18 then c=u[f];else if a~=20 then for g=f+1,w[818]do t(c,u[g])end;else break end end end end end a=a+1 end end;elseif x<=164 then if(162==x or 162>x)then local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if 0==a then c=nil else u[w[475]]=d[w[818]];end else if 3~=a then k=k+1;else w=h[k];end end else if a<=5 then if a==4 then u[w[475]]=w[818];else k=k+1;end else if 6<a then u[w[475]]=w[818];else w=h[k];end end end else if a<=11 then if a<=9 then if 9~=a then k=k+1;else w=h[k];end else if a<11 then u[w[475]]=w[818];else k=k+1;end end else if a<=13 then if 13~=a then w=h[k];else c=w[475]end else if a==14 then u[c]=u[c](r(u,c+1,w[818]))else break end end end end a=a+1 end elseif not(164==x)then local a,c,f,g,m,o=0 while true do if a<=3 then if a<=1 then if a~=1 then c=w[475]else f=w[43]end else if 3>a then g=c+2 else m={u[c](u[c+1],u[g])}end end else if a<=5 then if a==4 then for t=1,f do u[g+t]=m[t];end else o=u[c+3]end else if a>6 then break else if o then u[g]=o;k=w[818];else k=k+1 end;end end end a=a+1 end else local a,c,f,g,m=0 while true do if a<=11 then if a<=5 then if a<=2 then if a<=0 then c=nil else if a==1 then f,g=nil else m=nil end end else if a<=3 then u[w[475]]=e[w[818]];else if a==4 then k=k+1;else w=h[k];end end end else if a<=8 then if a<=6 then u[w[475]]=u[w[818]];else if 8~=a then k=k+1;else w=h[k];end end else if a<=9 then u[w[475]]=w[818];else if 10==a then k=k+1;else w=h[k];end end end end else if a<=17 then if a<=14 then if a<=12 then u[w[475]]=w[818];else if a>13 then w=h[k];else k=k+1;end end else if a<=15 then u[w[475]]=w[818];else if 16==a then k=k+1;else w=h[k];end end end else if a<=20 then if a<=18 then m=w[475]else if 20~=a then f,g=j(u[m](r(u,m+1,w[818])))else n=g+m-1 end end else if a<=21 then c=0;else if 22<a then break else for g=m,n do c=c+1;u[g]=f[c];end;end end end end end a=a+1 end end;elseif(165==x or 165>x)then local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if a>0 then u[w[475]]=d[w[818]];else c=nil end else if 3~=a then k=k+1;else w=h[k];end end else if a<=5 then if a==4 then u[w[475]]=w[818];else k=k+1;end else if a==6 then w=h[k];else u[w[475]]=w[818];end end end else if a<=11 then if a<=9 then if 8<a then w=h[k];else k=k+1;end else if a==10 then u[w[475]]=w[818];else k=k+1;end end else if a<=13 then if 13>a then w=h[k];else c=w[475]end else if a>14 then break else u[c]=u[c](r(u,c+1,w[818]))end end end end a=a+1 end elseif not(167==x)then local a,c=0 while true do if a<=9 then if a<=4 then if a<=1 then if 1~=a then c=nil else u[w[475]]=u[w[818]][w[43]];end else if a<=2 then k=k+1;else if a<4 then w=h[k];else u[w[475]]=w[818];end end end else if a<=6 then if a==5 then k=k+1;else w=h[k];end else if a<=7 then u[w[475]]=d[w[818]];else if 9~=a then k=k+1;else w=h[k];end end end end else if a<=14 then if a<=11 then if 11~=a then u[w[475]]=u[w[818]][w[43]];else k=k+1;end else if a<=12 then w=h[k];else if a==13 then c=w[475];else do return u[c](r(u,c+1,w[818]))end;end end end else if a<=16 then if 15<a then w=h[k];else k=k+1;end else if a<=17 then c=w[475];else if 18==a then do return r(u,c,n)end;else break end end end end end a=a+1 end else local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if a>0 then u={};else c=nil end else if a<3 then for f=0,q,1 do if f<i then u[f]=p[f+1];else break;end;end;else k=k+1;end end else if a<=5 then if 4==a then w=h[k];else u[w[475]]=e[w[818]];end else if 6<a then w=h[k];else k=k+1;end end end else if a<=11 then if a<=9 then if 8==a then u[w[475]]=d[w[818]];else k=k+1;end else if a>10 then u[w[475]]=u[w[818]][w[43]];else w=h[k];end end else if a<=13 then if a~=13 then k=k+1;else w=h[k];end else if a<=14 then c=w[475]else if a==15 then u[c](u[c+1])else break end end end end end a=a+1 end end;elseif x<=179 then if(173>=x)then if(170==x or 170>x)then if(168>x or 168==x)then u[w[475]][u[w[818]]]=u[w[43]];elseif(x<170)then local a,c=0 while true do if(a==10 or a<10)then if(a<=4)then if(a<=1)then if not(a==1)then c=nil else u[w[475]]=u[w[818]][w[43]];end else if(a<=2)then k=(k+1);else if 4>a then w=h[k];else u[w[475]]=w[818];end end end else if(a<=7)then if(a<5 or a==5)then k=(k+1);else if a>6 then u[w[475]]=d[w[818]];else w=h[k];end end else if(a==8 or a<8)then k=k+1;else if not(10==a)then w=h[k];else u[w[475]]=u[w[818]][w[43]];end end end end else if a<=16 then if(a<=13)then if(a<11 or a==11)then k=k+1;else if(12==a)then w=h[k];else c=w[475];end end else if(a==14 or a<14)then do return u[c](r(u,(c+1),w[818]))end;else if(a==15)then k=(k+1);else w=h[k];end end end else if(a==19 or a<19)then if(a==17 or a<17)then c=w[475];else if 18<a then k=k+1;else do return r(u,c,n)end;end end else if(a<20 or a==20)then w=h[k];else if(22>a)then k=w[818];else break end end end end end a=(a+1)end else local a=w[475];do return u[a](r(u,(a+1),w[818]))end;end;elseif(x<171 or x==171)then local a=w[475]local c={}for f=1,#s do local g=s[f]for j=1,#g do local g=g[j]local j,j=g[1],g[2]if(j>=a)then c[j]=u[j]g[1]=c s[f]=nil;end end end elseif(172<x)then u[w[475]]=u[w[818]][u[w[43]]];else if(u[w[475]]==w[43]or u[w[475]]<w[43])then k=k+1;else k=w[818];end;end;elseif x<=176 then if(x==174 or x<174)then if(not(u[w[475]]==u[w[43]]))then k=k+1;else k=w[818];end;elseif 175==x then if(w[475]<u[w[43]]or w[475]==u[w[43]])then k=(k+1);else k=w[818];end;else local a,c=0 while true do if a<=7 then if a<=3 then if a<=1 then if 1>a then c=nil else u[w[475]]=u[w[818]];end else if a<3 then k=k+1;else w=h[k];end end else if a<=5 then if a>4 then k=k+1;else u[w[475]]=w[818];end else if a~=7 then w=h[k];else u[w[475]]=w[818];end end end else if a<=11 then if a<=9 then if a~=9 then k=k+1;else w=h[k];end else if a==10 then u[w[475]]=w[818];else k=k+1;end end else if a<=13 then if 13~=a then w=h[k];else c=w[475]end else if a>14 then break else u[c]=u[c](r(u,c+1,w[818]))end end end end a=a+1 end end;elseif(x==177 or x<177)then if(u[w[475]]~=w[43])then k=w[818];else k=k+1;end;elseif 178<x then local a,c,f=0 while true do if a<=9 then if a<=4 then if a<=1 then if a<1 then c=nil else f=nil end else i
