bro.

-- this file was generated using ironbrew1
return(function(a,a,b,b,b,b,c,d,e,f,g,h,i,j,k,l,m,m,m,n,n,n,n,n,n,o,o,o,o,o,o,o,o)local p,q,r,s,t,u,v,w,x,y,z,ba,bb,bc,bd,be,bf,bg,bh,bi,bj,bk,bl,bm,bn,bo,bp,bq,br,bs,bt,bu,bv,bw,bx,by,bz,ca local cb={}local cc={}cc[1]=3 cc[2]=3 cc[3]=0 local cd=0 local ce=0 local cf=-48575 repeat if cf=-16235 then if cf=64540 then if co=(cv)then if cv(cv)then cg[ck[4671]]=cm[ck[2663]];else local cw=ck[4671]local cw=cg[cw]cr=cr+1 cq[cr]=cw end else cg[ck[4671]]=cg[ck[2663]];end else if cv=((5)*1)then if cv=(cv)then cg[ck[4671]]=cg[ck[2663]][cg[ck[6766]]];else cx=ck[2663];end end end else if cv=16 then if cv=26 then if cv=35 then if not((cv)=(cv)then if cv=45 then if cv=(0+(49))then if cv=0 then while cw=db do cq[cw]=nil cw=cw+cz end end end cr=da local cw=ct[cu]ct[cu]=nil cu=cu-1 cs=cw or 0 end else cg[ck[4671]]=(cg[ck[6766]])*(cg[ck[2663]]);end else if(53)=63 then if cv~=64 then local cj=ck[4671]local cs=ck[2663]local cs=cs local ct=cr local cs=ct-cs+1 local cu=cq[cs]local cu=bw(cp,cu(t(cq,cs+1,ct)))cy=cj+cu-1 for cw=(cu),(1),-1 do cg[cj+cw-1]=cp[cw]end for cj=ct,cs,-1 do cq[cj]=nil end cr=cs-1 else cg[ck[4671]]=cg[ck[2663]]=(38))then cg[ck[4671]]=cg[ck[2663]]==cg[ck[6766]];else local cj=ck[4671]local cp=cq[cr]cq[cr]=nil cr=cr-1 local cs=cq[cr]cq[cr]=nil cr=cr-((1)-0)local cp,cs=cs(cp)do local cp,cs=cp,cs cg[cj]=cp cg[cj+1]=cs end end else if not((cv)=(36))then local cj=ck[4671]local cj=cq[cr]cq[cr]=nil cr=cr-1 cj()else local cj,cp,cs=ck[4671],ck[2663],ck[6766]local cp=cn[cp]local cj=cg[cj]for ct=1,#cp do if not((cj)~=(nil))then break end cj=cj[cm[cp[ct]]]end cg[cs]=cj end end else if(40)=(cv)then if cv~=40 then local cj=ck[4671]local cp=cq[cr]cq[cr]=nil cr=cr-1 local cs=cq[cr]cq[cr]=nil cr=cr-1 do local cp,cs,ct=cs(cp)cg[cj]=cp cg[cj+1]=cs cg[(2)+(cj)]=ct end else cg[ck[4671]]=cg[ck[2663]]cg[ck[6766]];end else if cv=0 then while cj=ct do cq[cj]=nil cj=cj+cs end end end cr=cp-1 else local cj=ck[2663]do local cp=(1)local cs=(1)local ct=(#cj)if cs=0 then while cp=ct do local cj=cj[cp]local cj=cm[cj]cr=cr+1 cq[cr]=cj cp=cp+cs end end end end end end end else if cv=30 then if cv=32 then local cj=#ck[4671]for cp=1,cj do cg[ck[4671][cp]]=cm[ck[2663][cp]];end;else if cv~=31 then local cj=ck[4671]cg[cj]=cg[cj](cg[cj+1],cg[cj+2]);else local cj=ck[4671]local cj=cq[cr]cq[cr]=nil cr=cr-1 local cp=cq[cr]cq[cr]=nil cr=cr-1 cp(cj)end end else if cv~=34 then local cj,cp=ck[4671],ck[2663]local cs=cj+2 local cj,ct=cg[cj](cg[cj+1],cg[cs])if cj~=nil then do local cj,cp,ct,cu=cj,cj,ct,cp cg[cs]=cj cg[cs+1]=cp cg[cs+2]=ct cx=cu end end else local cj,cp=ck[4671],ck[2663]local cs,ct,cu=cg[cj],cg[cj+1],cg[cj+2]cg[cj]=g(function()for g,cw,cz,da,db,dc,dd,de,df,dg in cs,ct,cu do f(g,cw,cz,da,db,dc,dd,de,df,dg);end;end);cg[cj+1]=nil;cg[cj+2]=nil;cy=(2)+(cj);cx=cp;end end else if not((cv)(27))then if cv(18))then if(18)=0 then g[1]={cg[f]}g[2]=1 co[f]=nil end end end local a=cq[cr]cq[cr]=nil cr=cr-1 do return a end else if(17)(cv)then cg[ck[4671]]=by(cl[ck[2663]],nil,ci)else cg[ck[4671]]={};end end else if(20)(cv)then local a=cl[ck[2663]]local f=a[7742]local g=#f local cj=ba(g)for cl=1,g do local f=f[cl]local g=f[2]local cp=f[3]if f[1]==((1)*1)then if cp==((0)+0)then local f=cg[g]co[g]=f cj[cl-1]=f else cj[cl-1]=cg[g]end else local f=ch[g]if cp==0 and f[((0)*1)]then f=f[0][f[1]]end cj[cl-(0+(1))]=f end end cg[ck[4671]]=by(a,cj,ci)else local a,f=ck[4671],ck[2663]local f=cn[f]local g={}for ci=1,#f do g[ci]=cm[f[ci]]end cg[a]=g end end else if cv=24 then if cv=9 then if cv==9 then cg[ck[4671]][cg[ck[2663]]]=cg[ck[6766]];else local a=ck[4671]for f=1,#a do local a=cg[a[f]]cr=cr+1 cq[cr]=a end end else if cv==(0+(7))then local a=ck[4671]local f=ck[2663]local a=cg[a]cx=((not a)and(f)or cx)else local a,f=cg[ck[2663]],ck[4671]cg[f]=a[cg[ck[6766]]];cg[f+1]=a;end end else if cv=((13)-0)then local a=ck[4671]local a=ck[2663]local a=a local f=cr local a=f-a+1 local g=cq[a]g(t(cq,a+1,f))do local f=(f)local g=(-1)local ch=(a)if g=0 then while f=ch do cq[f]=nil f=f+g end end end cr=a-1 else if cv~=((12)*1)then local a=ck[2663]local a=cm[a]cr=(1)+(cr)cq[cr]=a else do return end end end else if not((cv)~=(14))then local a=ck[4671]cg[a]={cg[a]}else cg[ck[4671]][1]=cg[ck[2663]]end end end end end cx=cx+1;end;end;end ce,cf=-10494,-10494 end else if cf=21299 then if cf~=22741 then bu=nil ce,cf=45839,45839 else bt=function(a)local f,g local l={}local by={}local function bz(ca,cg)by[cg]=ca;return by[cg]end local ca={}ca[1]=2 ca[2]=4 ca[3]=3 local ca=0 local ca=-10828 local cg=0 repeat if ca=45186 then if ca~=70933 then if g==0 then return f;elseif(g=2147483648)then g=g-4294967296;end;return g*4294967296+f;else ca=l[43]end else if ca==-23046 then break else f=br(a)g=br(a)l[43]=by[-10828+163366]or bz(45186,-10828+163366)ca=70933 end end until ca==-23046 end cc[2]=(cc[2]+1)%5 ce,cf=21299,21299 end else t=function(a,f,g)local l=g-f+1 if l7997 then return s(a,f,g)else return m(a,f,g)end end ce,cf=-41521,-41521 end else if cf=24990 then if ca~=69909 then break else return f;end else if ca=47208 then if cf=33558 then if ck~=64710 then cl,ck=cg[45],cg[45]else bz=m+by m=bz ca=bn(a)c(l,{br,bz,ca})cg[45]=ch[64710+318206]or ci(-10174,64710+318206)cl,ck=33558,33558 end else break end end until ck==-10174 end f[7742]=l bc(f,84,bp(a))local g=bp(a)local l={}local m,br,by,bz=0,0,0,0 do do local ca=(1)local cg=(1)local g=(g)if cg=0 then while ca=0 then if ct=60105 then if cy=cm then repeat local cv={}local cw={}local function cx(cy,cz)cw[cz]=cy;return cw[cz]end local cy={}cy[1]=3 cy[2]=2 cy[3]=1 local cz=54753 local da=0 local db=0 repeat if cz=cm)end end end do bc(ch,4671,cn)ch[2663]=co;end ch[6766]=cp;elseif cl==2 then local cm=bs(a)local cn cn={}local co={}local cp,cq=0,0 do local cr=(1)local cs=(1)local cm=(cm)if cs=0 then while cr=cm do local cm={}local ct={}local function cu(cv,cw)ct[cw]=cv;return ct[cw]end local cv={}cv[1]=3 cv[2]=2 cv[3]=1 local cw=0 local cw=-30564 local cx=0 repeat if cw=40396 then if cw~=47865 then cx,cw=cm[52],cm[52]else cw=cm[53]end else break end end until cw==-16997 end end end do bc(ch,4671,cn)bc(ch,2663,co)end elseif(3)==(cl)then local cm,cn,co local cp={}local cq={}local function cr(cs,ct)cq[ct]=cs;return cq[ct]end local cs={}cs[1]=4 cs[2]=3 cs[3]=2 local cs=0 local ct=-11086 local cu=0 repeat if ct=-29444 then if ct=-12578 then if ct==-12578 then co=0 for cu=1,cm do do co=co+bq(a);bc(cn,cu,co)end end;do ch[4671]=cn;end cp[57]=cq[-12578+60468]or cr(-49606,-12578+60468)ct=-29444 else cp[54]={}cp[55]=cq[-11086+191539]or cr(-34272,-11086+191539)cs,ct=-29074,-29074 end else if ct=31422 then if da=42597 then if da==42597 then cy,da=cu[68],cu[68]else ch[4671]=cm ch[2663]=cn ch[6766]=co cu[71]=cv[42638+316528]or cw(81729,42638+316528)cy,da=-27180,-27180 end else if da==31422 then cu[61]={}cu[65]=cv[31422+316528]or cw(53469,31422+316528)cz,da=81396,81396 else da=cu[67]end end else if da=81396 then if da=-17262 then if da=20875 then if da=-44107 then if dc==-44107 then dc=cl[58]else do cq=cq+bq(a);cr=cr+bq(a);end cs=cs+bq(a)dd=db[1]~=1 and-12300 or-20549 cl[58]=cy[-41857+68486]or cz(-20549,-41857+68486)dc=-44107 end else dc=cl[60]end else if dc=45836 then if dc~=50513 then dd,dc=cl[59],cl[59]else break end else if dc=42490 then if cn=44187 then if cn=g do local g g={}g[1642]=bp(a);local ch=bn(a)==1 local ci=(1)==(bn(a))local cj=bn(a)==1 local ck ck=bn(a)if ck==1 then local cl=bs(a)local cm cm={}local cn={}local co={}local cp,cq,cr=0,0,0 do local cs=(0)local ct=(1)local cl=(cl-1)if ct=0 then if cs=-29154 then if cz=-15900 then if cz==-15900 then break else cz=cu[78]end else do cp=cp+bq(a);cq=cq+bq(a);end cr=cr+bq(a)bc(cm,cs,cp)cx[3]=(cx[3]+1)%5 cu[78]=cv[-29154+170375]or cw(-35170,-29154+170375)cz=-11369 end else if cz~=-31362 then cn[cs]=cq co[cs]=cr cs=cs+ct cu[79]=cv[-35170+170375]or cw(-15900,-35170+170375)cy,cz=-31362,-31362 else cy,cz=cu[79],cu[79]end end until cz==-15900 until not(cs=cl then repeat local cu={}local cv={}local function cw(cx,cy)cv[cy]=cx;return cv[cy]end local cx={}cx[1]=2 cx[2]=0 cx[3]=1 local cy=0 local cy=0 local cz=61782 repeat if cz=-24373 then if cz=61782 then if cz=cl)end end end do bc(g,4671,cm)g[2663]=cn;end g[6766]=co;elseif ck==2 then local cl=bs(a)local cm cm={}local cn={}local co,cp=0,0 do local cq=(1)local cr=(1)local cl=(cl)if cr=0 then while cq=cl do local cl={}local cs={}local function ct(cu,cv)cs[cv]=cu;return cs[cv]end local cu={}cu[1]=1 cu[2]=1 cu[3]=2 local cu=0 local cv=0 local cw=-16376 repeat if cw=44555 then if cw=-19991 then if ct=69447 then if ct=-14535 then if cy=38233 then if cy=23127 then if cy=-13918 then if de=43288 then if de==43288 then de=db[93]else break end else if de==-13918 then bc(cn,da,cr)co[da]=cs db[93]=dc[-13918+10822]or dd(66316,-13918+10822)de=43288 else df,de=db[91],db[91]end end else if de=-28320 then if cy=73577 then if cp=-24845 then if ci=0 then while m=-24008 then if ck=29587 then if cj=g do local g g=bn(a)if g==0 then local by local bz={}local ca={}local function cg(ch,ci)ca[ci]=ch;return ca[ci]end local ch={}ch[1]=1 ch[2]=4 ch[3]=2 local ch=0 local ch=-27466 local ci=0 repeat if ch=-17246 then if ch=84702 then if ch~=85982 then break else ci,ch=bz[122],bz[122]end else ch=bz[121]end else if ch~=-27466 then if by==0 then local cj,ck local cl={}local cm={}local function cn(co,cp)cm[cp]=co;return cm[cp]end local co={}co[1]=0 co[2]=4 co[3]=2 local co=0 local co=-41808 local cp=0 repeat if co=-12973 then if co=-11395 then if cn==-11395 then g=bn(a)~=0 ca=g and 1 or 0 cg=bq(a)ch=m+cg cl[3]=(cl[3]+1)%5 ci[123]=cj[-11395+306373]or ck(-24684,-11395+306373)cm,cn=55286,55286 else cm,cn=ci[123],ci[123]end else break end end until cn==-13757 end bc(f,6444,l)br[128]=bt[-16785+54153]or bu(60710,-16785+54153)by,bz=62060,62060 end end else if bz=82069 then if cf=85110 then if cf==85110 then bg=bf([==[\-i9:W?;0@JF,O@oT/qms8PI)6i?uaLC=dc&0_)Rs8W*1+ohR=+[^ql'f&b0rsoi"7*%Sla:EF76\GkfaSuhOruX!aa?tXi(&C/E+#6gZ:koMq3`O2IU&P'ZLAF7ZlHl47*U;#OTgEOnd%N:2;C`t&amEQA^k+V,=Y6\Pp`10!I6+V/_:[email protected])CC]'#p&;mTu%d1pI%OGct)=#+m$550ga?tXk)(O^@6N/&VFI:E.R!f$aQpZQ;`F3jUDl?S.;/dhTEIVs-jC[r:!o!80F&V,=`t5NQ7&pLmTrIDlQFj:=sF=t#XLt2(_eDeU_ur@ZY?q,8&^T-;MRRr;]=sM9"&hO==?O,K$Z?_5iG9;/SS#WfbSJ7;QI4B+Sl&OcU]eH4l.eY\E`98;m_kH;[,r?(S/L;du%38usNI^;-TkmLG0jkNb4qktEV),W3J&n+k_6:FV$o77aQ23b@u1l6s#3)hb)\hG)B+u#EM25rQl-qYmX'VYj7RN\5)@'#.nYZK;p_5N,hPr5Y.C.6Yj(l8hj"TjA]&O6WJ$_A"U[dAXNUNTDO,"1_=?!X+Alr0mlZs)IW(6nq^nUf=Qg;'J/ha/="Q_eMS/8coZg(m/fSCVQ,V@F"_,SKb+*7,4,ZA^_.@o6N:a+DQ]Ze9](FE($PAifk([B;.Fo1Qbk?C.k6kU(kYJ,oj*h&.rVo16ukfG$L;aEl(`hPsS75`#)6E*qgD_#Q*;d$.r:dc&KZW.I8l]`.e$r3/6'QrTNf_hLP7`SX-abWKA+rsm?f(rQSTe/i'-J1fWGXKo08@pb]CEKfe/3:&nSBh;1:aj`(=V@^M7bUBV"ELJU+Tq?t1gn/d-ib\8@_osh8#N$,RS]g)WsSpK6:!1k@8odlPnBrW!h'Z0!J20mF:r7(L_lc;Kc'0lfRSn"(gII\MtQ-"2FZsFc',M`O(Z$$rjop)!a]54AD7c1o*D66#7L"J1phceZD``!2\fiF?qtdk@0sad=4JJ,Qi6+ZgZd%m'li9/S(rcn5/h3#RLP8":0j7&4+nZKnC9Y&qV5O63IS##6Y;6#_Wa5KE*/:arUfi_,!T7!C8,a+Z#Qd]`ASu\3%%hB+DNEj3'JZ=s*Q3$nP1aooX2B9R:NaUUE+TXnr&;8!9P/YgK,9f)[+]sI-G0&kShUA`1']tA\i;VYo.1E^rq_(`PhI&sc:Bf#q7K@!(5LcdOD*d^:t@!k`/N[WW9/p7KU(adQW2U0lnQae%7r:eL$7@Z8uL=J=P"Anq8+"E'7VGgLP22`3=Bj%cneF1H81neAoV-Z,*h/_0d9ODrH`$S@d%r"ji/Y8?#lpZIcQl*Rh`/,r-[63T_U0M0=P4[oMP(LhF;.t4ZJk&kAlJnmACeOm$Re+KL-dGI&SMNRKRWH;ObIrjfH:_.@%662*!.OM/-:AF6m)a@![&Wmrg6*9"@*M`OEh0UJ:JaFKEqV^KLCWX":t\Y#RJPr4co_5KHS?)&JEd\$'Z^[643FS?#YW3p@CaAZ;e"MR3#?:ZRf4R17/HtMSL;?J`?d;jqaVbZ:QgpBY#FoQg/s$kP!l.'m2Q_@9:V5)t[\iK0;"]0Qcp)P=r/tgc0BsR]_c2;k#kTs:R[MhcsKseMQ"=%(#a/:tND(@Yleb61OZEEl[,)hIPJ6h.9R5IZ`RIj"@JUjl7_k?s0#bb$7_87p@e:Wj=(]hqY_dfqP6#lXX#OqNVH_PW.u:4Ep,hT`ML%Cc[JMMO4-*ZN73n:tJ\UY2Bi]bM3DIVJTMGIS6fGCTdZAaf.YdOB?L5)Dpieat'p6YD:N$Drn-LE9QMQa84r+"np5O[@lBeZflpn`c:ZR4Ukk&S0'i]I\po=Vm5%5AOAoI4YG^lWL'`[N.dd"%rJ]A]tCQT+cfmjcR(+`9*@BfUe1UTKa@UKaTnq$ppb]D"kXNV_B`-tolC#nmi0,ol$n(orFf@AeAEg"Aoih!8=Gk%J"+ZsYQ!/DN&/b#HI@[,B$mrQ)N?Yr]`;'aVA3ufaYd$tqY-dGU@Z5(HuikXkp:[)tfFHH$iD'qlL%!/)U/AsOf+MRRDDD,=EUU;kauNLAhO@VKJKWLCB2?Z7uB,qUB(/Ih0!l3K@2itS\aY+@dhCpfe])HD=^Ro^js3kA*^9^Opi\'GVhn(tDIqU"6iMl!HVR5[5=?sk!nFmlWS-X%Asn%RrL-ifn%+%UZaS6mPRro[h)i2`fLe-i$)I7Pb5+i?SLXq@4rIVNQDjQ;./[="e993jm#@7/6B82)*?sp[cV""K:*/VASc4DY9i:d\jW/?=N'B`-Y\&?gfB@#s`I*CW5B]KMk^nj,Q(g'TW\?a1,-u9`I_Q+k'*M^+9XZe_O4g`'t"hKF"4o:^FiJ#W#us!1G)S,QNE]&53@+LdaQr!!LF'nNI0V&M91VaV8bCkRVn+D%25PM:\]dBA#ro)&(^%f3P?462YqodmrjgAG[q_Ri!(Ol+uO.Z=?LHkUXB=K:a'T\^+4%Xtg989(qtmSSqWS67Id^&C7!8(:ZQHjSliLPC*9fci3:u+92&2pYtp3IJ)80?N/XVhupTK)4IHq-LiZ!1Cld((-oCXnXIe]E)g[CX[W^\IUT?bGmEQ_gQ4m47lHn)W#kEJ4?9_:k#2634MPYppd"TA+k801hm&H=+G;\FTuBiIPgK`'AUpE[nTTn2.:NC1^TQ&*6IWP+d`]s#W(;cV\ftAmtLs$_6-"OB/,!??*:#S!8E!.J]LO"aLpA`a?7lQ`d/#:d6J7o^G#J_F#+bS1Yn777_!6qD];M2#@t9/Q349@P%%pAPLYN&LIkT5Bt^NN'hM[INBRi]o29[mtY]%UNq\;BKV_Df\5X"mCQ^e,C:uObU%B'I8T+B$"1U_Abo9;Lg]8K%eq=!;o!/L'%94LZ"AH!-Wa?3%^e"836n7nGiO-]o!F8.?Heb^dc[9,Xitkn?^NIh4^JspI3A+4!Mn1co?DM]+T$Q0mG:UC@G.#a\Z[XpF!t!3@+YM'EOCOZaO7;kcf`3B[#&.1^:=&t7k5m_6qM6:*-C'EN-\)JN1Y/4+t/,,*5a&^V)VgeFo6VA0,jKj.et*^O+sI0bg`s%_JC!*\0i?:spq!@j^`p_'L)G"W1aKYDXd2/`g\,*"[Te6F.F9Gg2UEWeMnI,$W#_\+Imi"ud',?Y^R0V]Dod/GF:k'/JlkH**6U8&:`UnFIc+d+]BMV5*uBjF]TV:kmSIKd2ns"F*6R]aB1nTdG,HM&+K7L@&UQ,U_S?Jr&HMEsZA9Z9"jIF?'TZ()crKa1.R6?$'N%ho5nO/@_?^mRa?7-uN#5E7^:V3$O+,Gu_ljAqRO@B,[H#;*LlBW4OW+1dnb,mJs5p-o4WoY_GQM])m/b,L7("U..I"=ODU(mQc]0?eal4HUcU+t%uT51+c$-O(TA/&DPuaFGN[#Uk?s9P+V]L5(SO/K!tthCrGLUehHb=BJC6uQ\];%\Ni[-)kT0bn!.ga+g6:)bp)lGF0X]MP8&QSY1r?C]?l/t'PnHM;,2!@nM0,,pFotfGj:\_Q=9LZsUF.9S1']gqT*P"E75G;N'L&t8A%Nu$hF$g28*?M=ZnL&^a1Ihk#ptU",+o=MM::&7Zq;f)f'S;GRXbH)&Rd:6Rl_OMR5gj=?;/YOC,lDbDeZ,fKKti4\MMcTU%,i$9g9"$oc5KiMIi']Td-NM"B_@bVE35d64B/c9ElD5NlGA&oCp2G10=-5UY[rCU"1#R2bZ&'3KCcf4hI!H!YHWKG$'Tr1p[*n_am!p4rL3ou4V,^([2JHAUe^'C"5.=K\'e#\K%[3WUYgEckpO#ph-[b#q&li3QiShi?`,V0N,me^uAZSEY\`(tT#?7;-5_:B%I:L)HN9@F_`LC^B/@r31YK?Vo-V:HS(?of5#LYbF1s(YG@K1/&$&#qTA^PO[p+eq(s'TYc#&8rPrp[%I*"ug%#rpU@tILeG%E7d)U.kl?cVgY^"mAOCZ:UUDf#sP(c`NPJPW56[lapKKLsM@YSN\dY2:6M)S2==[umm5jj&HDsZJjW?e=7Q?e'MBnaEg9/G"e-Kmmm*uf)C1-_Am'lBOn-%'@?Uslm+DKfS0aVl-9RN;OfZ43/`"0&B@3W?Da;Ii&CTFT!tEno\Z)e\"]J`"B,/Aar*4`kP6(-r(hfcK)1LU$O@Je2T07D;osRcPLJ/cA;jH^:m%C@@*_cY0htnD*L6WNM$!eb%Re\3!)YS)*!+J67$$BJ]okG\#b%(Q#jUPK'&:?JJhu1[=RU8.f[0pm&"F__pT)ae!,T?CqLX?3/l[F[GHXfbi#(GKmOmslcdDF!"aCNs2VlJd`1\fOMGdm_$Uj%^.P8CD5[AS.G1V)2Z-Rt!l$3pe0eP.DPY7m7:V+RSk@S!&+-#.r%_rMq(7LlZT/\QEi*j-tk7?=*4S!H!DpMI_R(UK%,pU&n?AG@_d!#5S4e5-S(7uH%C[ODiOW7BQL05XgP0.il/;,!N1jl_T.B_:WEFRB[0GHH7$p.+2cd;?a)Q9%mK[,+/c:lcK*;A&.L9+#gdW6TVDg;$HSh,OCmrYJWb!1W.QB:OgmhdJ;FC2G7C,+%_[1;6.KIr*X+VZ\)J'Jq%WNg+%n?]Z_;(deY0&W*kQLu3GD^t!Yo.aL#YS)Upma'=Kl]%NJg0Oabe.=_3:W[^DssGn.%n1M;Ia)7h#:F##tT!;O!B#je\:$bh@14*1&d$/?i6#t'c_Y0pVeB#gMh\t2dJMFsPF-&0kEbiOY+1KUR]juj_HH,!@l@#Y^Vc-JB-&&;Eg,r[cm["3\F`M0lk1"30AWk/q)=5SLm&EjgA2_"s3*jg(-O"!XaMO2m,l-;6r^7aF.lN9;!nQa)g(r^b)6SqRg.44l.e\X-X9t,/P-l*Q/S9WTR5(s@HuEbcNCp]^n%AnT70%=\L(bKWi!\W:Z?'lHI05HB;/WcYnQmgOW"U./kD&.24?6B1(G^,"WOAko4cs*JX1^+[rSWF0p[99Aa3to,I26d4!9cLu@kdA6f;XW="A!'QRFlq:N08JAhIpN2)/YEjSNGE#)Yi(7h-XSOp0/Dm(%,%90Ggq3(F]JE]o$ZD+,Ii((4#91-1`*V=rABU;'c[.%-="E6MS^\MLrXnEO^),&gloa2*e.7aaR`-YK^O(Pqkbj&l-SFo'3Z]PaDK*t,!=#^VXOh('eSfISrdh;nr_Z=*tX=fZ#5C6mUGQsYH5jNjk?I(87?1'kOQ\tCXA,a/dY?.ptXV0"\h[JTq8-K&pq0369Zi?7-FniVCFD.IO&T^jC;8us$%3JD^9;Ht)1:!31 then break;end;end;if ch==0 then return 1;end;local ci=1 for cj=1,ch do ci=ci*2+bk();end;return ci;end;local function ch(ci)local cj=0 while bk()==0 do cj=cj+1;end;if ci==0 then return cj;end;local ck=ca(ci)return cj*(2^ci)+ck;end;local function ci(cj)local ck={}local function cl(cm,cn,co)local cp=ck for cq=cn-1,0,-1 do local cm=y(x(cm,cq),1)if not cp[cm]then cp[cm]={};end;cp=cp[cm];end;cp[bm]=co;end;local cm=cg()-1 if cmcn then cn=cj;end;local cg=co[cj]if cg==nil then cg={};co[cj]=cg;end;cg[#cg+1]=cm;cp=cm;cq=cj;end;local cg=0 local cj=0 for cm=1,cn do local cn=co[cm]if cn~=nil then n(cn);if cmcj then cg=w(cg,cm-cj);cj=cm;end;for n=1,#cn do cl(cg,cm,cn[n]);cg=cg+1;end;end;end;return ck;end;local function n(cg)local cg=cg while true do local cj=bk()cg=cg[cj];if not cg then return;end;local bm=cg[bm]if bm~=nil then return bm;end;end;end;local bm=ci(false)local cg=ci(false)local cj=ci(false)local ck=ci(true)local ci=ci(true)local cl=ca(2)local cm,cn,co,cp if cl==0 then cm=c or 0;cn=f or 0;co=g or 0;cp=l or 0;elseif cl==1 then local cl={[-1]=0,[0]=1,[1]=2,[2]=3}local cl={[0]=-1,[1]=0,[2]=1,[3]=2}local cq=cl[ca(2)]local cr=cl[ca(2)]local cs=cl[ca(2)]local cl=cl[ca(2)]cm=(c or 0)+cq;cn=(f or 0)+cr;co=(g or 0)+cs;cp=(l or 0)+cl;c,f,g,l=cm,cn,co,cp;else cm=ca(4);cn=ca(4);co=ca(4);cp=ca(4);c,f,g,l=cm,cn,co,cp;end;local c={}local f=0 local g=false local l=false while true do local bm=l and cj or(g and cg or bm)local bm=n(bm)if bm==nil then break;end;if bm==bz then break;end;if bm==br then local br=g and ci or ck local br=n(br)if br==nil then break;end;local bz=bk()local bz=ch(bz==0 and co or cp)+1 local cg=m[br]f=f+1;c[f]=h(cg,bz);g=(br==0);l=true;elseif bm==bt then local bk=bk()local bk=ch(bk==0 and cm or cn)+1 local br=m[0]f=f+1;c[f]=h(br,bk);g=true;l=true;elseif bm==bu then local bk=2+ca(5)local br=m[0]f=f+1;c[f]=h(br,bk);g=true;l=true;elseif bm==by then local bk=g and ci or ck local n=n(bk)if n==nil then break;end;local bk=2+ca(3)local br=m[n]f=f+1;c[f]=h(br,bk);g=(n==0);l=true;else f=f+1;c[f]=m[bm];g=(bm==0);l=false;end;end;return i(c);end;local function c(f)local g={}local h=256 local l={}for n=1,h do l[n]={};for h=0,255 do l[n][h+1]=h;end;end;local h=0 local n=#f for bk=1,n do local n=h+1 local l=l[n]local f=e(f,bk)+1 local n=l[f]g[bk]=m[n];if f1 then p(l,1,f-1,2);l[1]=n;end;h=n;end;return i(g);end;local function f(g,h)local l=#g if l==0 then return"";end;h=h+1;local n=ba(l)local p={}local bk=ba(256)for bm=1,l do local bm=e(g,bm)p[bm]=(p[bm]or 0)+1;end;local bm=1 for br=0,255 do local p=p[br]or 0 bk[br]=bm;bm=bm+p;end;for p=1,l do local bm=e(g,p)local br=bk[bm]n[br]=p;bk[bm]=br+1;end;local p=ba(l)local h=h for bk=1,l do h=n[h];p[bk]=m[e(g,h)];end;return i(p);end;local a=be(a)local g={}local h=0 local l=1 local m=#a while l+7m then break;end;local a=b(a,l,l+p-1)l=l+p;local a=bg(a)local a=c(a)local a=f(a,n)h=h+1;g[h]=a;end;return i(g);end cf=85110 else if cf=c+f)then return"";end;if h=2 and(n=c+f)then return"";end;if h=3 and(p=c+f)then return"";end;if h=4 and(bf=c+f)then return"";end;if h=5 and(bg=c+f)then return"";end;local a=((((a-c)*f+(n-c))*f+(p-c))*f+(bf-c))*f+(bg-c)local c=y(x(a,24),255)local f=y(x(a,16),255)local n=y(x(a,8),255)local a=y(a,255)local a=d(c,f,n,a)if h=-44233 then if cf=-41922 then if cf=-41850 then if cf0 or b0 do local g,h local l={}local m={}local function p(bb,bc)m[bc]=bb;return m[bc]end local bb={}bb[1]=2 bb[2]=3 bb[3]=4 local bb=0 local bc=0 local bd=-43071 repeat if bd=-37863 then if bm=23237 then if bm127 and-1 or 1 br=bg[3]==0 and 37481 or 23237 bd[37]=be[-24929+223927]or bf(23237,-24929+223927)bm=-37863 end end until bm==-48729 end ce,cf=-10769,-10769 else cb[133]={}cd=cc[1]~=1 and 20324 or-41922 cc[3]=(cc[3]+1)%5 cf=-41922 end else if cf=53116 then if l==53116 then l=f[19]else break end else if l=38755 then if l=-37544 then if cf=27721 then if l127 and a-128 or a)*c c=c*128 bh=bh+1 until(a=57423 then if l=63135 then if l~=78603 then m,l=f[131],f[131]else break end else if l==57423 then f[129]=a[0]or 0 f[131]=g[57423+50178]or h(40465,57423+50178)m,l=63135,63135 else a[0]=b return b;end end else if lb then for k=b+1,c do a[k]=nil;end;end;f[132]=g[40465+181249]or h(61765,40465+181249)m,l=-38593,-38593 end end end until l==78603 end cf=-35603 end end else if cf=-35603 then if cf=63488 then if m=84357 then if m~=87895 then return i(c)else f[22]={}k[2]=(k[2]+1)%5 f[23]=g[87895+343172]or h(23647,87895+343172)l,m=-25751,-25751 end else l,m=f[24],f[24]end else if m=-20957 then if m=-30069 then if m~=66078 then return c;else break end else if m0 and b0 do local n,p local u={}local v={}local function w(x,bb)v[bb]=x;return v[bb]end local x={}x[1]=1 x[2]=1 x[3]=2 local bb=0 local bb=71825 local bc=0 repeat if bbc)then return end local d=c-b+1 do local e,f local g={}local h={}local function i(j,k)h[k]=j;return h[k]end local j={}j[1]=2 j[2]=2 j[3]=2 local k=0 local l=0 local m=-24473 repeat if m=-24473 then if m=51995 then if m=6 then e=85198 f=1 end if f==0 and d=5 then e=59253 f=1 end if f==0 and d=4 then e=26445 f=1 end if f==0 and d=3 then e=19530 f=1 end k=j[2]~=1 and 55109 or-47188 g[6]=h[51995+40566]or i(-47188,51995+40566)k,m=-45866,-45866 else if e==52004 then return a[b],a[b+1],a[b+2],a[b+3],a[b+4],a[b+5],a[b+6],s(a,b+7,c)end if e==85198 then return a[b],a[b+1],a[b+2],a[b+3],a[b+4],a[b+5],s(a,b+6,c)end g[8]=h[55109+171637]or i(-43731,55109+171637)k,m=61176,61176 end else if m=8 then e=62698 f=1 end if f==0 and d=7 then e=52004 f=1 end k=j[2]==0 and-47188 or 51995 g[5]=h[-24473+302708]or i(51995,-24473+302708)k,m=-41267,-41267 else if m=2 then e=79148 f=1 end if f==0 then e=40930 f=1 end if e==62698 then return a[b],a[b+1],a[b+2],a[b+3],a[b+4],a[b+5],a[b+6],a[b+7],s(a,b+8,c)end g[7]=h[-47188+40566]or i(55109,-47188+40566)l,m=-39402,-39402 else if m~=-43731 then k,m=g[6],g[6]else if e==59253 then return a[b],a[b+1],a[b+2],a[b+3],a[b+4],s(a,b+5,c)end if e==26445 then return a[b],a[b+1],a[b+2],a[b+3],s(a,b+4,c)end if e==19530 then return a[b],a[b+1],a[b+2],s(a,b+3,c)end if e==79148 then return a[b],a[b+1],s(a,b+2,c)end g[9]=h[-43731+40566]or i(78524,-43731+40566)k,m=-15081,-15081 end end else if m=-39402 then if m==-39402 then l,m=g[7],g[7]else m=g[10]end else k,m=g[5],g[5]end end end until m==-13372 end end cd=cc[1]~=1 and-41521 or 20324 ce,cf=20324,20324 else break end end end end end end until cf==-22699 end)(error,next,string.match,tonumber,string.gsub,string.sub,table.insert,string.char,string.byte,coroutine.yield,coroutine.wrap,string.rep,table.concat,math.floor,select,(getfenv or function()return _ENV;end),setmetatable,next,(table.unpack or unpack),(table.pack or function(...)return{...};end),math.min,(function(b)if b=1 then return false end;if b=3 then return true end;if b%2==0 or b%3==0 then return false end;local c=5;while c*c=b do if b%c==0 or b%(c+2)==0 then return false end;c=c+6 end;return true end),string.len,table.remove,table.sort,(string.unpack),string.gmatch,string.find,string.reverse,tostring,math.abs,rawget,string.format);