Aestal

asgui

Feb 5th, 2024 (edited)
2,870
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 19.37 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _bvcFIMHJprTb = a; end)); return(function(u,...)local d;local f;local s;local o;local l;local a;local e=24915;local n=0;local t={};while n<876 do n=n+1;while n<0x205 and e%0x4c28<0x2614 do n=n+1 e=(e+233)%38734 local r=n+e if(e%0x1638)<=0xb1c then e=(e-0xe)%0x629e while n<0x2cb and e%0x1e1c<0xf0e do n=n+1 e=(e-109)%30078 local l=n+e if(e%0x20d0)>=0x1068 then e=(e+0x187)%0x207b local e=6216 if not t[e]then t[e]=0x1 a={};end elseif e%2~=0 then e=(e+0xbb)%0x65be local e=86069 if not t[e]then t[e]=0x1 d=getfenv and getfenv();end else e=(e-0x156)%0x9a0c n=n+1 local e=97535 if not t[e]then t[e]=0x1 o=string;end end end elseif e%2~=0 then e=(e+0x182)%0x1669 while n<0x356 and e%0x42cc<0x2166 do n=n+1 e=(e*948)%33554 local l=n+e if(e%0x43fa)>=0x21fd then e=(e+0x355)%0x4c0f local e=39890 if not t[e]then t[e]=0x1 d=(not d)and _ENV or d;end elseif e%2~=0 then e=(e+0x17e)%0x21a3 local e=99238 if not t[e]then t[e]=0x1 end else e=(e*0xb2)%0x9d4c n=n+1 local e=81236 if not t[e]then t[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\111\76\85\113\68\112\77\75\0\6\115\116\114\105\110\103\4\99\104\97\114\105\120\69\69\105\120\80\65\0\6\115\116\114\105\110\103\3\115\117\98\66\95\75\68\109\121\101\87\0\6\115\116\114\105\110\103\4\98\121\116\101\111\90\104\75\79\65\120\67\0\5\116\97\98\108\101\6\99\111\110\99\97\116\66\112\65\116\65\76\99\88\0\5\116\97\98\108\101\6\105\110\115\101\114\116\76\80\122\68\111\110\89\69\5";end end end else e=(e*0xf5)%0x2158 n=n+1 while n<0x1c6 and e%0xc48<0x624 do n=n+1 e=(e-695)%28917 local f=n+e if(e%0x43a8)>0x21d4 then e=(e*0x2c0)%0x2327 local e=92610 if not t[e]then t[e]=0x1 l=function(t)local e=0x01 local function n(n)e=e+n return t:sub(e-n,e-0x01)end while true do local t=n(0x01)if(t=="\5")then break end local e=o.byte(n(0x01))local e=n(e)if t=="\2"then e=a.oLUqDpMK(e)elseif t=="\3"then e=e~="\0"elseif t=="\6"then d[e]=function(e,n)return u(8,nil,u,n,e)end elseif t=="\4"then e=d[e]elseif t=="\0"then e=d[e][n(o.byte(n(0x01)))];end local n=n(0x08)a[n]=e end end end elseif e%2~=0 then e=(e-0x1c0)%0x242b local e=70447 if not t[e]then t[e]=0x1 s=tonumber;end else e=(e-0x38)%0x20b4 n=n+1 local e=87573 if not t[e]then t[e]=0x1 end end end end end e=(e+495)%22911 end l(f);local n={};for e=0x0,0xff do local t=a.ixEEixPA(e);n[e]=t;n[t]=e;end local function h(e)return n[e];end local f=(function(f,o)local r,t=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local l=f while true do n[0x03][a.B_KDmyeW(o,e,(function()e=r+e return e-0x01 end)())]=(function()d=d+0x01 return d end)()if d==(0x0f)then d=""t=0x000 break end end local d=#o while e<d+0x01 do n[0x02][t]=a.B_KDmyeW(o,e,(function()e=r+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 a.LPzDonYE(n[0x01],(h((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+l)%0x100)));l=f+l;end end return a.BpAtALcX(n[0x01])end);l(f(203,"dI2yA=Jl>3_wXt!Zy_"));l(f(198,"ma2O<I/_EqU7)SHdOU_U2aI)q<)IX<O_lHUEdO2I/2/dUSK2OdIE)_dS2arWO7HV-S<IEU)<HI2H<7EO)_QHOUq7/OUa</E27Od2O2<dqHSOd_<7_<)_;2)ENEUdHU22IOq2)IqSOd/S7UHO22<E_I7IHq<H__7_Sa)<42UISO2B<H2I)/dEOOE%72HIaIIIq)7/d<<)_dI:q2OOIdUES74SI/_S)Uda2)_DUO)d2)//qU7IH<OqEO<)Eqa2I7qOSHaOI*<7)UH<O)I2E7S/d<<d2//JzSOa_O7EHH{Q<qU/S)HOaSI/IrEqd7/<qU)qa/2)E_)qS/SF%H7<Hq2_/2qU)7fUOSI<7HH)2qO)_q7Sa/Hbad)EHd2U/HUa_)2IIEq<7dd7OSEI)RHHdS<_E2S/axHFa))IdEO<Idq7SSd/IHEdq)HS<O_XE7E^77/eq))SY)<)E77<S_OU/OE<7OaqH/22)qdIO//qUaH)22O7qUSOa<OOE<ESE2) /OqaSHk)HO_H7Hd7OI_2U_7)dS/:_qU),aa/gd"));local e=(-28311+(function()local l,d=0,1;(function(e,n,d,t)e(t(d,t,e,e),e(n,t,e,e),e(t,e,t,n and n),n(e and d,e,e,n))end)(function(n,e,o,t)if l>222 then return e end l=l+1 d=(d+581)%27853 if(d%1018)<509 then return e else return e(n(e,t,e and t,e),o(e,e,t,n),t(e,o,t,t),e(n,o,o and n,o))end return o(n(e,o,e,n)and e(t,t,o,e),n(n,n,n and e,e),e(o and t,n and e,o,t and n),n(t,t and t,o,n))end,function(n,o,t,e)if l>134 then return t end l=l+1 d=(d+513)%18686 if(d%1902)>951 then return t else return t(n(o and n,t,e,n),o(o,n,o,o),e(e,t,e,t and o),n(e,t,e,n)and e(e,o,e,n))end return n(t(n,t,e,n),o(n,o,t and e,t),n(t,o,e,o),n(e,e,n,e))end,function(t,o,e,n)if l>471 then return n end l=l+1 d=(d+817)%16185 if(d%968)<=484 then return t(n(e,t,t and o,e and t),n(n,e,o,e),e(n,e,e,e),t(e,e,o,n and n))else return o end return t end,function(t,o,n,e)if l>489 then return n end l=l+1 d=(d+244)%46212 if(d%1950)<975 then return t else return e(e(n,n,n,t),n(n,e and n,e,e and e),e(t,e,n,o),e(o and t,t,n,o))end return t(o(o and n,e,o,n and n),e(n,e,o,o),e(t,e,n and n,t),e(e and o,t,t,e))end)return d;end)())local c=a.JxoBYuhI or a.yznCSTnn;local te=(getfenv)or(function()return _ENV end);local j=1;local r=4;local d=2;local l=3;local function ee(b,...)local f=f(e,"uZ5v_%xBD0CWt1/^WZ5tt5%D^ZD_ZCWl_x1^BDKD0/v_m1ttx%^^DBZt%Z/0BCZqCxCt__1Zxt9D51t1%x/tD5BBZeWCv1Wx_^/0BCZ5t/xx1/D5W0%a/5BD+/NW0Wv1tW^^0x5DW/%_vD/ZDvZZ_%1^x/O_0CBDvC1#x5t^Dv5D_1/DBxNtC5B/vB15xv-vD/5ZWx/WD_Z_CC_pZB1ZB%otD^vF%1^CDxZtW5W__11%x/ZvCCv/tWxx^%5B1c%M/xBtBCZtW5__11vCt%%W^_t_xBW5DxZ0W__BCZv0Z%B05_CW^0C%55WD_/vZ/0B^Z_D^vBtW%1/B0/v5W^%C/0DW^xC1v/1_xWwCBvvt15xxD15^Wx_t/5W0B/Z_Cxv0t0%1*x0Z51t5vD/ZDvZZ_%1tx/J_0CB0v_t5xZDW55W__C/E/1x1)WCt1ZxB^C045xbCWB%^DZBZCC_ 1x1_Bx-t0/vB0_Z^W%D/ZvW^wt1WBvZ_0/_Zt_x1-ZD05tWv%%/CDxw1Ct_D0Dxv,%00^ZC%_^tWDveDW/5^1%BCUBC_v/t%xDWt%Z5vWv%1/1D0Z0W vB1%B_txDWvUW^ZW/^B05ZWDv^/5v%ZZ0W^B1xxx/^05Z%W0%%/tDvGDCvv^0CvZt!0_vvW%/1DDZxCt_5Z0/vBD.5D_v^tt%BDW5xW__C/i10BD(W01vt1Dxv^_5010%5/DB/%^M^W0^x/5xBqC0B5Ctv%%/C_D15CWv^/55C{tC%51txZD=ZDB5tW0%x^IZ_CD_Z/CxCi;0xBt5/W0xB/0Dt1bC0_D/ZBWKv0D/C1_%/^Z_5^^Cv51CDZvWxvt15xDv^:50v51WB%DC5xWZBWZ_^1txBZqCZvCxZnZDC5pWx0O_W/WBZZvCtv_C^xC-D0Zv5W0/105ZxCt_5Z^1vBDWCBW5W1%Z5t/D15xxCvv10B/(WCD_5xB5Z0+5xWtCx%b/BDBtCCxv^1DxBWDC%5%t1ZM^xD/5ZWt_v1BB/q%0C/t10xZf5Dt1C01%%/WDl^WCvvBDC%xt05^tx%D//D_D/ZZW0_BCD<D0/v_tCB%^xDt55W0_//_BC55CBvt15xDKC0_5CtKxD^ZD5ZDC/_D1CB!pxt5_CtD%/^_0-5MWB_t^tBDZ5WKvC1#xxE50550W/%_^%DOZxCt_v1Dx/a_Ctv/tx%t^505Z/W__C^500etCvvD1vx_^C0T_x10%5/0B/Z%CC_B1xB/L00DvZt_xW^;DxZtW5%v1/B%OCCvvxttx5^DCC5_WC%o/xBtZ_CDv/1txC2R0x51t5%C//C_v%WP_B1tB5{DC/v_tCDx^xD/55WD_//0BC_3t^vt1_xDLW0_vvt.Dx:ZD5ZCC/_C1CDBrxtt_ttDxM^_0D5*t^_tZ5D^c/CxvC/Dxx^105%Dtp%_/tD85DCt%%1Dx/U^0CvZtx%/^5D0Z/tx%D/UBBitW1vDt/x_ZCWd5xW1%5/0B/5vCC_j/0xt+v0D5^t_%W^;Cx5_W5_01/B_eCCDvxttx/^DD^5_WW%X/DBtZDW%v/1%xCZ^0x51t5%0//DD5xW _x1t0Z8D0^v_/CD1^xD155WD_//xBCZxtCvt1vxDZv0_5WtA%x/tDx5_C/__1CD%}x01v5/DDW^_DW5{Wx_t/CBDn/tZvC1Zxx^1055CW/%C/tDzZBCtxx1Dx^l_0Wv&tCxD^5DDZ/1D_C/ZBxZ}C/vDt/x_5t0I5BWtB5Z%B/Z%CC_91xx/*5W/vXt_%W^6WDZtWv_D^vB_L/Ctvxttx55CD/5%WCx5^_BtZvCD_Z1_xC2=CD%xt5%C//0DZCWk_x1tDWVD0^v_ttx ^BDtv_WC_//%BCZCCxvt15BCMZ0_5ttI%W/tD5ZDt/%D1CB5lx0/v5t^%/Rx0-5SWC_t/1BDf/C_vC/xxx^/055tW/%_/CDj5BCt_v1Dx/?_0tv+tx%^^5D0Z/W%_C/ZBxZlWvvDt/x_5^0}5BWtx_^xB/Z%CC_v1xxt(5CC%Ct_%t^P0tZtW5_D1/D%(CCZvxt/x5^0D/5_t%%z/xBtZvCDv/1_xCV70x5tt5");local n=0;a.SbECMZLs(function()a.pHWzvCCB()n=n+1 end)local function e(e,t)if t then return n end;n=e+n;end local t,n,_=u(0,u,e,f,a.oZhKOAxC);local function o()local t,n=a.oZhKOAxC(f,e(1,3),e(5,6)+2);e(2);return(n*256)+t;end;local h=true;local h=0 local function p()local d=n();local e=n();local l=1;local d=(t(e,1,20)*(2^32))+d;local n=t(e,21,31);local e=((-1)^t(e,32));if(n==0)then if(d==h)then return e*0;else n=1;l=0;end;elseif(n==2047)then return(d==0)and(e*(1/0))or(e*(0/0));end;return a.i_erRVtm(e,n-1023)*(l+(d/(2^52)));end;local g=n;local function k(n)local t;if(not n)then n=g();if(n==0)then return'';end;end;t=a.B_KDmyeW(f,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+h),#t do e=e..a.B_KDmyeW(t,n,n)end return e;end;local f=#a.DthkDGQp(s('\49.\48'))~=1 local e=n;local function z(...)return{...},a.pOtsz_vE('#',...)end local function ee()local u={};local e={};local s={};local c={s,u,nil,e};local e=n()local h={}for d=1,e do local t=_();local e;if(t==2)then e=(_()~=#{});elseif(t==1)then local n=p();if f and a.TGMGragG(a.DthkDGQp(n),'.(\48+)$')then n=a.mHOxWPkF(n);end e=n;elseif(t==3)then e=k();end;h[d]=e;end;for c=1,n()do local e=_();if(t(e,1,1)==0)then local f=t(e,2,3);local a=t(e,4,6);local e={o(),o(),nil,nil};if(f==0)then e[l]=o();e[r]=o();elseif(f==#{1})then e[l]=n();elseif(f==b[2])then e[l]=n()-(2^16)elseif(f==b[3])then e[l]=n()-(2^16)e[r]=o();end;if(t(a,1,1)==1)then e[d]=h[e[d]]end if(t(a,2,2)==1)then e[l]=h[e[l]]end if(t(a,3,3)==1)then e[r]=h[e[r]]end s[c]=e;end end;for e=1,n()do u[e-(#{1})]=ee();end;c[3]=_();return c;end;local function ne(t,n,e)local d=n;local d=e;return s(a.TGMGragG(a.TGMGragG(({a.SbECMZLs(t)})[2],n),e))end local function de(k,e,_)local function ee(...)local f,ee,o,g,s,n,h,m,p,b,y,t;local e=0;while-1<e do if e<3 then if e<1 then f=u(6,40,1,82,k);ee=u(6,66,2,82,k);else if e~=-3 then repeat if 2~=e then o=u(6,80,3,56,k);s=z g=0;break;end;n=-41;h=-1;until true;else o=u(6,80,3,56,k);s=z g=0;end end else if e>4 then if 3~=e then for n=48,98 do if e>5 then e=-2;break;end;t=u(7);break;end;else t=u(7);end else if e>1 then repeat if e~=3 then b=a.pOtsz_vE('#',...)-1;y={};break;end;m={};p={...};until true;else b=a.pOtsz_vE('#',...)-1;y={};end end end e=e+1;end;for e=0,b do if(e>=o)then m[e-o]=p[e+1];else t[e]=p[e+1];end;end;local e=b-o+1 local e;local o;local function a(...)while true do end end while true do if n<-40 then n=n+42 end e=f[n];o=e[j];if o<=22 then if 11<=o then if o>16 then if o>19 then if o>=21 then if 22~=o then for o=0,3 do if o>1 then if o>1 then repeat if 3>o then t[e[d]]=_[e[l]];n=n+1;e=f[n];break;end;if(t[e[d]]~=e[r])then n=n+1;else n=e[l];end;until true;else t[e[d]]=_[e[l]];n=n+1;e=f[n];end else if-4<=o then for r=12,67 do if 0<o then _[e[l]]=t[e[d]];n=n+1;e=f[n];break;end;t[e[d]]=(e[l]~=0);n=n+1;e=f[n];break;end;else t[e[d]]=(e[l]~=0);n=n+1;e=f[n];end end end else local e=e[d]t[e](t[e+1])end else if not t[e[d]]then n=n+1;else n=e[l];end;end else if 18<=o then if o<19 then if not t[e[d]]then n=n+1;else n=e[l];end;else if(t[e[d]]~=e[r])then n=n+1;else n=e[l];end;end else local e=e[d]t[e]=t[e](c(t,e+1,h))end end else if o>=14 then if 15>o then t[e[d]]=_[e[l]];else if o>=12 then for n=20,74 do if 15<o then local f,h,r,o,a;local n=0;while n>-1 do if 3<=n then if n<5 then if n>=1 then repeat if n>3 then a=f[h];break;end;o=f[r];until true;else o=f[r];end else if n>=2 then repeat if n>5 then n=-2;break;end;t(a,o);until true;else t(a,o);end end else if n<=0 then f=e;else if 1<n then r=l;else h=d;end end end n=n+1 end break;end;t[e[d]]();break;end;else local o,h,a,f,r;local n=0;while n>-1 do if 3<=n then if n<5 then if n>=1 then repeat if n>3 then r=o[h];break;end;f=o[a];until true;else f=o[a];end else if n>=2 then repeat if n>5 then n=-2;break;end;t(r,f);until true;else t(r,f);end end else if n<=0 then o=e;else if 1<n then a=l;else h=d;end end end n=n+1 end end end else if o>11 then if 8<o then for f=23,55 do if o<13 then n=e[l];break;end;t[e[d]][e[l]]=e[r];break;end;else n=e[l];end else do return end;end end end else if o>4 then if o<8 then if 5>=o then do return end;else if o>3 then repeat if 7~=o then _[e[l]]=t[e[d]];break;end;t(e[d],e[l]);until true;else _[e[l]]=t[e[d]];end end else if 9>o then n=e[l];else if 8<=o then for f=32,77 do if 10~=o then local n=e[d];local d=t[e[l]];t[n+1]=d;t[n]=d[e[r]];break;end;if t[e[d]]then n=n+1;else n=e[l];end;break;end;else local d=e[d];local n=t[e[l]];t[d+1]=n;t[d]=n[e[r]];end end end else if o>1 then if 3>o then if(t[e[d]]==e[r])then n=n+1;else n=e[l];end;else if o==3 then for o=0,1 do if-2<o then repeat if 0~=o then n=e[l];break;end;t[e[d]]();n=n+1;e=f[n];until true;else t[e[d]]();n=n+1;e=f[n];end end else local d=e[d];local n=t[e[l]];t[d+1]=n;t[d]=n[e[r]];end end else if o>-2 then for n=41,80 do if o<1 then local e=e[d]t[e]=t[e](c(t,e+1,h))break;end;local e=e[d]t[e]=t[e]()break;end;else local e=e[d]t[e]=t[e](c(t,e+1,h))end end end end else if 33<o then if o<=39 then if 37>o then if o<35 then t[e[d]]=t[e[l]][e[r]];else if o>=32 then repeat if 36>o then local o,b,k,p,u;for a=0,6 do if 3<=a then if 4>=a then if a>=2 then repeat if a>3 then o=e[d]t[o]=t[o](c(t,o+1,h))n=n+1;e=f[n];break;end;o=e[d]k,p=s(t[o](c(t,o+1,e[l])))h=p+o-1 u=0;for e=o,h do u=u+1;t[e]=k[u];end;n=n+1;e=f[n];until true;else o=e[d]t[o]=t[o](c(t,o+1,h))n=n+1;e=f[n];end else if a~=3 then repeat if a<6 then o=e[d]t[o]=t[o]()n=n+1;e=f[n];break;end;t[e[d]]=t[e[l]][e[r]];until true;else o=e[d]t[o]=t[o]()n=n+1;e=f[n];end end else if a>0 then if 2==a then t(e[d],e[l]);n=n+1;e=f[n];else o=e[d];b=t[e[l]];t[o+1]=b;t[o]=b[e[r]];n=n+1;e=f[n];end else t[e[d]]=_[e[l]];n=n+1;e=f[n];end end end break;end;if t[e[d]]then n=n+1;else n=e[l];end;until true;else local o,b,k,p,u;for a=0,6 do if 3<=a then if 4>=a then if a>=2 then repeat if a>3 then o=e[d]t[o]=t[o](c(t,o+1,h))n=n+1;e=f[n];break;end;o=e[d]k,p=s(t[o](c(t,o+1,e[l])))h=p+o-1 u=0;for e=o,h do u=u+1;t[e]=k[u];end;n=n+1;e=f[n];until true;else o=e[d]t[o]=t[o](c(t,o+1,h))n=n+1;e=f[n];end else if a~=3 then repeat if a<6 then o=e[d]t[o]=t[o]()n=n+1;e=f[n];break;end;t[e[d]]=t[e[l]][e[r]];until true;else o=e[d]t[o]=t[o]()n=n+1;e=f[n];end end else if a>0 then if 2==a then t(e[d],e[l]);n=n+1;e=f[n];else o=e[d];b=t[e[l]];t[o+1]=b;t[o]=b[e[r]];n=n+1;e=f[n];end else t[e[d]]=_[e[l]];n=n+1;e=f[n];end end end end end else if o>=38 then if o~=36 then for f=47,98 do if o~=38 then if(t[e[d]]==e[r])then n=n+1;else n=e[l];end;break;end;t[e[d]]={};break;end;else if(t[e[d]]==e[r])then n=n+1;else n=e[l];end;end else local n=e[d]local d,e=s(t[n](c(t,n+1,e[l])))h=e+n-1 local e=0;for n=n,h do e=e+1;t[n]=d[e];end;end end else if 43>o then if 40>=o then local n=e[d]local d,e=s(t[n](c(t,n+1,e[l])))h=e+n-1 local e=0;for n=n,h do e=e+1;t[n]=d[e];end;else if 38<o then for a=18,97 do if 41<o then local b,k,y,z,g,o,a,p,j,m,u;for o=0,6 do if 3<=o then if 5>o then if o~=3 then a=e[d];p=t[e[l]];t[a+1]=p;t[a]=p[e[r]];n=n+1;e=f[n];else t[e[d]]=_[e[l]];n=n+1;e=f[n];end else if 6==o then a=e[d]j,m=s(t[a](c(t,a+1,e[l])))h=m+a-1 u=0;for e=a,h do u=u+1;t[e]=j[u];end;else t(e[d],e[l]);n=n+1;e=f[n];end end else if 1<=o then if-3<o then for r=45,63 do if 1~=o then t[e[d]]=_[e[l]];n=n+1;e=f[n];break;end;a=e[d]t[a](t[a+1])n=n+1;e=f[n];break;end;else a=e[d]t[a](t[a+1])n=n+1;e=f[n];end else o=0;while o>-1 do if o<3 then if 1>o then b=e;else if o~=-3 then for e=24,63 do if o~=1 then y=l;break;end;k=d;break;end;else k=d;end end else if o<5 then if 1<o then repeat if 4~=o then z=b[y];break;end;g=b[k];until true;else g=b[k];end else if 4<=o then for e=33,80 do if o~=6 then t(g,z);break;end;o=-2;break;end;else o=-2;end end end o=o+1 end n=n+1;e=f[n];end end end break;end;local a;for o=0,5 do if 3>o then if o<1 then t[e[d]][e[l]]=e[r];n=n+1;e=f[n];else if o~=2 then t[e[d]][e[l]]=e[r];n=n+1;e=f[n];else t[e[d]][e[l]]=e[r];n=n+1;e=f[n];end end else if 4>o then t[e[d]][e[l]]=e[r];n=n+1;e=f[n];else if o>2 then for h=39,58 do if o~=5 then t[e[d]][e[l]]=e[r];n=n+1;e=f[n];break;end;a=e[d]t[a](t[a+1])break;end;else a=e[d]t[a](t[a+1])end end end end break;end;else local a;for o=0,5 do if 3>o then if o<1 then t[e[d]][e[l]]=e[r];n=n+1;e=f[n];else if o~=2 then t[e[d]][e[l]]=e[r];n=n+1;e=f[n];else t[e[d]][e[l]]=e[r];n=n+1;e=f[n];end end else if 4>o then t[e[d]][e[l]]=e[r];n=n+1;e=f[n];else if o>2 then for h=39,58 do if o~=5 then t[e[d]][e[l]]=e[r];n=n+1;e=f[n];break;end;a=e[d]t[a](t[a+1])break;end;else a=e[d]t[a](t[a+1])end end end end end end else if o<44 then _[e[l]]=t[e[d]];else if o==44 then local o;for r=0,1 do if 0~=r then o=e[d]t[o](t[o+1])else t(e[d],e[l]);n=n+1;e=f[n];end end else t[e[d]]=t[e[l]][e[r]];end end end end else if 28<=o then if 30>=o then if 28<o then if 26<o then for r=12,90 do if 29<o then t[e[d]]();break;end;local o;for r=0,1 do if 0<r then if not t[e[d]]then n=n+1;else n=e[l];end;else o=e[d]t[o]=t[o]()n=n+1;e=f[n];end end break;end;else local o;for r=0,1 do if 0<r then if not t[e[d]]then n=n+1;else n=e[l];end;else o=e[d]t[o]=t[o]()n=n+1;e=f[n];end end end else t[e[d]][e[l]]=e[r];end else if o>=32 then if 30~=o then for a=11,66 do if o>32 then t[e[d]]=(e[l]~=0);break;end;local o;for a=0,4 do if a>=2 then if a>=3 then if a>=1 then repeat if a~=4 then o=e[d]t[o]=t[o]()n=n+1;e=f[n];break;end;if not t[e[d]]then n=n+1;else n=e[l];end;until true;else o=e[d]t[o]=t[o]()n=n+1;e=f[n];end else t[e[d]]=t[e[l]][e[r]];n=n+1;e=f[n];end else if 1==a then t[e[d]]();n=n+1;e=f[n];else t[e[d]]=t[e[l]][e[r]];n=n+1;e=f[n];end end end break;end;else t[e[d]]=(e[l]~=0);end else t[e[d]]={};end end else if 24<o then if 25<o then if o>25 then for f=13,57 do if o~=27 then local e=e[d]t[e]=t[e]()break;end;if(t[e[d]]~=e[r])then n=n+1;else n=e[l];end;break;end;else if(t[e[d]]~=e[r])then n=n+1;else n=e[l];end;end else local e=e[d]t[e](t[e+1])end else if 22<=o then for n=27,60 do if o~=24 then t[e[d]]=(e[l]~=0);break;end;t[e[d]]=_[e[l]];break;end;else t[e[d]]=_[e[l]];end end end end end n=1+n;end;end;return ee end;local l=0xff;local h={};local o=(1);local d='';(function(n)local t=n local f=0x00 local e=0x00 t={(function(r)if f>0x31 then return r end f=f+1 e=(e+0x137a-r)%0x3c return(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x77);end return true end)'dgpUs'and t[0x3](0x13d+r))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x74);d={d..'\58 a',d};h[o]=ee();o=o+((not a.CGbeDyu_)and 1 or 0);d[1]='\58'..d[1];l[2]=0xff;end return true end)'hapBl'and t[0x2](r+0x29c))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x89);d='\37';l={function()l()end};d=d..'\100\43';end return true end)'KgRtJ'and t[0x1](r+0x165))or r end),(function(r)if f>0x2d then return r end f=f+1 e=(e+0xa39-r)%0x3a return(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x68);end return true end)'J_Cwz'and t[0x3](0x17c+r))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xa3);h[o]=te();o=o+l;end return true end)'VXTB_'and t[0x1](r+0x1fb))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x4d);l[2]=(l[2]*(ne(function()h()end,c(d))-ne(l[1],c(d))))+1;h[o]={};l=l[2];o=o+l;end return true end)'XYPHI'and t[0x2](r+0x3c5))or r end),(function(d)if f>0x2c then return d end f=f+1 e=(e+0x6a8-d)%0x28 return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xc3);end return true end)'MOtDO'and t[0x1](0x2a8+d))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x52);end return true end)'SHvaO'and t[0x2](d+0xdf))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x8);end return true end)'BjGVf'and t[0x3](d+0x1f9))or d end)}t[0x1](0xb47)end){};local e=de(c(h));return e(...);end return ee((function()local n={}local e=0x01;local t;if a.CGbeDyu_ then t=a.CGbeDyu_(ee)else t=''end if a.TGMGragG(t,a.WlgQkZst)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,t,d,l,o)local o;if e>=4 then if e>5 then if 6>=e then do return l[t]end;else if 8~=e 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 else do return t(e,nil,t);end end end else if e>=2 then for o=24,64 do if 4~=e then local e=d;do return function()local n=n(t,e(e,e),e(e,e));e(1);return n;end;end;break;end;local e=d;local l,d,o=l(2);do return function()local t,n,f,r=n(t,e(e,e),e(e,e)+3);e(4);return(r*l)+(f*d)+(n*o)+t;end;end;break;end;else local e=d;do return function()local n=n(t,e(e,e),e(e,e));e(1);return n;end;end;end end else if e>1 then if e~=-2 then for o=48,55 do if 3~=e then do return 16777216,65536,256 end;break;end;do return n(1),n(4,l,d,t,n),n(5,l,d,t)end;break;end;else do return 16777216,65536,256 end;end else if-4<=e then for o=35,80 do if 0~=e then do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-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;break;end;do return n(1),n(4,l,d,t,n),n(5,l,d,t)end;break;end;else do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-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;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment