Advertisement
HansCSia320

[Relase] AR

Feb 5th, 2020
361
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 9.78 KB | None | 0 0
  1. --[[
  2.                     Obfuscated with open source ironbrew! Custom rebuild: c90a70a6850370182c13950944f3185f
  3.                     Script created by: Leave Me Alone#0739
  4. --]]
  5.  
  6. local t=string.byte;local f=string.char;local c=string.sub;local B=table.concat;local u=math.ldexp;local H=getfenv or function()return _ENV end;local l=setmetatable;local C=select;local h=unpack;local i=tonumber;local function s(t)local e,o,a="","",{}local n=256;local d={}for l=0,n-1 do d[l]=f(l)end;local l=1;local function r()local e=i(c(t,l,l),36)l=l+1;local o=i(c(t,l,l+e-1),36)l=l+e;return o end;e=f(r())a[1]=e;while l<#t do local l=r()if d[l]then o=d[l]else o=e..c(e,1,1)end;d[n]=e..c(o,1,1)a[#a+1],e,n=o,o,n+1 end;return table.concat(a)end;local i=s('26D26C27527627524U27625M26K1K1R21E26K27525N26C25G26C21L27625K26K25W26C21B27G22S25L27621Q27527U1C27D21Q1C26C22S25M25G27D21E27K26C25N26K26S26C21D27G26C27B27D1W28H27I25026C1W27625N26S27K1W28E26C25K21826J28P2181R24B25L2101R1R21Q29624B28J27E28M26C23O26C21027625E26428K26427H27028U27027H28428P28R26C23829U29S21W29Y28B26C22C2A127I29I28Q27525E23W28K23W27525I24428K24427526224C28K24C27H25O28E1W25O27529C28L29S29G2A826C29K29M29O29Q29S22S2A529W2B62A02AY27I26C26D2BA29H2A526S2AQ28W28628828A28C28E28G2AT27C1R2AV2A228O2BA28T28P28W28Y2901W29229429629829A29C27F2AW26C21N29J29L2BS29N28B29P28P29R2A22B52BE29X2BE2B929V26S2BD29V2A729J23828K29X2CH2AQ2CK2AU29E2AX2CD2B12CH2B32CL2B62CO29V2CQ29S25W2CT29S2CV27H2BH2BY2BQ28K2D42A12B02CF2B22CJ2B42DB2B82B624K2DH2A22DJ28B2DL28V27H28H2BT26O27726827623N23P23T23L26C26B27625023S23P23R23L24T23K27426C21W23X23P1N1824L26C2EB27524323P23X24026C28H26C24T24724O23V23P23K23L23K26C26M27624J23L24025323L24624223X2EN26C26T27625223L24423S2FR23P2402FF25324023V24623P23N2EG2EI2752FW23T23V2G224726C26A27624N2FZ23L23U2F526927625124123L2GT2GI2GK24623L2G12EG2FI27524I23X2GY2FN2FP2FO2ER27726W2DZ2772762HD2HE1K26326C2GQ2752G423P2462F52GJ27524N23W23P23U2G92HA27626S24K2GW2HM24123Q23T2F42HK27624H2HO23S24D2FH27A2BR2C928B26K27K21R28H27O28E1X27T27V27527X28425L27028129R28526S28828W25Q26C27D21H28R2DL21F28W25L22C29721Q2JC24B28C2752BT26E2EA2762F22I72HL26C24423R23P23S23S');local n=bit and bit.bxor or function(l,e)local o,n=1,0 while l>0 and e>0 do local c,a=l%2,e%2 if c~=a then n=n+o end l,e,o=(l-c)/2,(e-a)/2,o*2 end if l<e then l=e end while l>0 do local e=l%2 if e>0 then n=n+o end l,o=(l-e)/2,o*2 end return n end local function l(e,l,o)if o then local l=(e/2^(l-1))%2^((o-1)-(l-1)+1);return l-l%1;else local l=2^(l-1);return(e%(l+l)>=l)and 1 or 0;end;end;local e=1;local function o()local o,l,c,a=t(i,e,e+3);o=n(o,228)l=n(l,228)c=n(c,228)a=n(a,228)e=e+4;return(a*16777216)+(c*65536)+(l*256)+o;end;local function d()local l=n(t(i,e,e),228);e=e+1;return l;end;local function s()local e=o();local o=o();local c=1;local n=(l(o,1,20)*(2^32))+e;local e=l(o,21,31);local l=((-1)^l(o,32));if(e==0)then if(n==0)then return l*0;else e=1;c=0;end;elseif(e==2047)then return(n==0)and(l*(1/0))or(l*(0/0));end;return u(l,e-1023)*(c+(n/(2^52)));end;local a=o;local function r(l)local o;if(not l)then l=a();if(l==0)then return'';end;end;o=c(i,e,e+l-1);e=e+l;local e={}for l=1,#o do e[l]=f(n(t(c(o,l,l)),228))end return B(e);end;local e=o;local function f(...)return{...},C('#',...)end local function K()local t={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};local e={0};local c={};local a={t,nil,e,nil,c};for l=1,o()do e[l-1]=K();end;a[4]=d();for a=1,o()do local c=n(o(),47);local o=n(o(),196);local n=l(c,1,2);local e=l(o,1,11);local e={e,l(c,3,11),nil,nil,o};if(n==0)then e[3]=l(c,12,20);e[5]=l(c,21,29);elseif(n==1)then e[3]=l(o,12,33);elseif(n==2)then e[3]=l(o,12,32)-1048575;elseif(n==3)then e[3]=l(o,12,32)-1048575;e[5]=l(c,21,29);end;t[a]=e;end;local l=o()local o={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};for n=1,l do local e=d();local l;if(e==2)then l=(d()~=0);elseif(e==1)then l=s();elseif(e==0)then l=r();end;o[n]=l;end;a[2]=o return a;end;local function u(l,e,s)local e=l[1];local o=l[2];local c=l[3];local l=l[4];return function(...)local n=e;local a=o;local B=c;local c=l;local l=f local e=1;local f=-1;local i={};local d={...};local t=C('#',...)-1;local l={};local o={};for l=0,t do if(l>=c)then i[l-c]=d[l+1];else o[l]=d[l+1];end;end;local l=t-c+1 local l;local t;while true do l=n[e];t=l[1];if t<=15 then if t<=7 then if t<=3 then if t<=1 then if t>0 then if not o[l[2]]then e=e+1;else e=e+l[3];end;else do return end;end;elseif t==2 then local C;local t;local d;local r;local i;local c;o[l[2]]();f=c;e=e+1;l=n[e];o[l[2]]=s[a[l[3]]];e=e+1;l=n[e];c=l[2];i=o[l[3]];o[c+1]=i;o[c]=i[a[l[5]]];e=e+1;l=n[e];c=l[2];r={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;r[d]=o[l];end;C={o[c](h(r,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;o[l]=C[d];end;f=t;e=e+1;l=n[e];if o[l[2]]then e=e+1;else e=e+l[3];end;else o[l[2]]=o[l[3]][a[l[5]]];end;elseif t<=5 then if t==4 then local C;local t;local d;local r;local i;local c;c=l[2];i=o[l[3]];o[c+1]=i;o[c]=i[a[l[5]]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];c=l[2];r={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;r[d]=o[l];end;C={o[c](h(r,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;o[l]=C[d];end;f=t;e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];c=l[2];i=o[l[3]];o[c+1]=i;o[c]=i[a[l[5]]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];c=l[2];r={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;r[d]=o[l];end;o[c](h(r,1,t-c));f=c;e=e+1;l=n[e];o[l[2]]=s[a[l[3]]];e=e+1;l=n[e];c=l[2];i=o[l[3]];o[c+1]=i;o[c]=i[a[l[5]]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];c=l[2];r={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;r[d]=o[l];end;C={o[c](h(r,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;o[l]=C[d];end;f=t;e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];c=l[2];i=o[l[3]];o[c+1]=i;o[c]=i[a[l[5]]];e=e+1;l=n[e];c=l[2];r={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;r[d]=o[l];end;o[c](h(r,1,t-c));f=c;else if(o[l[2]]~=a[l[5]])then e=e+1;else e=e+l[3];end;end;elseif t==6 then if o[l[2]]then e=e+1;else e=e+l[3];end;else do return end;end;elseif t<=11 then if t<=9 then if t>8 then if o[l[2]]then e=e+1;else e=e+l[3];end;else o[l[2]]=a[l[3]];end;elseif t==10 then local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[a[l[5]]];else if not o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif t<=13 then if t>12 then o[l[2]]=s[a[l[3]]];else o[l[2]]=a[l[3]];end;elseif t==14 then o[l[2]]();f=A;else if(o[l[2]]~=a[l[5]])then e=e+1;else e=e+l[3];end;end;elseif t<=23 then if t<=19 then if t<=17 then if t==16 then o[l[2]]=u(B[l[3]],nil,s);else local C;local t;local d;local r;local i;local c;o[l[2]]();f=c;e=e+1;l=n[e];o[l[2]]=s[a[l[3]]];e=e+1;l=n[e];c=l[2];i=o[l[3]];o[c+1]=i;o[c]=i[a[l[5]]];e=e+1;l=n[e];c=l[2];r={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;r[d]=o[l];end;C={o[c](h(r,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;o[l]=C[d];end;f=t;e=e+1;l=n[e];if o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif t==18 then o[l[2]]=s[a[l[3]]];else local e=l[2];local c={};local n=0;local l=e+l[3]-1;for l=e+1,l do n=n+1;c[n]=o[l];end;o[e](h(c,1,l-e));f=e;end;elseif t<=21 then if t>20 then o[l[2]]=u(B[l[3]],nil,s);else e=e+l[3];end;elseif t==22 then local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[a[l[5]]];else local n=l[2];local c={};local e=0;local a=n+l[3]-1;for l=n+1,a do e=e+1;c[e]=o[l];end;local c={o[n](h(c,1,a-n))};local l=n+l[5]-2;e=0;for l=n,l do e=e+1;o[l]=c[e];end;f=l;end;elseif t<=27 then if t<=25 then if t==24 then local e=l[2];local c,n={o[e]()};local n=e+l[5]-2;local l=0;for e=e,n do l=l+1;o[e]=c[l];end;f=n;else o[l[2]]=o[l[3]][a[l[5]]];end;elseif t>26 then local C;local t;local d;local i;local r;local c;c=l[2];r=o[l[3]];o[c+1]=r;o[c]=r[a[l[5]]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];c=l[2];i={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;i[d]=o[l];end;C={o[c](h(i,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;o[l]=C[d];end;f=t;e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];c=l[2];r=o[l[3]];o[c+1]=r;o[c]=r[a[l[5]]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];c=l[2];i={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;i[d]=o[l];end;o[c](h(i,1,t-c));f=c;e=e+1;l=n[e];o[l[2]]=s[a[l[3]]];e=e+1;l=n[e];c=l[2];r=o[l[3]];o[c+1]=r;o[c]=r[a[l[5]]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];c=l[2];i={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;i[d]=o[l];end;C={o[c](h(i,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;o[l]=C[d];end;f=t;e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];c=l[2];r=o[l[3]];o[c+1]=r;o[c]=r[a[l[5]]];e=e+1;l=n[e];c=l[2];i={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;i[d]=o[l];end;o[c](h(i,1,t-c));f=c;e=e+1;l=n[e];o[l[2]]=s[a[l[3]]];e=e+1;l=n[e];c=l[2];r=o[l[3]];o[c+1]=r;o[c]=r[a[l[5]]];e=e+1;l=n[e];o[l[2]]=a[l[3]];e=e+1;l=n[e];c=l[2];i={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;i[d]=o[l];end;C={o[c](h(i,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;o[l]=C[d];end;f=t;e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][a[l[5]]];e=e+1;l=n[e];c=l[2];r=o[l[3]];o[c+1]=r;o[c]=r[a[l[5]]];e=e+1;l=n[e];c=l[2];i={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;i[d]=o[l];end;o[c](h(i,1,t-c));f=c;e=e+1;l=n[e];do return end;else o[l[2]]();f=A;end;elseif t<=29 then if t>28 then local n=l[2];local a={};local e=0;local c=n+l[3]-1;for l=n+1,c do e=e+1;a[e]=o[l];end;local c={o[n](h(a,1,c-n))};local l=n+l[5]-2;e=0;for l=n,l do e=e+1;o[l]=c[e];end;f=l;else local e=l[2];local c={};local n=0;local l=e+l[3]-1;for l=e+1,l do n=n+1;c[n]=o[l];end;o[e](h(c,1,l-e));f=e;end;elseif t==30 then e=e+l[3];else local e=l[2];local c,n={o[e]()};local n=e+l[5]-2;local l=0;for e=e,n do l=l+1;o[e]=c[l];end;f=n;end;e=e+1;end;end;end;return u(K(),{},H())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement