Yingyang005

Souls tycoon Free

Dec 9th, 2024 (edited)
2,012
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.25 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _UEMjEBnDediO = a; end)); return(function(h,...)local s;local d;local t;local f;local o;local c;local e=24915;local n=0;local l={};while n<441 do n=n+1;while n<0x144 and e%0x43e8<0x21f4 do n=n+1 e=(e*175)%42935 local r=n+e if(e%0x323c)<0x191e then e=(e*0x30b)%0x9f34 while n<0x236 and e%0x39d2<0x1ce9 do n=n+1 e=(e-525)%12759 local r=n+e if(e%0x21be)<0x10df then e=(e-0x1a9)%0x5865 local e=86532 if not l[e]then l[e]=0x1 t=function(l)local e=0x01 local function n(n)e=e+n return l:sub(e-n,e-0x01)end while true do local l=n(0x01)if(l=="\5")then break end local e=f.byte(n(0x01))local e=n(e)if l=="\2"then e=d.WhZkpzEy(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then o[e]=function(e,n)return h(8,nil,h,n,e)end elseif l=="\4"then e=o[e]elseif l=="\0"then e=o[e][n(f.byte(n(0x01)))];end local n=n(0x08)d[n]=e end end end elseif e%2~=0 then e=(e*0x1c5)%0xaf72 local e=83442 if not l[e]then l[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\87\104\90\107\112\122\69\121\0\6\115\116\114\105\110\103\4\99\104\97\114\116\102\112\72\71\65\87\69\0\6\115\116\114\105\110\103\3\115\117\98\101\98\75\88\113\114\115\106\0\6\115\116\114\105\110\103\4\98\121\116\101\97\120\118\107\117\117\119\105\0\5\116\97\98\108\101\6\99\111\110\99\97\116\120\116\101\65\70\80\75\87\0\5\116\97\98\108\101\6\105\110\115\101\114\116\68\82\81\111\95\112\107\79\5";end else e=(e-0x1d3)%0x4916 n=n+1 local e=48277 if not l[e]then l[e]=0x1 end end end elseif e%2~=0 then e=(e+0x36d)%0x45f2 while n<0x80 and e%0x26e6<0x1373 do n=n+1 e=(e*529)%13232 local t=n+e if(e%0x1caa)<=0xe55 then e=(e+0x11e)%0x9ad6 local e=49636 if not l[e]then l[e]=0x1 o=(not o)and _ENV or o;end elseif e%2~=0 then e=(e-0x1e3)%0x3c4e local e=97320 if not l[e]then l[e]=0x1 s=tonumber;end else e=(e-0x2d3)%0x7f7d n=n+1 local e=44051 if not l[e]then l[e]=0x1 o=getfenv and getfenv();end end end else e=(e*0xb1)%0x5a30 n=n+1 while n<0x370 and e%0x7d2<0x3e9 do n=n+1 e=(e-381)%42014 local o=n+e if(e%0x1cba)<=0xe5d then e=(e+0x2d5)%0xc1a3 local e=70260 if not l[e]then l[e]=0x1 f=string;end elseif e%2~=0 then e=(e+0x32b)%0x52b1 local e=88152 if not l[e]then l[e]=0x1 d={};end else e=(e+0x1ba)%0x3e1a n=n+1 local e=92053 if not l[e]then l[e]=0x1 end end end end end e=(e+699)%26780 end t(c);local e={};for n=0x0,0xff do local l=d.tfpHGAWE(n);e[n]=l;e[l]=n;end local function a(n)return e[n];end local f=(function(c,t)local r,l=0x01,0x10 local n={{},{},{}}local o=-0x01 local e=0x01 local f=c while true do n[0x03][d.ebKXqrsj(t,e,(function()e=r+e return e-0x01 end)())]=(function()o=o+0x01 return o end)()if o==(0x0f)then o=""l=0x000 break end end local o=#t while e<o+0x01 do n[0x02][l]=d.ebKXqrsj(t,e,(function()e=r+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 d.DRQo_pkO(n[0x01],(a((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+f)%0x100)));f=c+f;end end return d.xteAFPKW(n[0x01])end);t(f(114,"pOL8*VXY^gP2.);%g8"));t(f(156,"AnUszyc_?H2b7B*3cz7*H39zcc7nU2?_??z77nnB?z7nU*?3**cBBbz_2?H7-nBNU_?H3?y7b3UzHs3Hssbcnz_n_yBB27nUcBBcza?Hu*yUbns_cbBbUBy6b2?b3lyU2Bnc_s_yznHHn&cs77C7_H32s?22UH_?3**?y=nB_y*7zzzyndc7Bnz?2z*UyzbyU2_z*Byn2Hb7U?3szHb7nH_y*?sHbS)nccBzsn_BB2s27*LBcB*Bszyzbbc**nzsb?n__*2sU_H7>n_zb7nBc3is3?y7ss?n*By723n?_BB3z32b3_y*c*BncB*2_c7ynz_*7Bs_77b7Uz3zysbbU>?UBBzc2s*c_B2BU*H3Xsz?BU7DUH37zBbUU>_B?UyybUn?cBBss32&*U__b2nn?3BccBy77UHy3Uy?2Bns_3*bszby*7_*BHnz22H7enBTscHn32czbcU??b**zb7Xmyc3_?B*23Vy_u7BU32z*_zbBnUyH7Bsys7zbzn7*Hznb?nSnnBczu2_ab_U7Bns?3BncbBnSs?_?H"));local e=(-48535+(function()local l,n=0,1;(function(e)e(e(e))end)(function(e)if l>410 then return e end l=l+1 n=(n-93)%49219 if(n%1660)<830 then return e else return e(e(e))end return e(e(e))end)return n;end)())local ee=(getfenv)or(function()return _ENV end);local r=d.sXuHvmDv or d.hFwVIcFy;local m=1;local t=3;local a=4;local o=2;local function g(b,...)local c=f(e,"*(y:ieKuO&^f_p8UOOtyO:ViOe(:Ou;OO&K&8oe(p^uOpieyUUeKUOuOU8Ke&u(U&&(^&fKi((&yEUKuZK&K^::p^eyK^uue(O&&(&uU(y&(k8O:ye^i(_^y(_^&UU^((p&8yF^^U8fy::fy_(K:_:ii_e^8:ff_:&fpveufU_f8: _:iefu:efpi:Oi:^_uiKO&ipfpeiOpy3f:y&_^(f^Oyfpu8uuy8&K^8fpOe__Ue:8:Ke8ie_8ye_uK(8uOU&u^iU8iKKU((U8KK^88KO^iu_8uu^^Ou&U_u^vVuyU(O:UeuefyO^UpO&U8:u8eOOj&O&8UOyz(:UUKei^yyu^iye^KO8F&&KYUyf^_yp^8:8fD:(fy::_&:efK:uf&:&f^:f_8e&f8:U_cii_yi:_ieupUiu_Oi&_fif__ipUieupje(pye&pieKpKeppOep8Pefp_ep8ieU8(K(8KK&8iKe8KK88OK^8^KfUfKp88KUU(u(Uyu:?Ku8UKuuUOu8U^ufU_OUP8uUv(O(4&O:SiOeyKO^POO^P^O_{_OU 8^(y:&((e&:(O&e(K&u(O&^(^&_(_^F(8&Uy7^(yu^:yi^eyK^uy^^&y^_Oy_^py8f0:#fy:yf:ipfe:Kfu:&f&:^ff:_");local n=0;d.klwyOnha(function()d.chigskSV()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,u=h(0,h,e,c,d.axvkuuwi);local function f()local l,n=d.axvkuuwi(c,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local y=true;local y=0 local function z()local e=n();local n=n();local t=1;local o=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local n=((-1)^l(n,32));if(e==0)then if(o==y)then return n*0;else e=1;t=0;end;elseif(e==2047)then return(o==0)and(n*(1/0))or(n*(0/0));end;return d.JXUfLaaU(n,e-1023)*(t+(o/(2^52)));end;local _=n;local function p(n)local l;if(not n)then n=_();if(n==0)then return'';end;end;l=d.ebKXqrsj(c,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+y),#l do e=e..d.ebKXqrsj(l,n,n)end return e;end;local y=#d.FyEbooPv(s('\49.\48'))~=1 local e=n;local function j(...)return{...},d.SSuexKgt('#',...)end local function g()local r={};local e={};local s={};local h={s,r,nil,e};local e=n()local c={}for o=1,e do local l=u();local n;if(l==1)then n=(u()~=#{});elseif(l==2)then local e=z();if y and d.DMjDRmXz(d.FyEbooPv(e),'.(\48+)$')then e=d.iKcAwyGg(e);end n=e;elseif(l==0)then n=p();end;c[o]=n;end;for e=1,n()do r[e-(#{1})]=g();end;for h=1,n()do local e=u();if(l(e,1,1)==0)then local d=l(e,2,3);local r=l(e,4,6);local e={f(),f(),nil,nil};if(d==0)then e[t]=f();e[a]=f();elseif(d==#{1})then e[t]=n();elseif(d==b[2])then e[t]=n()-(2^16)elseif(d==b[3])then e[t]=n()-(2^16)e[a]=f();end;if(l(r,1,1)==1)then e[o]=c[e[o]]end if(l(r,2,2)==1)then e[t]=c[e[t]]end if(l(r,3,3)==1)then e[a]=c[e[a]]end s[h]=e;end end;h[3]=u();return h;end;local function k(l,n,e)local o=n;local o=e;return s(d.DMjDRmXz(d.DMjDRmXz(({d.klwyOnha(l)})[2],n),e))end local function ne(y,e,u)local function ne(...)local f,g,b,k,s,l,c,p,z,_,ee,n;local e=0;while-1<e do if e<3 then if e<=0 then f=h(6,48,1,51,y);g=h(6,39,2,44,y);else if 1~=e then l=-41;c=-1;else b=h(6,17,3,16,y);s=j k=0;end end else if e<=4 then if e>3 then _=d.SSuexKgt('#',...)-1;ee={};else p={};z={...};end else if e>5 then e=-2;else n=h(7);end end end e=e+1;end;for e=0,_ do if(e>=b)then p[e-b]=z[e+1];else n[e]=z[e+1];end;end;local e=_-b+1 local e;local d;local function h(...)while true do end end while true do if l<-40 then l=l+42 end e=f[l];d=e[m];if 11>=d then if 5<d then if 9<=d then if 9<d then if d>10 then n(e[o],e[t]);else local e=e[o]n[e]=n[e](r(n,e+1,c))end else n[e[o]]=u[e[t]];end else if 7<=d then if d~=6 then for l=12,96 do if 7~=d then local l=e[o];local o=n[e[t]];n[l+1]=o;n[l]=o[e[a]];break;end;local l=e[o]local o,e=s(n[l](r(n,l+1,e[t])))c=e+l-1 local e=0;for l=l,c do e=e+1;n[l]=o[e];end;break;end;else local l=e[o]local o,e=s(n[l](r(n,l+1,e[t])))c=e+l-1 local e=0;for l=l,c do e=e+1;n[l]=o[e];end;end else l=e[t];end end else if d>2 then if 3<d then if d>=3 then for l=16,76 do if d<5 then n[e[o]]();break;end;n[e[o]]=(e[t]~=0);break;end;else n[e[o]]();end else if(n[e[o]]==e[a])then l=l+1;else l=e[t];end;end else if 1>d then local e=e[o]n[e]=n[e](r(n,e+1,c))else if d~=1 then n[e[o]]();else u[e[t]]=n[e[o]];end end end end else if 17<d then if 21>d then if d<=18 then n[e[o]]=(e[t]~=0);else if d>18 then for l=30,92 do if 20>d then n[e[o]]=u[e[t]];break;end;local o=e[o];local l=n[e[t]];n[o+1]=l;n[o]=l[e[a]];break;end;else n[e[o]]=u[e[t]];end end else if 22<=d then if d>=19 then for l=17,75 do if 23>d then local d,a,f,r,c;local l=0;while l>-1 do if 3<=l then if l>=5 then if 5<l then l=-2;else n(c,r);end else if l==3 then r=d[f];else c=d[a];end end else if l<=0 then d=e;else if l>=-2 then for e=12,58 do if l~=1 then f=t;break;end;a=o;break;end;else f=t;end end end l=l+1 end break;end;local l=e[o]local o,e=s(n[l](r(n,l+1,e[t])))c=e+l-1 local e=0;for l=l,c do e=e+1;n[l]=o[e];end;break;end;else local l=e[o]local o,e=s(n[l](r(n,l+1,e[t])))c=e+l-1 local e=0;for l=l,c do e=e+1;n[l]=o[e];end;end else for d=0,3 do if 2<=d then if-1~=d then repeat if 2<d then if(n[e[o]]==e[a])then l=l+1;else l=e[t];end;break;end;n[e[o]]=u[e[t]];l=l+1;e=f[l];until true;else if(n[e[o]]==e[a])then l=l+1;else l=e[t];end;end else if-4<=d then for c=48,79 do if 1~=d then n[e[o]]=(e[t]~=0);l=l+1;e=f[l];break;end;u[e[t]]=n[e[o]];l=l+1;e=f[l];break;end;else u[e[t]]=n[e[o]];l=l+1;e=f[l];end end end end end else if d<=14 then if 12<d then if d>=11 then for f=46,78 do if 13~=d then u[e[t]]=n[e[o]];break;end;l=e[t];break;end;else l=e[t];end else if(n[e[o]]==e[a])then l=l+1;else l=e[t];end;end else if 16<=d then if d>15 then for h=42,70 do if d>16 then do return end;break;end;local d,b,_,y,h;n[e[o]]=u[e[t]];l=l+1;e=f[l];d=e[o];b=n[e[t]];n[d+1]=b;n[d]=b[e[a]];l=l+1;e=f[l];n(e[o],e[t]);l=l+1;e=f[l];d=e[o]_,y=s(n[d](r(n,d+1,e[t])))c=y+d-1 h=0;for e=d,c do h=h+1;n[e]=_[h];end;l=l+1;e=f[l];d=e[o]n[d]=n[d](r(n,d+1,c))l=l+1;e=f[l];n[e[o]]();l=l+1;e=f[l];do return end;break;end;else local d,b,_,y,h;n[e[o]]=u[e[t]];l=l+1;e=f[l];d=e[o];b=n[e[t]];n[d+1]=b;n[d]=b[e[a]];l=l+1;e=f[l];n(e[o],e[t]);l=l+1;e=f[l];d=e[o]_,y=s(n[d](r(n,d+1,e[t])))c=y+d-1 h=0;for e=d,c do h=h+1;n[e]=_[h];end;l=l+1;e=f[l];d=e[o]n[d]=n[d](r(n,d+1,c))l=l+1;e=f[l];n[e[o]]();l=l+1;e=f[l];do return end;end else do return end;end end end end l=1+l;end;end;return ne end;local o=0xff;local a={};local f=(1);local t='';(function(n)local l=n local c=0x00 local e=0x00 l={(function(r)if c>0x20 then return r end c=c+1 e=(e+0x4bf-r)%0x43 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x48);t={t..'\58 a',t};a[f]=g();f=f+((not d.IROJeowt)and 1 or 0);t[1]='\58'..t[1];o[2]=0xff;end return true end)'rEtsf'and l[0x3](0x171+r))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x3f);end return true end)'rGUXY'and l[0x1](r+0x103))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf4);end return true end)'nkWte'and l[0x2](r+0x24d))or r end),(function(d)if c>0x1e then return d end c=c+1 e=(e+0xa61-d)%0x38 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x86);end return true end)'uBPER'and l[0x2](0x310+d))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x74);t='\37';o={function()o()end};t=t..'\100\43';end return true end)'qqxHr'and l[0x1](d+0x1bb))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x22);a[f]=ee();f=f+o;end return true end)'fqqiZ'and l[0x3](d+0x2a8))or d end),(function(d)if c>0x26 then return d end c=c+1 e=(e+0xb10-d)%0x25 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x80);end return true end)'vIIrl'and l[0x3](0xb0+d))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe6);end return true end)'YhcsS'and l[0x1](d+0x3c1))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa5);o[2]=(o[2]*(k(function()a()end,r(t))-k(o[1],r(t))))+1;a[f]={};o=o[2];f=f+o;end return true end)'BrqPb'and l[0x2](d+0x74))or d end)}l[0x2](0xe8f)end){};local e=ne(r(a));return e(...);end return g((function()local n={}local e=0x01;local l;if d.IROJeowt then l=d.IROJeowt(g)else l=''end if d.DMjDRmXz(l,d.YzZUwGSA)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(l,e,n,o,t,d)local d;if l<4 then if 1>=l then if l~=0 then do return function(n,e,l)if l then local e=(n/2^(e-1))%2^((l-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(n%(e+e)>=e)and 1 or 0;end;end;end;else do return e(1),e(4,t,o,n,e),e(5,t,o,n)end;end else if-2<=l then for d=18,89 do if l<3 then do return 16777216,65536,256 end;break;end;do return e(1),e(4,t,o,n,e),e(5,t,o,n)end;break;end;else do return e(1),e(4,t,o,n,e),e(5,t,o,n)end;end end else if l>=6 then if l>6 then if 8~=l then do return setmetatable({},{['__\99\97\108\108']=function(e,t,l,o,n)if n then return e[n]elseif o then return e else e[t]=l end end})end else do return n(l,nil,n);end end else do return t[n]end;end else if 3<l then repeat if 5>l then local l=o;local t,o,f=t(2);do return function()local c,n,e,d=e(n,l(l,l),l(l,l)+3);l(4);return(d*t)+(e*o)+(n*f)+c;end;end;break;end;local l=o;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;until true;else local l=o;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment