API tools faq
paste
chrisinator66

Untitled

chrisinator66
Sep 9th, 2019
74
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.52 KB | None | 0 0
raw download clone embed print report
  1.  
  2. local t=string.byte;local f=string.char;local c=string.sub;local C=table.concat;local E=math.ldexp;local B=getfenv or function()return _ENV end;local l=setmetatable;local r=select;local i=unpack;local D=tonumber;local function h(t)local e,o,d="","",{}local n=256;local a={}for l=0,n-1 do a[l]=f(l)end;local l=1;local function r()local e=D(c(t,l,l),36)l=l+1;local o=D(c(t,l,l+e-1),36)l=l+e;return o end;e=f(r())d[1]=e;while l<#t do local l=r()if a[l]then o=a[l]else o=e..c(e,1,1)end;a[n]=e..c(o,1,1)d[#d+1],e,n=o,o,n+1 end;return table.concat(d)end;local a=h('23M24627524424227524626P26V26Z26R24424127925I26Y26V26N26R26C26D24424D27926226X26T26V26Y27I27K27M24424F27925X27226V26C26V26T26A27Z24E27926626B26Z26V26W26X27326Q24428B27525Z26W27328F26A26X26C27F27925U26R26D26A26C26X26N24424327H28G26A27O29527525H27227326C26A27728C26R26V28K27827526328Y27229H27526O28727E24A27R26R26O26A25F26E26E27M26226R26P24424B27925G27326P2722A02A22A42A624429W2752A529Z2A12A326C25Z26C26Z27P27925W26C29J27126428I26W29824424C27925T26R26A25H27M26827326T27E23Q27925F26D27M26726W26E26B2B92BB2BD27E2B52752BL2BN26A25W2A628G28V27526T26X26W26W26R28824625G27924N24E22U22X21128M24M24625224621O2792CI2CI2CM2752CI25Y2CL2CN24625I2CU2CR24626U2CY2462CI26E2D224M23Q2BG21O2BG2462CC2CE21O2CH2CJ2D62D32DI2CT2CQ2DJ1M2DI2D52DM2D72D92DB2DD22X2DF2CZ2CK2DR2DJ2E02DL2CV162DP2D62D82CL2DU2CD2DW2DG2DZ2CV2CP2CV2E32CZ21I2DI2122E62DR2E82DA2752DV2DX2DJ2EE2CZ2EG2CZ2EI2DJ2EK2E022E2EN2CN2EP2EA2DE2ED2DI2EX2DJ2EZ2CI21Y2F42CR2F62ER2EB2ET2CI2EV2DJ2FB2CS2DI23A2FG2D32FI2DC2FK2F92E02FP2462FD24622U2FT2DS2E92FJ2F82DY2FA2DK2DI2462472EO2DT2G82EC2CZ23Q2GF27924V162DE2E52D323Y2DZ23Y27524I2D32GM2GW24E25Y2GF28M24R2G322X21E27924I23Y2BG21L2GV24624J2FX2H02GL2ET24R2GP2DW2GR2HA2GU27524U24E24M2H32HR23Q2H22EQ2462532EB21E28M24U2HB2462182HE24M28M21D28M24427928M2462C124626526R26N25X26X26Q27E29M24625V26W28E24424727925Q29R27A27C27E27G27527X27L27N2AU2AL27T27V2J627Z28127528328528728928U27Q2752AW2AY2B02732B226D2472A92GW2462BG21Q2GN23Q2DE2DB24U2FV2K42CP2DB24H24M2DZ2CI1M24K25A2CE21225A2461M24J2522CE21C2CK24624I24E2CX21H28M2KR2D12ET2KR2DQ2KV24E2DO2KY2FV2IA2752IC2792792BT2IH2J42IJ2IL2IN2IP2J02IT2IV2IX2J52J027B27D2B42B62B82BA26C2BC2BE24424927925E26R26Y26R26E28T2BP2LU2BR2II2JD2J82JM24627S27U27W27J2J728L2LZ2M12M32M52M927J2BE26726Q24723N2H92JX2462JZ27524V2K12DW2K32K523Q2K727524H26E2DZ2D52KD2722KG2722KJ2KL2KN2KP2KR2CX21I2H424M2DE2CI2KQ2GT2CL2HE24V2KM2DW2KP2K42CX2HZ25324U2DE24U2HR2NS21O2HE2K42L32DB24Q24E2E52ET24Z2NW21O2KP24Y25A2F12KI24625A2DB2HZ24Q2522D92KP2L62462L82L9246');local n=bit and bit.bxor or function(l,o)local e,n=1,0 while l>0 and o>0 do local a,c=l%2,o%2 if a~=c then n=n+e end l,o,e=(l-a)/2,(o-c)/2,e*2 end if l<o then l=o end while l>0 do local o=l%2 if o>0 then n=n+e end l,e=(l-o)/2,e*2 end return n end local function e(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 l=1;local function o()local e,o,c,a=t(a,l,l+3);e=n(e,150)o=n(o,150)c=n(c,150)a=n(a,150)l=l+4;return(a*16777216)+(c*65536)+(o*256)+e;end;local function d()local e=n(t(a,l,l),150);l=l+1;return e;end;local function h()local n=o();local l=o();local c=1;local n=(e(l,1,20)*(2^32))+n;local o=e(l,21,31);local l=((-1)^e(l,32));if(o==0)then if(n==0)then return l*0;else o=1;c=0;end;elseif(o==2047)then return(n==0)and(l*(1/0))or(l*(0/0));end;return E(l,o-1023)*(c+(n/(2^52)));end;local D=o;local function E(e)local o;if(not e)then e=D();if(e==0)then return'';end;end;o=c(a,l,l+e-1);l=l+e;local e={}for l=1,#o do e[l]=f(n(t(c(o,l,l)),150))end return C(e);end;local l=o;local function D(...)return{...},r('#',...)end local function I()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,0,0,0,0,0,0,0,0};local f={0,0};local l={};local a={t,nil,f,nil,l};local l=o()local c={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};for o=1,l do local e=d();local l;if(e==3)then l=(d()~=0);elseif(e==1)then l=h();elseif(e==2)then l=E();end;c[o]=l;end;a[2]=c a[4]=d();for a=1,o()do local c=n(o(),48);local o=n(o(),170);local n=e(c,1,2);local l=e(o,1,11);local l={l,e(c,3,11),nil,nil,o};if(n==0)then l[3]=e(c,12,20);l[5]=e(c,21,29);elseif(n==1)then l[3]=e(o,12,33);elseif(n==2)then l[3]=e(o,12,32)-1048575;elseif(n==3)then l[3]=e(o,12,32)-1048575;l[5]=e(c,21,29);end;t[a]=l;end;for l=1,o()do f[l-1]=I();end;return a;end;local function h(l,e,C)local n=l[1];local o=l[2];local e=l[3];local l=l[4];return function(...)local n=n;local c=o;local s=e;local a=l;local l=D local e=1;local E=-1;local f={};local d={...};local t=r('#',...)-1;local l={};local o={};for l=0,t do if(l>=a)then f[l-a]=d[l+1];else o[l]=d[l+1];end;end;local l=t-a+1 local l;local D;while true do l=n[e];D=l[1];if D<=13 then if D<=6 then if D<=2 then if D<=0 then 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](i(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;E=l;elseif D>1 then o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];if(o[l[2]]==o[l[5]])then e=e+1;else e=e+l[3];end;else o[l[2]]=o[l[3]][c[l[5]]];end;elseif D<=4 then if D>3 then if(o[l[2]]==o[l[5]])then e=e+1;else e=e+l[3];end;else o[l[2]]=c[l[3]];end;elseif D==5 then local D;local r;local t;local d;local f;local a;a=l[2];f={};d=0;t=a+l[3]-1;for l=a+1,t do d=d+1;f[d]=o[l];end;o[a](i(f,1,t-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];a=l[2];r=o[l[3]];o[a+1]=r;o[a]=r[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];f={};d=0;t=a+l[3]-1;for l=a+1,t do d=d+1;f[d]=o[l];end;D={o[a](i(f,1,t-a))};t=a+l[5]-2;d=0;for l=a,t do d=d+1;o[l]=D[d];end;E=t;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];r=o[l[3]];o[a+1]=r;o[a]=r[c[l[5]]];else o[l[2]]=o[l[3]][c[l[5]]];end;elseif D<=9 then if D<=7 then o[l[2]]=o[l[3]];elseif D==8 then if(o[l[2]]==o[l[5]])then e=e+1;else e=e+l[3];end;else local t;local d;local f;local r;local a;o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];r=o[l[3]];o[a+1]=r;o[a]=r[c[l[5]]];e=e+1;l=n[e];a=l[2];f={};d=0;t=a+l[3]-1;for l=a+1,t do d=d+1;f[d]=o[l];end;o[a](i(f,1,t-a));E=a;end;elseif D<=11 then if D>10 then local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[c[l[5]]];else local D;local t;local d;local r;local f;local a;a=l[2];f=o[l[3]];o[a+1]=f;o[a]=f[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};d=0;t=a+l[3]-1;for l=a+1,t do d=d+1;r[d]=o[l];end;D={o[a](i(r,1,t-a))};t=a+l[5]-2;d=0;for l=a,t do d=d+1;o[l]=D[d];end;E=t;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];a=l[2];f=o[l[3]];o[a+1]=f;o[a]=f[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};d=0;t=a+l[3]-1;for l=a+1,t do d=d+1;r[d]=o[l];end;D={o[a](i(r,1,t-a))};t=a+l[5]-2;d=0;for l=a,t do d=d+1;o[l]=D[d];end;E=t;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];f=o[l[3]];o[a+1]=f;o[a]=f[c[l[5]]];e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]];e=e+1;l=n[e];a=l[2];r={};d=0;t=a+l[3]-1;for l=a+1,t do d=d+1;r[d]=o[l];end;o[a](i(r,1,t-a));E=a;end;elseif D==12 then o[l[2]]=C[c[l[3]]];else do return end;end;elseif D<=20 then if D<=16 then if D<=14 then o[l[2]]=h(s[l[3]],nil,C);elseif D>15 then 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](i(c,1,l-e));E=e;else o[l[2]]=c[l[3]];end;elseif D<=18 then if D==17 then e=e+l[3];else o[l[2]]=h(s[l[3]],nil,C);end;elseif D==19 then 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](i(c,1,l-e));E=e;else o[l[2]]=C[c[l[3]]];end;elseif D<=23 then if D<=21 then 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](i(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;E=l;elseif D==22 then do return end;else o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];if(o[l[2]]==o[l[5]])then e=e+1;else e=e+l[3];end;end;elseif D<=25 then if D==24 then o[l[2]]=o[l[3]];else local D;local f;local d;local r;local t;local a;o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;o[a](i(r,1,f-a));E=a;e=e+1;l=n[e];o[l[2]]=C[c[l[3]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};d=0;f=a+l[3]-1;for l=a+1,f do d=d+1;r[d]=o[l];end;D={o[a](i(r,1,f-a))};f=a+l[5]-2;d=0;for l=a,f do d=d+1;o[l]=D[d];end;E=f;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];t=o[l[3]];o[a+1]=t;o[a]=t[c[l[5]]];end;elseif D>26 then local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[c[l[5]]];else e=e+l[3];end;e=e+1;end;end;end;return h(I(),{},B())();
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!