--[[

... .---:

.%%%- *%%%#*
:===
.%%%- .::. ... ... ... .=%%%:.. ... .. .:. .:..
.:. ... .=%%#.. ..:. ... .:
.%%%- =#%%%%%*%%% -%%# -%%#.*%%%%%%*.%%%. *%%+ .*%%%%%+ -*%%%%%#=
:*%%%%%*%%%-.%%%%%%%: .+#%%%%%*- :%%%:#%%:
.%%%- *%%#-::=#%%% =%%* .#%%: .=%%#....%%%. *%%+ =%%# *%
%*-::=*=.:%%%=::-*%%%- .=%%#.. :%%%=::-#%%+ :%%%#+--
.%%%-.%%%: :%%% *%%= *%%- -%%# .%%%. *%%+ +#%%#*- .%%%.
+%%+ #%%- -%%# *%%= .%%%.:%%%:
:=: .=%%%. #%%+ .*%%% #%%*%%= -%%# .%%%- .#%%+ *%%+ #%%= :-.
=%%#: -%%%- -%%# =%%#. +%%# :%%%
-%%%%%%%%- .*%%%##%%%%% .#%%%+ -%%# +%%%##%#%%+ =%%#*#%%- .*%%%#%%%*.
=%%%##%%%%%- .#%%%#: =#%%%#%%%+. :%%%
:====: .-===:.--- =%%* .--- .-==-.:--: .-===- -===-.
:===- ---. -==- :-===: .---
:%%#.

===.

--]]

-- Jayfuscator V1.2.1 --

