New Trade scam psx

([[This file was protected with MoonSec V3 by Federal#9999]]):gsub('.+', (function(a) _XlmCEAxFJYch = a; end)); return(function(a,...)local l;local c;local s;local r;local t;local o;local e=24915;local n=0;local d={};while n<137 do n=n+1;while n<0x26c and e%0x29c4<0x14e2 do n=n+1 e=(e+657)%45868 local f=n+e if(e%0x2530)<0x1298 then e=(e*0xf3)%0x79e0 while n<0x332 and e%0x36b8<0x1b5c do n=n+1 e=(e-603)%902 local f=n+e if(e%0x10ea)>0x875 then e=(e*0x31c)%0x3975 local e=93270 if not d[e]then d[e]=0x1 end elseif e%2~=0 then e=(e-0xce)%0x6932 local e=31179 if not d[e]then d[e]=0x1 t=function(d)local e=0x01 local function n(n)e=e+n return d:sub(e-n,e-0x01)end while true do local d=n(0x01)if(d=="\5")then break end local e=r.byte(n(0x01))local e=n(e)if d=="\2"then e=o.lRXslBRe(e)elseif d=="\3"then e=e~="\0"elseif d=="\6"then l[e]=function(n,e)return a(8,nil,a,e,n)end elseif d=="\4"then e=l[e]elseif d=="\0"then e=l[e][n(r.byte(n(0x01)))];end local n=n(0x08)o[n]=e end end end else e=(e*0x113)%0x47f n=n+1 local e=95229 if not d[e]then d[e]=0x1 s="\4\8\116\111\110\117\109\98\101\114\108\82\88\115\108\66\82\101\0\6\115\116\114\105\110\103\4\99\104\97\114\74\68\80\77\101\88\82\77\0\6\115\116\114\105\110\103\3\115\117\98\121\88\111\114\69\71\121\112\0\6\115\116\114\105\110\103\4\98\121\116\101\114\119\114\77\67\100\121\101\0\5\116\97\98\108\101\6\99\111\110\99\97\116\76\95\107\99\119\85\113\111\0\5\116\97\98\108\101\6\105\110\115\101\114\116\105\120\113\68\67\108\121\95\5";end end end elseif e%2~=0 then e=(e*0x3a9)%0x9e0 while n<0xa5 and e%0x2892<0x1449 do n=n+1 e=(e-748)%15019 local t=n+e if(e%0x4c62)<0x2631 then e=(e-0x311)%0x48bf local e=68011 if not d[e]then d[e]=0x1 l=(not l)and _ENV or l;end elseif e%2~=0 then e=(e-0x378)%0xaec5 local e=10559 if not d[e]then d[e]=0x1 c=tonumber;end else e=(e+0x32c)%0x7754 n=n+1 local e=81619 if not d[e]then d[e]=0x1 end end end else e=(e*0x39c)%0x1e41 n=n+1 while n<0x2e4 and e%0x3db8<0x1edc do n=n+1 e=(e*441)%23898 local t=n+e if(e%0x20e2)>=0x1071 then e=(e-0x386)%0x7ff8 local e=14429 if not d[e]then d[e]=0x1 r=string;end elseif e%2~=0 then e=(e-0x27c)%0xe4a local e=48308 if not d[e]then d[e]=0x1 l=getfenv and getfenv();end else e=(e+0x38a)%0x9557 n=n+1 local e=28890 if not d[e]then d[e]=0x1 o={};end end end end end e=(e+612)%42047 end t(s);local n={};for e=0x0,0xff do local d=o.JDPMeXRM(e);n[e]=d;n[d]=e;end local function f(e)return n[e];end local d=(function(s,a)local r,d=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local t=s while true do n[0x03][o.yXorEGyp(a,e,(function()e=r+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""d=0x000 break end end local l=#a while e<l+0x01 do n[0x02][d]=o.yXorEGyp(a,e,(function()e=r+e return e-0x01 end)())d=d+0x01 if d%0x02==0x00 then d=0x00 o.ixqDCly_(n[0x01],(f((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+t)%0x100)));t=s+t;end end return o.L_kcwUqo(n[0x01])end);t(d(141,"P39p-XqG{,gENA*>G{"));t(d(242,"Kj s/4pB%dqA>er!-r  deq>A%Aee7eB% !Gb!j4 pjB d Bse/ %jp>dqs%/B><>j>erp!/eAcBj! sjb %/dpd8Bjdd q qBAq>re4r4e%r>!EJS q/se%r>pBBp% %Bdqqj/e>s>4rprs!p!p!ej!sr j/4/s/IZ>jrd4dBA%Aqp4eqr)r!jzjp!AP/ % d e/ Be4e %srAsAse1eBee!q!4jpjj 1s%s!4/p!pdBs%Bd d dq4>pe>qrB!sj jA >!Asr Bp%4%4 prqI%!/q4%edejrB_&rqjjxesejr4j4!4AM>jd4!dedq>jqA>jrpr!rAq%Aqs/se/!4rpqp!% %d%qd%A>AdA%r%!prAqbAss, Asq4 4dL%%4%>d>dAqA>jA4e4>>S j4jqiPFee%r%p4p>B>BA%AqjAsd%qd>s>r!e2>rrA%>B/+4(44p%B>4dpe%%AY>pA e4ee%qdqj4j4 qsjse4>4q4/%jdqB4qq%ee ppB%r!!jj j/A! r/ 4spjB Brppp>Ajq9de>>e %s"));local e=(-12731+(function()local d,n=0,1;(function(e)e(e(e))end)(function(e)if d>401 then return e end d=d+1 n=(n+784)%21373 if(n%748)>374 then n=(n*327)%25196 return e else return e(e(e)and e(e))end return e(e(e))end)return n;end)())local h=o.oFIURstH or o.QcLtypHG;local z=(getfenv)or(function()return _ENV end);local m=1;local l=3;local s=4;local t=2;local function g(_,...)local u=d(e,"RDsxV4_!waBUvdy0UDxVvy_wX4ayx_dK_B_xy4xUd__v%_BOBDx4dU_dB4V0d_!*LB0!UsxayVwSO0ByVDaV_DpUUVV4y_wVDd!s:vB_D4UaV_y/!BwrDdBaV_y4wVD!UdV!0Y!dD!UByaw4DBUVVyxvy!aVsBwDyda_DyUw4sVxy!wasyUd4vy0Vsssv4_sBB!!sDvB4U0vaBvx_V0VwyswDsB0VyUW!ds!d,_DXsB/va_w0BaVsyDdd4_DmwaysUdD_xaUVsvv__r8yda!VXdD!sDm4_Dvda_4?sadx_aBxVvyxdda_yTwBsaZxUyw!yd_VDyU!shvB_wxVsda!DDxBUVBddx?0dB!4cyDwss)Ua#yBwVsUD!0ys!vD_/VUsVd0DxwDwU44sy4xBsUB04UBswvswU04yyawDsvU!4HB_a!sxvw4_Bw_0sUv44yddwasD!wVwU0V_ssdxDVdVwds_vD_w0Da_y!a!xDvU_4va_!0BaVsyDTd_!YO_!!s0dwfDy!xsvv___woyBwxydUxvvU_4VsvU!Uvva0xUy%_yD4avVayD_dDVa0V4dy!y;aBvVvB2_0D4Bd?aUywxDUU_xdyV!0DyBvVxyB!_DaBU,0yB!assUUVUyawyys!vDxyU!aDUUBD40L!0swvD4Dy0wxsUUa4d0!VvsVv!Vdwax5UB4VyyvUa!s0vB400!!!sDvB4U0vaB%yUU_D0xsUvv4v0_aNa_xxU04v64B,xwva_w0UxDd4_s0va_w0ssdT_UdU!!<ddyV_yVwdxDdC/4Bwx_d}_B_0I!BVxydU!_%4Bvj4BsxUdwx0y0!-gBBVwUV!yD!B0aB4xddx_DDvUVV4yV!!DdwvV!dv!_DDUVsDyywws}VUya!vD_UHBDVay)_jsDUU4DwxD0UVVyywd_wDsyvVDdw!a!Uw4syvyyaVsyvV_Dvs4DyUUB4a0dw!sdvB4_UBwas0v!sxy0awsUwU_d04wvsvvd_!0da004aDsBvU_xNzassvvv_i0Ua_x!vU_apDayx4vd_B0ddy_Dyy_xsxa!V0Dx!0VUU?4wy0B DyUD!0yV_vsUB4_x<a!DsVyw_V0xUBs!d!4BXUw0DVUU4ysxwwsw0D!x0aBaV0y_4aEsU4xUd0_v0yUvsyv4_ysUBVsa0w40s4asxa0sVyya4xy0wVDyUwB_4D0yaVyy!syywwssUv_w03wBsVU04w0swvxwvD4B0VwyxUvs4v0_BsxUvV4y0wBxsvv__WsqaUsyvw_sQsa_xDvB!?0yavVxvv__}CB?xVv0_w,sBVx_do_B&4ayxwds!yDsB#xBdVw{pwBsxvywwV BBVxyy?!s;vB_4sdU!V^yBw4wdv!_DpUv4vdy!wDsvOV_y<!BDVUDVwys!vD!U{VByVaWx4UsVvy_wVDBUVVy0BwVDvU_4pyUwVDyUwws0Vw_sTUB_xyyw0ssvy_y0jwBsVU04w0swv4_vx4B0Vwysdvs_40_BssUvV4y0waxsvv__usBaysyvw_s*_a_x_vB!_L_awxsvv_!;7aBxV0y!s3savx_y4_B)0ayVBdy_vP_BAxUdV_ynwds4xd_!+6BUUxydU!sDyUyV5dB!VDyBwVsdvwwD4BBV4dy!BDsBvV_QuaxDVB0Vwyx!vsxUF4v<c!yDUUs4By_w5DBUV_xywwxDvUa4nyBwVDydV4syvw_s)UB4_yywwxyUv4_09wUsVU04w0sB_s_vi4B04wyswvs4v0_aKsBvV");local n=0;o.EcmcBL_q(function()o.PiWyLqq_()n=n+1 end)local function e(e,d)if d then return n end;n=e+n;end local d,n,f=a(0,a,e,u,o.rwrMCdye);local function r()local d,n=o.rwrMCdye(u,e(1,3),e(5,6)+2);e(2);return(n*256)+d;end;local y=true;local y=0 local function p()local l=n();local e=n();local t=1;local l=(d(e,1,20)*(2^32))+l;local n=d(e,21,31);local e=((-1)^d(e,32));if(n==0)then if(l==y)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return o.GBXKAHuG(e,n-1023)*(t+(l/(2^52)));end;local b=n;local function j(n)local d;if(not n)then n=b();if(n==0)then return'';end;end;d=o.yXorEGyp(u,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+y),#d do e=e..o.yXorEGyp(d,n,n)end return e;end;local y=#o.ZZp_PrrY(c('\49.\48'))~=1 local e=n;local function ne(...)return{...},o.dPozGnCz('#',...)end local function g()local c={};local u={};local e={};local h={c,u,nil,e};local e=n()local a={}for l=1,e do local d=f();local n;if(d==1)then n=(f()~=#{});elseif(d==2)then local e=p();if y and o.ZSgxMcSB(o.ZZp_PrrY(e),'.(\48+)$')then e=o.pJByZIjb(e);end n=e;elseif(d==3)then n=j();end;a[l]=n;end;for h=1,n()do local e=f();if(d(e,1,1)==0)then local o=d(e,2,3);local f=d(e,4,6);local e={r(),r(),nil,nil};if(o==0)then e[l]=r();e[s]=r();elseif(o==#{1})then e[l]=n();elseif(o==_[2])then e[l]=n()-(2^16)elseif(o==_[3])then e[l]=n()-(2^16)e[s]=r();end;if(d(f,1,1)==1)then e[t]=a[e[t]]end if(d(f,2,2)==1)then e[l]=a[e[l]]end if(d(f,3,3)==1)then e[s]=a[e[s]]end c[h]=e;end end;for e=1,n()do u[e-(#{1})]=g();end;h[3]=f();return h;end;local function k(d,n,e)local l=n;local l=e;return c(o.ZSgxMcSB(o.ZSgxMcSB(({o.EcmcBL_q(d)})[2],n),e))end local function ee(p,e,f)local function g(...)local r,g,_,k,y,n,c,b,u,j,z,d;local e=0;while-1<e do if 3<=e then if 5>e then if 2<e then for n=23,63 do if e~=3 then j=o.dPozGnCz('#',...)-1;z={};break;end;b={};u={...};break;end;else b={};u={...};end else if e==6 then e=-2;else d=a(7);end end else if e<=0 then r=a(6,49,1,68,p);g=a(6,1,2,49,p);else if-1~=e then for d=24,90 do if 1~=e then n=-41;c=-1;break;end;_=a(6,32,3,31,p);y=ne k=0;break;end;else n=-41;c=-1;end end end e=e+1;end;for e=0,j do if(e>=_)then b[e-_]=u[e+1];else d[e]=u[e+1];end;end;local e=j-_+1 local e;local a;local function o(...)while true do end end while true do if n<-40 then n=n+42 end e=r[n];a=e[m];if 14>a then if a>=7 then if a>=10 then if 11<a then if a>=11 then repeat if 12<a then local n=e[t]local l,e=y(d[n](h(d,n+1,e[l])))c=e+n-1 local e=0;for n=n,c do e=e+1;d[n]=l[e];end;break;end;local a,s,r,o,f;local n=0;while n>-1 do if 2>=n then if n>=1 then if n~=-1 then repeat if 1~=n then r=l;break;end;s=t;until true;else r=l;end else a=e;end else if n>=5 then if n>1 then for e=38,82 do if 5<n then n=-2;break;end;d(f,o);break;end;else n=-2;end else if n>=2 then for e=11,75 do if 4~=n then o=a[r];break;end;f=a[s];break;end;else o=a[r];end end end n=n+1 end until true;else local r,s,a,o,f;local n=0;while n>-1 do if 2>=n then if n>=1 then if n~=-1 then repeat if 1~=n then a=l;break;end;s=t;until true;else a=l;end else r=e;end else if n>=5 then if n>1 then for e=38,82 do if 5<n then n=-2;break;end;d(f,o);break;end;else n=-2;end else if n>=2 then for e=11,75 do if 4~=n then o=r[a];break;end;f=r[s];break;end;else o=r[a];end end end n=n+1 end end else if 7<=a then for n=19,76 do if a~=11 then local e=e[t]d[e]=d[e](h(d,e+1,c))break;end;d[e[t]][e[l]]=e[s];break;end;else local e=e[t]d[e]=d[e](h(d,e+1,c))end end else if a<=7 then local t=e[t];local n=d[e[l]];d[t+1]=n;d[t]=n[e[s]];else if a>8 then d[e[t]]();else do return end;end end end else if 2<a then if 4>=a then if 1<=a then for o=25,86 do if 4>a then for a=0,6 do if 2>=a then if 1<=a then if-2~=a then for o=37,79 do if 2>a then d[e[t]]=f[e[l]];n=n+1;e=r[n];break;end;d[e[t]][e[l]]=e[s];n=n+1;e=r[n];break;end;else d[e[t]]=f[e[l]];n=n+1;e=r[n];end else d[e[t]][e[l]]=e[s];n=n+1;e=r[n];end else if 4<a then if 3~=a then repeat if a~=5 then d[e[t]][e[l]]=e[s];break;end;d[e[t]]=f[e[l]];n=n+1;e=r[n];until true;else d[e[t]]=f[e[l]];n=n+1;e=r[n];end else if a<4 then d[e[t]]=f[e[l]];n=n+1;e=r[n];else d[e[t]][e[l]]=e[s];n=n+1;e=r[n];end end end end break;end;n=e[l];break;end;else n=e[l];end else if 3<a then repeat if 5~=a then d[e[t]]=(e[l]~=0);break;end;local a,u,_,p,o;d[e[t]]=f[e[l]];n=n+1;e=r[n];a=e[t];u=d[e[l]];d[a+1]=u;d[a]=u[e[s]];n=n+1;e=r[n];d(e[t],e[l]);n=n+1;e=r[n];a=e[t]_,p=y(d[a](h(d,a+1,e[l])))c=p+a-1 o=0;for e=a,c do o=o+1;d[e]=_[o];end;n=n+1;e=r[n];a=e[t]d[a]=d[a](h(d,a+1,c))n=n+1;e=r[n];d[e[t]]();n=n+1;e=r[n];do return end;until true;else d[e[t]]=(e[l]~=0);end end else if 0<a then if-3<a then for r=35,96 do if 1<a then f[e[l]]=d[e[t]];break;end;if(d[e[t]]~=e[s])then n=n+1;else n=e[l];end;break;end;else f[e[l]]=d[e[t]];end else if(d[e[t]]~=e[s])then n=n+1;else n=e[l];end;end end end else if a<21 then if 16>=a then if a>14 then if 16~=a then local e=e[t]d[e]=d[e](h(d,e+1,c))else f[e[l]]=d[e[t]];end else d[e[t]]=f[e[l]];end else if 18>=a then if 14<=a then repeat if 17~=a then for a=0,3 do if 2<=a then if 1<=a then for o=46,93 do if a~=2 then if(d[e[t]]~=e[s])then n=n+1;else n=e[l];end;break;end;d[e[t]]=f[e[l]];n=n+1;e=r[n];break;end;else if(d[e[t]]~=e[s])then n=n+1;else n=e[l];end;end else if a>=-3 then repeat if a>0 then f[e[l]]=d[e[t]];n=n+1;e=r[n];break;end;d[e[t]]=(e[l]~=0);n=n+1;e=r[n];until true;else d[e[t]]=(e[l]~=0);n=n+1;e=r[n];end end end break;end;n=e[l];until true;else n=e[l];end else if a>18 then for o=37,97 do if a~=19 then for a=0,6 do if a>2 then if 5>a then if 1<=a then repeat if 4>a then d[e[t]]=(e[l]~=0);n=n+1;e=r[n];break;end;f[e[l]]=d[e[t]];n=n+1;e=r[n];until true;else d[e[t]]=(e[l]~=0);n=n+1;e=r[n];end else if 3<a then repeat if a~=6 then d[e[t]]=f[e[l]];n=n+1;e=r[n];break;end;d[e[t]][e[l]]=e[s];until true;else d[e[t]][e[l]]=e[s];end end else if a<=0 then f[e[l]]=d[e[t]];n=n+1;e=r[n];else if a~=2 then d(e[t],e[l]);n=n+1;e=r[n];else f[e[l]]=d[e[t]];n=n+1;e=r[n];end end end end break;end;local t=e[t];local n=d[e[l]];d[t+1]=n;d[t]=n[e[s]];break;end;else for a=0,6 do if a>2 then if 5>a then if 1<=a then repeat if 4>a then d[e[t]]=(e[l]~=0);n=n+1;e=r[n];break;end;f[e[l]]=d[e[t]];n=n+1;e=r[n];until true;else d[e[t]]=(e[l]~=0);n=n+1;e=r[n];end else if 3<a then repeat if a~=6 then d[e[t]]=f[e[l]];n=n+1;e=r[n];break;end;d[e[t]][e[l]]=e[s];until true;else d[e[t]][e[l]]=e[s];end end else if a<=0 then f[e[l]]=d[e[t]];n=n+1;e=r[n];else if a~=2 then d(e[t],e[l]);n=n+1;e=r[n];else f[e[l]]=d[e[t]];n=n+1;e=r[n];end end end end end end end else if a<24 then if a<=21 then local n=e[t]local l,e=y(d[n](h(d,n+1,e[l])))c=e+n-1 local e=0;for n=n,c do e=e+1;d[n]=l[e];end;else if 20~=a then repeat if a>22 then do return end;break;end;d[e[t]]();until true;else d[e[t]]();end end else if 26>a then if a~=20 then for n=37,93 do if a<25 then d[e[t]]=f[e[l]];break;end;d(e[t],e[l]);break;end;else d(e[t],e[l]);end else if a>=22 then repeat if 27>a then d[e[t]][e[l]]=e[s];break;end;d[e[t]]=(e[l]~=0);until true;else d[e[t]]=(e[l]~=0);end end end end end n=1+n;end;end;return g end;local t=0xff;local f={};local a=(1);local l='';(function(n)local d=n local r=0x00 local e=0x00 d={(function(l)if r>0x1e then return l end r=r+1 e=(e+0x621-l)%0x39 return(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x96);end return true end)'sQBon'and d[0x2](0x16f+l))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x92);end return true end)'pHmBg'and d[0x3](l+0x166))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x81);end return true end)'uIOlZ'and d[0x1](l+0x2cd))or l end),(function(s)if r>0x2d then return s end r=r+1 e=(e+0x11de-s)%0x1d return(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x42);t[2]=(t[2]*(k(function()f()end,h(l))-k(t[1],h(l))))+1;f[a]={};t=t[2];a=a+t;end return true end)'phW_f'and d[0x3](0x153+s))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xdd);l={l..'\58 a',l};f[a]=g();a=a+((not o.SWGOFwTt)and 1 or 0);l[1]='\58'..l[1];t[2]=0xff;end return true end)'jLtmb'and d[0x2](s+0x148))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x8c);end return true end)'HVJsD'and d[0x1](s+0x91))or s end),(function(o)if r>0x2f then return o end r=r+1 e=(e+0xba3-o)%0x18 return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x8a);f[a]=z();a=a+t;end return true end)'_MqaD'and d[0x1](0x1fd+o))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x7f);end return true end)'krnYY'and d[0x3](o+0x254))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xd1);l='\37';t={function()t()end};l=l..'\100\43';end return true end)'wvjmh'and d[0x2](o+0x6b))or o end)}d[0x3](0x2c6)end){};local e=ee(h(f));return e(...);end return g((function()local n={}local e=0x01;local d;if o.SWGOFwTt then d=o.SWGOFwTt(g)else d=''end if o.ZSgxMcSB(d,o.moTZPRny)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(d,e,n,l,t,a)local a;if 4>d then if 1>=d then if 1==d then do return function(d,e,n)if n then local e=(d/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(d%(e+e)>=e)and 1 or 0;end;end;end;else do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;end else if d>-2 then repeat if d~=3 then do return 16777216,65536,256 end;break;end;do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;until true;else do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;end end else if 5>=d then if d~=4 then local d=l;do return function()local e=e(n,d(d,d),d(d,d));d(1);return e;end;end;else local d=l;local a,l,t=t(2);do return function()local r,o,n,e=e(n,d(d,d),d(d,d)+3);d(4);return(e*a)+(n*l)+(o*t)+r;end;end;end else if d<=6 then do return t[n]end;else if 4<d then repeat if d~=8 then do return setmetatable({},{['__\99\97\108\108']=function(e,t,l,d,n)if n then return e[n]elseif d then return e else e[t]=l end end})end break;end;do return n(d,nil,n);end until true;else do return setmetatable({},{['__\99\97\108\108']=function(e,t,l,d,n)if n then return e[n]elseif d then return e else e[t]=l end end})end end end end end end),...)