Psx

([[This file was protected with MoonSec V3 by Federal#9999]]):gsub('.+', (function(a) _oeiWtuOKpwFJ = a; end)); return(function(o,...)local t;local d;local f;local c;local a;local b;local e=24915;local n=0;local l={};while n<272 do n=n+1;while n<0x164 and e%0x2ea0<0x1750 do n=n+1 e=(e*881)%12121 local r=n+e if(e%0x2b94)>0x15ca then e=(e+0xab)%0x294f while n<0x22e and e%0x3326<0x1993 do n=n+1 e=(e+244)%32228 local c=n+e if(e%0x253e)<0x129f then e=(e-0x29e)%0x5435 local e=95715 if not l[e]then l[e]=0x1 f={};end elseif e%2~=0 then e=(e-0x3d2)%0x76c9 local e=26411 if not l[e]then l[e]=0x1 end else e=(e+0x242)%0xb4ac n=n+1 local e=22566 if not l[e]then l[e]=0x1 d=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=t.byte(n(0x01))local e=n(e)if l=="\2"then e=f.XMeODT_Z(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then a[e]=function(n,e)return o(8,nil,o,e,n)end elseif l=="\4"then e=a[e]elseif l=="\0"then e=a[e][n(t.byte(n(0x01)))];end local n=n(0x08)f[n]=e end end end end end elseif e%2~=0 then e=(e*0x3a)%0x1a0d while n<0x3cf and e%0x31fe<0x18ff do n=n+1 e=(e*60)%23127 local d=n+e if(e%0x38d2)<=0x1c69 then e=(e+0x2d5)%0x6e33 local e=79670 if not l[e]then l[e]=0x1 a=(not a)and _ENV or a;end elseif e%2~=0 then e=(e*0x385)%0x55a0 local e=92973 if not l[e]then l[e]=0x1 b=tonumber;end else e=(e+0x211)%0x299f n=n+1 local e=72115 if not l[e]then l[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\88\77\101\79\68\84\95\90\0\6\115\116\114\105\110\103\4\99\104\97\114\87\77\117\111\101\111\108\70\0\6\115\116\114\105\110\103\3\115\117\98\82\109\79\122\121\76\73\85\0\6\115\116\114\105\110\103\4\98\121\116\101\81\104\87\100\107\105\67\66\0\5\116\97\98\108\101\6\99\111\110\99\97\116\116\74\119\67\75\82\79\110\0\5\116\97\98\108\101\6\105\110\115\101\114\116\117\97\80\88\71\76\98\112\5";end end end else e=(e*0x101)%0x489f n=n+1 while n<0x98 and e%0x49b6<0x24db do n=n+1 e=(e-322)%26770 local d=n+e if(e%0x486e)>0x2437 then e=(e+0x39b)%0x7f64 local e=78344 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e-0x3bd)%0x5ad6 local e=18653 if not l[e]then l[e]=0x1 a=getfenv and getfenv();end else e=(e-0x1d3)%0x6d64 n=n+1 local e=42832 if not l[e]then l[e]=0x1 t=string;end end end end end e=(e+662)%27684 end d(c);local e={};for n=0x0,0xff do local l=f.WMuoeolF(n);e[n]=l;e[l]=n;end local function r(n)return e[n];end local t=(function(c,d)local t,l=0x01,0x10 local n={{},{},{}}local a=-0x01 local e=0x01 local o=c while true do n[0x03][f.RmOzyLIU(d,e,(function()e=t+e return e-0x01 end)())]=(function()a=a+0x01 return a end)()if a==(0x0f)then a=""l=0x000 break end end local a=#d while e<a+0x01 do n[0x02][l]=f.RmOzyLIU(d,e,(function()e=t+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 f.uaPXGLbp(n[0x01],(r((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+o)%0x100)));o=c+o;end end return f.tJwCKROn(n[0x01])end);d(t(100,"DA9}VnS5je6+-u,46A"));d(t(40,":Mqd^#;x+X9aVJymJ+a;maJ^99xX#;qxXVJ^aJ+J;+MdnVJqaVx9^V#;qqX^;Jafxa#Md^iVy#99XJ;m^vMXiMa*dXM##+dq!MJyaV+ydaMqmdJwam9zx9yFay dJVaq+M#yqm9#y#aMXV;d^zqdJ+9#9y#+daMmyax*^V+J#X^^Mu+#V^X^;J#+q+JVaV+^;^;xq9y;Jm#^d^xddJq^m#V#9VxM#VqMm9JV9J;qd9q9MVyyay+OxSy^amy;VJ9d+V#md9JdVV9^xaxXqamxy9VddVM^#mqMOMy^XXX+;mdxM;yMa_X9N9yMmMy9a+9mXMdMdJyXmq#^dLx^^xqdmVJq9Mxy^md9h+Vx9xXx^#^d*9+7#J9^;X^qq^m#;ya#+;;lqXQdyd9;X.#dqxM9ymVqxaM^yyd#r;y39X+d;dqmm#V9aa++;Jq;dqX^;Jap+9#Xd;M^a9VqX9xM^MmdmVaqdVM;#aq#B^J#9aX^xMq^MMJMayXy#Jd^a+X^J#9M+V#+VJ%;y^amXxxqdqM9sqVyaqx;#ql+XJ"));local e=(-14985+(function()local a,l=0,1;(function(e,n)e(e(n,e),n(n,e and n))end)(function(n,e)if a>396 then return e end a=a+1 l=(l+614)%26298 if(l%1206)>603 then return e(n(n,e and e),e(e,n and n))else return e end return e end,function(e,n)if a>414 then return e end a=a+1 l=(l-638)%24993 if(l%442)<221 then return n else return n(n(e,e),e(n,e and e))end return n(e(n,n and e),n(e,n))end)return l;end)())local u=f._MJcXeFz or f.VhSOjgbC;local ne=(getfenv)or(function()return _ENV end);local a=2;local d=3;local ee=1;local c=4;local function _(z,...)local r=t(e,")f1zaBo,WMbNc(eAMbEWWcf4Mof(Mc17ba,cffbW1WocNeBzcaaWccbzaWNMae(aa((oBzMFa,(NoeeM,aAc,ANea1cofe(,1abW1cGaMc1fbAe7bbzfNWzB,aaAN(BzWaBW(eBAeWB((A,aeMocbcW,A(WcmaatAfM,fNMeK,M(fAojfb,NecN1a(,W11cBaWc(Be(fo6MNzBNMz(cf}eMWfaMWfcA?M,1Vo(fcbWAAbNc1aMcWac(*bWz((aBaM,eb,AA3,aAWNAoWeMoNA,,M/1,ANc,zy,MbfBbp1WbNeboeA1ab(zBx(aBWzzcBaoN;BN(ABA,b,BW5RaWW,a}aWW7WWA(bBz(,MZfMb,fNbNz1bWAobAzAcf;,N(BXc(f,ezBB(oo.eNoAeA,NNNafcaaA(BB1(BBee.ofeMocAz,1Ab,M2fWa:NWNyNbMzb(zBAeBoccfBz(B,fNBB,(WosccWW(fW(AaWffeWc1o,BfobBfoN1fNNMfcbfaBMfo1Nya1e%aee(Ba(eB,(fo,A,WNezooPNM(Ao,1+,MA>NMA1NNlzcW.zNbfzNW(zB(zfA,1Ae,WAcW<,TA,o(AaW,GcWe!MM1xA1eN,zaNWzc<WNWzcNcf,NMacBee,oaeWoczc(NoNMcaWAMobWe1MMafWMco(fzM,fbWzfMMNfNMzzWNbzBNezNcN1acMaWccBf(ezBec,iA1voW(icMKfaecWffWMW(M1eN(zaNWzcfANz1(NB1,cWa(bN1N(aBAN1zb,oA(,c7pWaBcAfWWjWabMe1Wba1WbcWB1,M(1ebe1BNBzfB1eaBW(coO1,((BAeaozeBaAez,oAf,cvao1AMWMDB1oNb1cNuzaPAM(1MNWzfNbz,,azecNB1WazNcAo1((oWA<81(z!WWcfpAcWcfGMkf,o1(NBA1oMMzzoe1NNfa9NWaMNbBf(zaM(baA(Ao1ecofee,WNooAAAWfc,oofBM,fcW(febz1cba1BNo1cNMzBWzaWcfBa(,Bf(MoWbo1bbNo(eB,fAbzAVa,(fnMzO(MBfzbBf(bN1Aoez7N(1(B1(WBW(coOaNcMBM(BAoWWAcW4ja(NoA 1,(mWM4cD,_f,W(faMMfcobee,1cbae(wBa(WNN1,oaeWocA^,afB,c_+WahWWef?MafWM(1Qba1WNez1NazWNcaccaaWcco1efBW(co>A1oWec,?fbW#AcW=_aWercMffaMNfcbazcbW1cNdzbNWz(claWe;ac(qBa(ABcefoaeWWBAi,aAW,(_-WasWMe1aMafWMc1aba1Wbca1cAzWNcaF(aaWccBZeoo,(coKea,?ec,jAaWb?BWO=aWWfzMlfaMW1ebz1abW1ccozaNWzcA}aAcWac(YoB(Wo,e!,o%zocA4,a+e,cpsWazWbffRMafWbM1ONM1WNezBNazWNcBocaaWccWy(WBW(coxAzoWAe,m%oMBAcWJXaMe>cMyfacWzMb&1abWzfNhzbNWaecaaacWaceoBa(WBcf-,BeWocAt,BAW,es+MofaWcfOMa1fMc1Lbazbc7zrNBzW(4a0caaWeco,(aBM(cofea,1ecW1A,,WAAW0f,WW#cM7fabAfcbf1abN1cNUzaNWBoc2aacWac(vBo(WBceMoaeWocAf,aAM,c7nWAkWWcfUMBfWMc1!");local n=0;f.mZuohiyP(function()f.QxwgnaXj()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,h=o(0,o,e,r,f.QhWdkiCB);local function t()local l,n=f.QhWdkiCB(r,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local s=true;local s=0 local function k()local a=n();local e=n();local d=1;local a=(l(e,1,20)*(2^32))+a;local n=l(e,21,31);local e=((-1)^l(e,32));if(n==0)then if(a==s)then return e*0;else n=1;d=0;end;elseif(n==2047)then return(a==0)and(e*(1/0))or(e*(0/0));end;return f.LTDLwbFg(e,n-1023)*(d+(a/(2^52)));end;local y=n;local function p(n)local l;if(not n)then n=y();if(n==0)then return'';end;end;l=f.RmOzyLIU(r,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+s),#l do e=e..f.RmOzyLIU(l,n,n)end return e;end;local s=#f.zpW_wMsb(b('\49.\48'))~=1 local e=n;local function g(...)return{...},f.yTiQfnUT('#',...)end local function m()local e={};local o={};local u={};local b={u,o,nil,e};local e=n()local r={}for a=1,e do local l=h();local e;if(l==3)then e=(h()~=#{});elseif(l==1)then local n=k();if s and f.sPEvHS_S(f.zpW_wMsb(n),'.(\48+)$')then n=f.ZjznzfjH(n);end e=n;elseif(l==2)then e=p();end;r[a]=e;end;b[3]=h();for e=1,n()do o[e-(#{1})]=m();end;for b=1,n()do local e=h();if(l(e,1,1)==0)then local o=l(e,2,3);local f=l(e,4,6);local e={t(),t(),nil,nil};if(o==0)then e[d]=t();e[c]=t();elseif(o==#{1})then e[d]=n();elseif(o==z[2])then e[d]=n()-(2^16)elseif(o==z[3])then e[d]=n()-(2^16)e[c]=t();end;if(l(f,1,1)==1)then e[a]=r[e[a]]end if(l(f,2,2)==1)then e[d]=r[e[d]]end if(l(f,3,3)==1)then e[c]=r[e[c]]end u[b]=e;end end;return b;end;local function p(l,e,n)local a=e;local a=n;return b(f.sPEvHS_S(f.sPEvHS_S(({f.mZuohiyP(l)})[2],e),n))end local function j(y,e,r)local function _(...)local t,_,z,j,b,n,h,m,k,s,p,l;local e=0;while-1<e do if e>2 then if e>4 then if e>2 then for n=10,98 do if 5~=e then e=-2;break;end;l=o(7);break;end;else e=-2;end else if e>-1 then repeat if e~=4 then m={};k={...};break;end;s=f.yTiQfnUT('#',...)-1;p={};until true;else s=f.yTiQfnUT('#',...)-1;p={};end end else if e>=1 then if 1==e then z=o(6,64,3,45,y);b=g j=0;else n=-41;h=-1;end else t=o(6,40,1,47,y);_=o(6,70,2,21,y);end end e=e+1;end;for e=0,s do if(e>=z)then m[e-z]=k[e+1];else l[e]=k[e+1];end;end;local e=s-z+1 local e;local o;local function f(...)while true do end end while true do if n<-40 then n=n+42 end e=t[n];o=e[ee];if o<=13 then if o>6 then if 9<o then if o>11 then if 11~=o then repeat if o>12 then do return end;break;end;l[e[a]]();until true;else l[e[a]]();end else if 6~=o then for t=42,95 do if o~=11 then if(l[e[a]]==e[c])then n=n+1;else n=e[d];end;break;end;local o,t,r,c,f;local n=0;while n>-1 do if n<=2 then if 1<=n then if 0~=n then for e=36,54 do if 2>n then t=a;break;end;r=d;break;end;else t=a;end else o=e;end else if n<=4 then if n>=0 then repeat if 3~=n then f=o[t];break;end;c=o[r];until true;else f=o[t];end else if 3<n then repeat if 6~=n then l(f,c);break;end;n=-2;until true;else l(f,c);end end end n=n+1 end break;end;else local f,o,r,c,t;local n=0;while n>-1 do if n<=2 then if 1<=n then if 0~=n then for e=36,54 do if 2>n then o=a;break;end;r=d;break;end;else o=a;end else f=e;end else if n<=4 then if n>=0 then repeat if 3~=n then t=f[o];break;end;c=f[r];until true;else t=f[o];end else if 3<n then repeat if 6~=n then l(t,c);break;end;n=-2;until true;else l(t,c);end end end n=n+1 end end end else if o>=8 then if o>6 then repeat if o~=8 then local a=e[a];local n=l[e[d]];l[a+1]=n;l[a]=n[e[c]];break;end;l[e[a]]=r[e[d]];until true;else local a=e[a];local n=l[e[d]];l[a+1]=n;l[a]=n[e[c]];end else l[e[a]]=(e[d]~=0);end end else if o<=2 then if o>0 then if o>=-3 then repeat if o<2 then n=e[d];break;end;for o=0,3 do if o>1 then if 3~=o then l[e[a]]=r[e[d]];n=n+1;e=t[n];else if(l[e[a]]==e[c])then n=n+1;else n=e[d];end;end else if o~=-1 then repeat if o~=0 then r[e[d]]=l[e[a]];n=n+1;e=t[n];break;end;l[e[a]]=(e[d]~=0);n=n+1;e=t[n];until true;else r[e[d]]=l[e[a]];n=n+1;e=t[n];end end end until true;else n=e[d];end else local e=e[a]l[e]=l[e](u(l,e+1,h))end else if o>=5 then if o==5 then l[e[a]]=r[e[d]];else l[e[a]][e[d]]=e[c];end else if o>2 then repeat if 3<o then for o=0,6 do if 3<=o then if 5<=o then if o>5 then l[e[a]]=r[e[d]];else l[e[a]]=r[e[d]];n=n+1;e=t[n];end else if o~=4 then l[e[a]]=r[e[d]];n=n+1;e=t[n];else l[e[a]][e[d]]=e[c];n=n+1;e=t[n];end end else if o>=1 then if-1<o then repeat if o<2 then l[e[a]]=r[e[d]];n=n+1;e=t[n];break;end;l[e[a]][e[d]]=e[c];n=n+1;e=t[n];until true;else l[e[a]][e[d]]=e[c];n=n+1;e=t[n];end else l[e[a]][e[d]]=e[c];n=n+1;e=t[n];end end end break;end;local o,r,c,f;l(e[a],e[d]);n=n+1;e=t[n];o=e[a]r,c=b(l[o](u(l,o+1,e[d])))h=c+o-1 f=0;for e=o,h do f=f+1;l[e]=r[f];end;n=n+1;e=t[n];o=e[a]l[o]=l[o](u(l,o+1,h))n=n+1;e=t[n];l[e[a]]();n=n+1;e=t[n];do return end;until true;else local o,c,r,f;l(e[a],e[d]);n=n+1;e=t[n];o=e[a]c,r=b(l[o](u(l,o+1,e[d])))h=r+o-1 f=0;for e=o,h do f=f+1;l[e]=c[f];end;n=n+1;e=t[n];o=e[a]l[o]=l[o](u(l,o+1,h))n=n+1;e=t[n];l[e[a]]();n=n+1;e=t[n];do return end;end end end end else if 20<o then if 24>o then if o<22 then r[e[d]]=l[e[a]];else if o>18 then for n=25,86 do if 23~=o then local n=e[a]local a,e=b(l[n](u(l,n+1,e[d])))h=e+n-1 local e=0;for n=n,h do e=e+1;l[n]=a[e];end;break;end;local a=e[a];local n=l[e[d]];l[a+1]=n;l[a]=n[e[c]];break;end;else local a=e[a];local n=l[e[d]];l[a+1]=n;l[a]=n[e[c]];end end else if o>25 then if 25<o then repeat if 27>o then local e=e[a]l[e]=l[e](u(l,e+1,h))break;end;for o=0,6 do if 3<=o then if o<5 then if o==3 then l[e[a]]=r[e[d]];n=n+1;e=t[n];else l[e[a]][e[d]]=e[c];n=n+1;e=t[n];end else if o>=3 then for f=32,54 do if o~=5 then l[e[a]][e[d]]=e[c];break;end;l[e[a]]=r[e[d]];n=n+1;e=t[n];break;end;else l[e[a]]=r[e[d]];n=n+1;e=t[n];end end else if 1>o then r[e[d]]=l[e[a]];n=n+1;e=t[n];else if 0<=o then repeat if 1~=o then r[e[d]]=l[e[a]];n=n+1;e=t[n];break;end;l(e[a],e[d]);n=n+1;e=t[n];until true;else l(e[a],e[d]);n=n+1;e=t[n];end end end end until true;else for o=0,6 do if 3<=o then if o<5 then if o==3 then l[e[a]]=r[e[d]];n=n+1;e=t[n];else l[e[a]][e[d]]=e[c];n=n+1;e=t[n];end else if o>=3 then for f=32,54 do if o~=5 then l[e[a]][e[d]]=e[c];break;end;l[e[a]]=r[e[d]];n=n+1;e=t[n];break;end;else l[e[a]]=r[e[d]];n=n+1;e=t[n];end end else if 1>o then r[e[d]]=l[e[a]];n=n+1;e=t[n];else if 0<=o then repeat if 1~=o then r[e[d]]=l[e[a]];n=n+1;e=t[n];break;end;l(e[a],e[d]);n=n+1;e=t[n];until true;else l(e[a],e[d]);n=n+1;e=t[n];end end end end end else if o==25 then do return end;else n=e[d];end end end else if 17<=o then if 19<=o then if 16<=o then repeat if o<20 then if(l[e[a]]==e[c])then n=n+1;else n=e[d];end;break;end;l(e[a],e[d]);until true;else if(l[e[a]]==e[c])then n=n+1;else n=e[d];end;end else if 16<=o then for n=13,94 do if o<18 then l[e[a]]();break;end;r[e[d]]=l[e[a]];break;end;else l[e[a]]();end end else if o<=14 then l[e[a]][e[d]]=e[c];else if o>=12 then for n=15,59 do if o~=16 then local n=e[a]local a,e=b(l[n](u(l,n+1,e[d])))h=e+n-1 local e=0;for n=n,h do e=e+1;l[n]=a[e];end;break;end;l[e[a]]=(e[d]~=0);break;end;else l[e[a]]=(e[d]~=0);end end end end end n=1+n;end;end;return _ end;local d=0xff;local r={};local t=(1);local a='';(function(n)local l=n local o=0x00 local e=0x00 l={(function(t)if o>0x27 then return t end o=o+1 e=(e+0x12d7-t)%0x46 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xc8);end return true end)'MEbxb'and l[0x3](0xb2+t))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x42);a='\37';d={function()d()end};a=a..'\100\43';end return true end)'ieFhX'and l[0x2](t+0x347))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa9);end return true end)'cqxAh'and l[0x1](t+0x1d2))or t end),(function(c)if o>0x2a then return c end o=o+1 e=(e+0x5df-c)%0x24 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x5d);end return true end)'ubV_O'and l[0x1](0xf2+c))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x15);end return true end)'HiYDq'and l[0x2](c+0x140))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x4);a={a..'\58 a',a};r[t]=m();t=t+((not f.CdRdJDvj)and 1 or 0);a[1]='\58'..a[1];d[2]=0xff;end return true end)'zciyL'and l[0x3](c+0x1b3))or c end),(function(f)if o>0x30 then return f end o=o+1 e=(e+0x487-f)%0x4e return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x47);d[2]=(d[2]*(p(function()r()end,u(a))-p(d[1],u(a))))+1;r[t]={};d=d[2];t=t+d;end return true end)'LGspV'and l[0x2](0x10e+f))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd9);r[t]=ne();t=t+d;end return true end)'ZwHFU'and l[0x1](f+0xc8))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x91);end return true end)'Dmvtb'and l[0x3](f+0x10f))or f end)}l[0x1](0x3d6)end){};local e=j(u(r));return e(...);end return _((function()local n={}local e=0x01;local l;if f.CdRdJDvj then l=f.CdRdJDvj(_)else l=''end if f.sPEvHS_S(l,f.nCBKPgpr)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,a,d,o)local o;if 3>=l then if l>=2 then if l~=3 then do return 16777216,65536,256 end;else do return e(1),e(4,d,a,n,e),e(5,d,a,n)end;end else if-4~=l then for o=15,54 do if l~=1 then do return e(1),e(4,d,a,n,e),e(5,d,a,n)end;break;end;do return function(l,e,n)if n then local e=(l/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(l%(e+e)>=e)and 1 or 0;end;end;end;break;end;else do return e(1),e(4,d,a,n,e),e(5,d,a,n)end;end end else if l>=6 then if l>=7 then if l>=5 then for e=14,91 do if 8~=l then do return setmetatable({},{['__\99\97\108\108']=function(e,d,a,l,n)if n then return e[n]elseif l then return e else e[d]=a end end})end break;end;do return n(l,nil,n);end break;end;else do return n(l,nil,n);end end else do return d[n]end;end else if 1<=l then repeat if l~=5 then local l=a;local t,o,f=d(2);do return function()local d,n,a,e=e(n,l(l,l),l(l,l)+3);l(4);return(e*t)+(a*o)+(n*f)+d;end;end;break;end;local l=a;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;until true;else local l=a;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;end end end end),...)