return(function(a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z,ba,ba)local
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,cb
,cc,cd,ce,cf,cg,ch,ci,cj,ck,cl,cm,cn,co=97,40,77,49,80,20,98,60,74,33,50,33,98,40,1
8,75,97,48,63,13,69,90,94,60,22,19,40,58,18,18,48,68,69,44,96,27,16,43,75,31,10,11,
54,16,84,44,97,86,43,97,24,90,60 while ba~=63 do if bb<=776 then if bb>=430 then if
bb>=618 then if bb<=700 then if bb>=651 then if bb>654 then bn={}bb=716 else do
bt=tonumber end bb=700 end else bb=651 do bl=(unpack or table.unpack)end end else
if bb<=716 then for cp=0,255 do bn[cp]=cl(cp);end bb=733 else if bb<770 then bb=776
bf=bj('000000000200000002050000007072696E740207000000637261736865640100000000000000
1500000002180000004A46535F505249564154455F584F525F46554E4354494F4E04000000000000F0B
F02040000007479706502050000007461626C650206000000737472696E670204000000627974650204
0000006368617202030000007375620204000000677375620206000000636F6E6361740206000000696
E7365727402040000006D61746802050000006C64657870020700000067657466656E76020C00000073
65746D6574617461626C65020600000073656C656374040000000000002040040000000000000000040
00000000000F03F0200000000030103000000000000000100000002040000005F454E56000000000300
00000000010000001D080000000000000000181000000000000000000F1000000000000000030000000
4000000000000F03F040000000000000000040000000000000040000000002000000000000900E0011A
08000000000D0030051A10000000000B0000000120000000009600B0001388000000000B00100001300
00000002E016001138800000000100030000E0000000000140030000E08000000001300500010500000
00000A01E0021358000000000C0020001E1800000000180040001500000000000000300007300000000
01800500015080000000004003000073000000000080030000910000000007A01D00513100000000003
0010002098000000009E00C00313A000000000000010011B08000000000B00000001B0000000008E013
00113F000000000100030000E00000000000B00400001C800000000DE00700513D0000000000C002000
1E18000000001400400015000000000000003000072800000000080030000910000000005E00600513A
0000000000C000000181000000000000000000F10000002000000000100000004000000000000F03F00
0000000400000000000800000002000000000008001000001000000000000010000B100000000000000
0000F180000024900000000000500C0001A0800000000080020000D00000000000B0010000520000000
003201500113280000000000000000181000000000090000001D18000000000C0050031B00000000000
80020001110000000000B0040000A50000000000E0150051360000000000800F0051670010000000800
0000181000000000090000001D2800000000080060000D10000000000D0000001D28000000000C00700
00D1800000000110000001D2800000000100080000D2000000000150000001D2800000000140090000D
2800000000190000001D20000000001800A0000D30000000001D0000001D20000000001C00B0000D380
0000000210000001D60000000002000D0000D4000000000250000001D70000000002700000022E80000
00003E00A00113F00000000025000000170000000000290000001D78000000002D0000001D800000000
031000000170800000000350000001710000000003900C0021A88000000003C00000012000000000041
0050031A9000000000450010041A9800000000480000000200000000004D0070041A98000000004600F
0FF1F28020000005500B0051AA000000000590000001D18000000005C00400121000000000058002000
1110000000005B0050000A78010000004A01B003139001000000580040012100000000003C0060010BA
000000000460060031328020000005900D0001A98000000005C0040012100000000005C00000002B800
000000610070021A98000000005A00F0FF1F18020000006800F0011BA8000000006C0020011B1800000
0007000C0051B60000000007400F0041B1000000000780040012100000000007C0020061BC800000000
800090031BC80000000074002000140001000000780080021B7000000000700000001CF0000000006C0
020000800000000005400B00106D0000000005A00F0FF03B8010000003C0050010BA0000000004600F0
FF0348010000003C0050011910000000003C000000181000000000000000000F1800000106000000000
001000000170000000000050000001D0800000000090050011A100000000004001000041000000000B6
003006130800000000000000000F08000000','..',function(cp,cq,cq)return
bn[bt(cp,16)]end)else ca={{0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,},
{1,0,3,2,5,4,7,6,9,8,11,10,13,12,15,14,},{2,3,0,1,6,7,4,5,10,11,8,9,14,15,12,13,},
{3,2,1,0,7,6,5,4,11,10,9,8,15,14,13,12,},{4,5,6,7,0,1,e,3,12,13,14,15,8,9,y,11,},
{5,4,7,6,1,0,3,2,13,12,15,14,9,8,11,10,},{6,7,4,l,2,3,0,1,14,15,12,13,10,11,8,9,},
{7,6,5,b,3,2,1,0,15,14,13,12,z,f,9,8,},{8,q,10,11,12,13,14,15,0,1,2,3,4,5,6,7,},
{9,8,c,10,13,12,15,14,1,0,3,2,5,4,7,6,},{10,s,8,9,14,15,12,p,m,3,0,1,6,7,4,5,},
{11,10,9,8,i,14,13,12,3,2,1,0,7,6,5,4,},{12,13,14,15,x,9,10,11,4,5,6,7,0,1,2,3,},
{13,12,15,14,9,8,11,10,5,r,7,6,1,0,3,2,},{14,15,12,13,10,11,8,9,6,7,4,5,2,3,0,1,},
{15,14,13,12,11,10,t,8,7,6,5,4,3,2,1,0,},nil,nil}bb=824 end end end else if bb<=475
then if bb<466 then ch=select bb=475 else bq=type bb=508 end else if bb<=508 then
do cd=(function(b,c,c,c,c)do if'number'==bq(b)then return true else return false
end end end)end bb=539 else if bb>544 then bm=math.floor bb=618 else bd=math.abs
bb=581 end end end end else if bb<=200 then if bb<=82 then if bb<77 then
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,cb,cc,cd
,ce,cf,cg,ch,ci,cj,ck,cl,cm,cn,co=nil bb=82 else do cf=string.byte end bb=131 end
else if bb>=169 then if bb<191 then bk=string.sub bb=200 else bj=string.gsub bb=240
end else bb=169 cl=string.char end end else if bb>=333 then if bb<=333 then bb=348
bh=math.ldexp else if bb>357 then bv=setmetatable bb=430 else bu=(getfenv or
function()return _ENV end)bb=381 end end else if bb<=240 then do cc=string.rep end
bb=285 else if bb>287 then ce=table.insert bb=333 else be=table.concat bb=302 end
end end end end else if bb>=1160 then if bb<=1318 then if bb>=1232 then if bb>=1273
then if bb>1281 then bb=1348 bx={}else cg=function(...)do
return{...},ch('#',...)end end bb=1318 end else bb=1273 bw=function(b,b,b)local
b,c,e,f=48,34,35,13,51,46,41,10,57,31,73,32,33,86 while b~=34 do if c>=130 then if
c>=172 then if c>179 then break else c=188 return e;end else bz=(bz+f);c=172 end
else if c>=76 then if c>82 then c=130 e=bf:sub(bz,(bz+f-1))else do f=cn()end c=106
end else c=76 e,f=nil end end end end end else if bb>1162 then bb=1232
bc=function()local
b,c,e,f,i,l,m,p=75,64,14,35,16,47,80,70,52,96,95,86,23,84,30,82,27,79,84,26 while
b~=40 do if c>=255 then if c>=364 then if c>=402 then if c>407 then b=40;else c=438
do return(p*(2^(m-1023))*(e/ck+f))end end else if not(m~=0)then if not(e==0)then do
m=1 end f=0 else return(p*0)end elseif 2047~=m then else if a==e then do
return(p*(0/0))end else return(p*(1/0))end end c=402 end else if c>=274 then if
c>280 then c=364 f=1 else do e=(bi(0,i,20)*4294967296+l)end c=320 end else do
m=bi(20,i,11)end c=274 end end else if c>=129 then if c<=129 then i=cn()c=164 else
if c<203 then c=206 if((l==0 and i==0))then return 0 end else do p=((-
1)^bi(31,i,1))end c=255 end end else if c<105 then c=108 e,f,i,l,m,p=nil else c=129
l=cn()end end end end end else bo=function()local a,b a,b=cf(bf,bz,(bz+2))do
bz=(bz+2);end do return((b*256)+a);end end bb=1193 end end else if bb<=1417 then if
bb>=1377 then if bb<1411 then bb=1417 do bs={}end else bb=1452 by={}end else
bb=1377 co=function(a,b,b,b)local
b,c,e,f,i,l,m,p=73,68,42,81,40,52,52,52,50,94,47,32,62,74,10,16,28,10,93,34,48,89,8
4,73,39 while b~=40 do if c<=275 then if c<=173 then if c<=99 then if c<93 then
c=99 e,f,i,l,m,p=nil else c=147 e={}end else if c<168 then c=173 p={}else i={}c=198
end end else if c<=223 then if c<221 then l=cn()c=223 else c=256 do for q=(#bx+1),
(#bx+l)do local
l,r,s,t,x=82,33,60,92,80,68,22,90,35,34,74,52,69,79,62,90,58,88,31,66,22,28,66,47,3
7,62 while l~=43 do if r<=247 then if r>=175 then if r>=225 then if r>233 then
t[106]=ci(x,1,11);r=285 else t[61]=ci(s,1,2);r=247 end else if r<195 then do
x=cn()end r=197 else t[37]=br();r=225 end end else if r>=120 then if r>123 then
s=cn()r=175 else r=142 t[131]=br();end else if r<72 then r=78 s,t,x=nil else r=120
t={}end end end else if r>=427 then if r>=507 then if r>511 then l=43;else r=553
bx[q]=t;end else if r>434 then r=507 t[182]=-t[129]else r=472 t[16]=-t[195]end end
else if r<=312 then if r<306 then t[195]=ci(s,3,11);r=312 else do
t[137]=ci(s,12,20);end r=358 end else if r>363 then r=427 t[57]=ci(x,g,33);else
t[129]=ci(s,21,29);r=404 end end end end end end end end else if c>262 then
f={}c=321 else c=275 m=cn()end end end else if c>=443 then if c>=486 then if c<=486
then i[174]=br();c=510 else if c<524 then c=529 return i;else b=40;end end else if
c>446 then c=486 do i[52]=e;end else for b=1,cn()do local
g,l,q,r,s,t=96,33,38,65,33,12,11,23,90,77,92,52,42,55,31,82,44,77,77,12,87,30,76,80
,98 while g~=54 do if l>=363 then if l>=491 then if l>=552 then if l>=574 then if
l<585 then l=592 e[b]=q;else break end else q[182]=-q[129]l=574 end else if l>497
then l=552 q[16]=-q[w]else q[37]=ci(s,12,u);l=523 end end else if l<=388 then if
l>366 then l=420 q[195]=ci(s,3,11);else q[106]=ci(r,1,11);l=388 end else if l<439
then q[57]=ci(r,12,33);l=442 else l=491 do q[129]=ci(s,21,29);end end end end else
if l<=123 then if l<=63 then if l<54 then l=63 q,r,s,t=nil else
q={{},nil,nil,nil}l=82 end else if l>89 then l=163 q[42]={};else q[131]=br();l=123
end end else if l<=210 then if l>166 then s=cn()l=249 else if not(br()~=1)then for
b=1,br()do q[42][b]={br()==0,cn()}end end l=210 end else if l<=249 then r=cn()l=283
else if l<320 then l=324 t=ci(s,1,2)else l=363 q[61]=t end end end end end end end
c=459 end end else if c>=374 then if c>381 then do i[27]=p;end c=443 else for
b=1,cn()do p[b-1]=co();end c=423 end else if c>325 then c=374 i[49]=f else for
b=1,m do local e,g,i,l=45,42,16,92,51,43,11,23,39,27,44,56,22,78,31 while e~=25 do
if g>=158 then if g>=207 then if g<218 then g=227 f[b]=i;else e=25;end else g=207
if(not(l~=3))then i=(0~=br());elseif(4==l)then do i=bc();end elseif(2==l)then
i=bw();elseif(j==l)then i=a[bw()];end;end else if g<=42 then i,l=nil g=76 else if
g<107 then l=br()g=113 else i=nil g=158 end end end end end c=345 end end end end
end end end else if bb>=1491 then if bb>1498 then ba=63;else bb=1506 return
bp(co(bu()),{},bu())();end else bb=1491 bp=function(a,b,b,c,c,c)local
c,e,f,g,i do g=a[27]end i=a[174]c=a[49]do f=bs end e=a[52]return
function(...)local a,f,j,l,m,p,q,r,s m=1 r=-1 q=-1 s={}do f={...}end
p=(ch('#',...)-1)l={}j={}for q=0,p do if(not(q<i))then s[(q-i)]=f[(q+1)];else
j[q]=f[(q+1)];end;end;a=(p-i+1)while k do local a,f,i,k,p,q,s,t,u,w q=e[m]a=q[d]do
k=q[131]end i=q[195]f=q[137]s=q[129]u=q[37]do p=q[16]end w=q[57]t=q[182]if
not(a<17)then if not(q[106]>25)then if not(a>20)then if not(a<19)then if
not(q[106]~=19)then m=w;else local d d=i do j[d]=j[d](bl(j,d+1,w));end end else
if(a>17)then j[i]={};else local d d=i j[d]=j[d](j[d+1]);end end else if
not(a>22)then do if(a>21)then j[i]=nil;else do j[i]=(j[w]-j[s]);end end end else do
if not(a>23)then j[i]=bp(g[w],nil,b);else if not(a~=24)then do return j[i]end else
j[i][c[w]]=c[s];end end end end end else if not(a>29)then if not(q[106]<28)then if
28==a then local d,e,f,g f=i do g,d=cg(j[f](bl(j,(f+1),w)))end r=(d+f-1)e=0 for
d=f,r do do e=(e+1);end do j[d]=g[e];end end;else j[i]=b[c[w]];end else
if(a<27)then j[q[195]]=c[q[57]]else j[i]=j[w];end end else if not(a<32)then if
not(a<33)then do if not(a~=33)then j[i]=j[q[57]][j[s]];else do if not j[i]then
m=w;end;end end end elseif((j[q[195]]<j[s]))then m=w;end else if(q[106]<31)then do
j[i]=(j[w]+j[s]);end else local b,d,e e=i do d=j[e]end b=j[(e+2)]if((b>0))then
if((d>j[e+1]))then m=w;else j[(e+3)]=d;end elseif((d<j[e+o]))then m=w;else do
j[(e+3)]=d;end end end end end end else if not(a<8)then if not(a<12)then if
not(a<14)then do if not(a<15)then if(a>15)then if(j[s]~=j[i])then m=w;end;else
local b b={}if(#l>0)then do for d=1,#l do local e e=l[d]do for d=0,#e do local
f,g,k k=e[d]do f=k[1]end g=k[2]while f==j and g>=0 do b[g]=f[g]k[1]=b break end end
end end end end return j[(i+1)],0;end else j[q[195]]=(j[w]%c[s]);end end else
if(a>12)then j[i]=j[q[57]][c[q[129]]];else c=bs[i](c)end end else do if
not(a>9)then if(q[106]>8)then j[i]=(j[w]*c[s]);else local b b=i do j[b]=j[b]
(bl(j,b+1,r));end end else if not(q[106]~=10)then if(c[s]~=j[i])then m=w;end;else
j[i][j[w]]=j[s];end end end end else do if not(a>3)then if not(q[106]>1)then
if(a<1)then j[q[195]]=(j[w]+c[s]);else while(c[q[195]]<j[s])do m=w;break end end
else if 2==a then j[i]=#j[w];else local b,d,e do e=i end d=j[(e+h)]b=(j[e]
+d)j[e]=b;if((d>0))then if(not(b>j[e+1]))then m=w;j[(e+3)]=b;end
elseif(not(b<j[e+1]))then m=w;do j[(e+3)]=b;end end end end else if not(a<6)then do
if 6==q[106]then local b,d do d=w end b=j[d]do for e=(d+1),s do b=(b..j[e]);end;end
j[i]=b;else j[q[195]]=(j[w]/c[s]);end end else if not(a~=4)then local a a=i j[a]
(j[(a+1)])else do if j[i]then do m=w;end end;end end end end end end end
m=(m+1);end;end;end end end end else if bb<=941 then if bb>=877 then if bb>=897
then if bb<937 then cb=2 bb=941 else bb=984 for a=1,31 do bg[a]=cb cb=(cb*2)end end
else bb=897 bg={[0]=1}end else if bb<856 then cm=''bb=858 else bb=877 ck=(2^n)end
end else if bb<=1026 then if bb>=1003 then if bb>1005 then
ci=function(a,b,c,d,d,d,d)local d d=((a/2^(b-1))%2^((c-1)-(b-1)+1))return(d-d
%1);end bb=1064 else bb=1026 cj=(bit_lib and bit_lib.bxor or function(a,b)a=a
%(2^32)b=b%(2^32)local c,d=0,1 while a>0 and b>0 do local e,f=a%16,b%16 c=c+ca[e+1]
[f+1]*d a=(a-e)/16 b=(b-f)/16 d=d*16 end c=c+a*d+b*d return c end)end else
bi=function(a,b,c,d)local d,e,f=89,33,93,59,20,62,55,79,41,75,95,39,69,82,83 while
d~=42 do if e>=143 then if e>=185 then if e>187 then break else e=209 return f end
else e=185 f=(f-f%1)end else if e>=53 then if e>56 then e=143 f=((b/bg[a])
%bg[c])else e=100 f=v end else f=nil e=53 end end end end bb=1003 end else if
bb>=1111 then if bb<1122 then bb=1127 cn=function()local a,b,c,d do
b,d,a,c=cf(bf,bz,(bz+3))end do bz=(bz+4);end return((c*16777216)+(a*65536)+
(d*256)+b);end else do br=function()local a do a=cf(bf,bz,bz)end bz=(bz+1);return
a;end end bb=1160 end else bz=1 bb=1111 end end end end end end end)
(0,4,11,106,2,10,12,2,15,0,true,5,2,52,1,13,9,4,11,9,20,nil,195,8,10,11)