Advertisement
MegumuSenpai

D-Day | Headshot Only

Nov 30th, 2019
14,804
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.47 KB | None | 0 0
  1. --[[
  2. Made by Megumu, Purity, Kelli King & Mommy Mango
  3. <3
  4. ]]
  5.  
  6. local t=string.byte;local f=string.char;local c=string.sub;local h=table.concat;local F=math.ldexp;local s=getfenv or function()return _ENV end;local l=setmetatable;local i=select;local r=unpack;local C=tonumber;local function G(t)local e,o,d="","",{}local a=256;local n={}for l=0,a-1 do n[l]=f(l)end;local l=1;local function r()local e=C(c(t,l,l),36)l=l+1;local o=C(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 n[l]then o=n[l]else o=e..c(e,1,1)end;n[a]=e..c(o,1,1)d[#d+1],e,a=o,o,a+1 end;return table.concat(d)end;local a=G('21V22G27523D22824O24N23U22827523F1O27523P27F26023E22O27924C22O22G26023D22027923U22027523C22823C22G24E27C22G23H23C27923Q27Z22G23C21S27V23Q21S27627S24N23Q27V28927Y22G23Q28223H22W28622W27W23428C23427627L27A27O2831O27923L27F28922027Z28I27523H1G2861G27528W27523Q27522G23G22028C28J23G22G26W28M29J23521S28628E22G239102861027522X21K28621K27523829728M28J22W2822412822A927524228J28W27Z23N29J23C1827Z24F1827W28224428229J27522C2AY22329J181A1N1C1N1B1L1P1B1G1T1A171K1N1P1S1T1S22G22N29J21R21P2182BQ21I21A22G22B29J21I21P21B21N21N21G21J21721921621P22G28J22G21421621J21821P21N2181721Q21921I2CI21D21J21I22G2212BP2BR21I21L21H2CH21L21G21G2CY21821C21J21O22G2B22752BQ2CJ2CW2CY21N2D021G172D32D52D722F2CU21821621L21B2D321L21821L21M21G2C922K2BP2CX2C922E29J21H21L21F21P1721B21621D2CG2DV2DX22G22A29J17172DD2CZ2D12EG29J2C421L21O2172DO21D21I21R22G24P22H27W23C2F22C42DF21G23C21J21G21O23C22T23C23A2FE22A2F22F22C82182C721I23C2CL2CN2182CP21I23421721P21G21Q2382FD2FE2352FG2FH2G32F42D023C2DX2FM2FC2FU2DX2CI23423E23F23E2FY2FE23A2G12G32G421J2F523C21421L21N21F2FB23C1Z2GJ2112G22GM2G72GO2G621L21621R2172GV1Z2GZ2H12F221Q21J21623C21D22T22X2382G823C21O21J2H02HC2F22H52H71321D152GV2GR2GT2HV152HQ2G321P21I21O2I32FH2G52F62DJ2D62GV2DB2EL2F52D22BR2DK2342GL2HC21D21Q23C2IC2FA22T2FC23E1U21D2C81B21P21621A2J023E23C21L2I623C2182C52EU2EW2FT2FV21Q2352FB2IU1P2182CG21H2142CJ2IW2C82J42J62FA2181X21421P21J21Q2342HT2171322Y152JG2IT23C23E1H21I2ET2J621N21P2J42D42I522A2292KK2142IH2342FO2CO2CQ2IL2KJ2KK2292K12K32HX2FC2KW2K423A182H52I521823A1G21P2ER2KT2292I521O2G12KU2FJ2FL2F72F92JD2FW2FY2CM2HZ21F2K02H62172352LF2LC2I62I82FI2BR2LI2F821O2LL2FX2FZ2GK2HQ2LD22A');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 a,o,c,e=t(a,l,l+3);a=n(a,88)o=n(o,88)c=n(c,88)e=n(e,88)l=l+4;return(e*16777216)+(c*65536)+(o*256)+a;end;local function d()local e=n(t(a,l,l),88);l=l+1;return e;end;local function C()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 F(l,o-1023)*(c+(n/(2^52)));end;local F=o;local function G(e)local o;if(not e)then e=F();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)),88))end return h(e);end;local l=o;local function u(...)return{...},i('#',...)end local function h()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};local f={};local l={};local a={t,nil,f,nil,l};for a=1,o()do local c=n(o(),32);local o=n(o(),222);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;a[4]=d();for l=1,o()do f[l-1]=h();end;local l=o()local o={0,0,0,0,0,0,0,0,0,0,0,0};for n=1,l do local e=d();local l;if(e==3)then l=(d()~=0);elseif(e==2)then l=C();elseif(e==0)then l=G();end;o[n]=l;end;a[2]=o return a;end;local function F(l,e,C)local e=l[1];local o=l[2];local n=l[3];local l=l[4];return function(...)local t=e;local a=o;local e=n;local n=l;local h=u local o=1;local d=-1;local G={};local c={...};local f=i('#',...)-1;local l={};local e={};for l=0,f do if(l>=n)then G[l-n]=c[l+1];else e[l]=c[l+1];end;end;local l=f-n+1 local l;local n;while true do l=t[o];n=l[1];if n<=13 then if n<=6 then if n<=2 then if n<=0 then local o=l[2];local c,n={e[o]()};local n=o+l[5]-2;local l=0;for o=o,n do l=l+1;e[o]=c[l];end;d=n;elseif n==1 then e[l[2]]=e[l[3]][a[l[5]]];else e[l[2]]=a[l[3]];end;elseif n<=4 then if n==3 then if e[l[2]]then o=o+1;else o=o+l[3];end;else local n=l[2];local a={};local o=0;local c=d;for l=n+1,c do o=o+1;a[o]=e[l];end;local c={e[n](r(a,1,c-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;d=l;end;elseif n==5 then local n=l[2];local a={};local o=0;local c=d;for l=n+1,c do o=o+1;a[o]=e[l];end;local c={e[n](r(a,1,c-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;d=l;else local n=l[2];local a={};local o=0;local c=n+l[3]-1;for l=n+1,c do o=o+1;a[o]=e[l];end;local c={e[n](r(a,1,c-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;d=l;end;elseif n<=9 then if n<=7 then local G;local f;local n;local i;local c;e[l[2]]=C[a[l[3]]];o=o+1;l=t[o];c=l[2];i={};n=0;f=c+l[3]-1;for l=c+1,f do n=n+1;i[n]=e[l];end;G={e[c](r(i,1,f-c))};f=c+l[5]-2;n=0;for l=c,f do n=n+1;e[l]=G[n];end;d=f;o=o+1;l=t[o];e[l[2]]=C[a[l[3]]];o=o+1;l=t[o];e[l[2]]=e[l[3]];o=o+1;l=t[o];c=l[2];i={};n=0;f=c+l[3]-1;for l=c+1,f do n=n+1;i[n]=e[l];end;e[c](r(i,1,f-c));d=c;o=o+1;l=t[o];e[l[2]]=e[l[3]][a[l[5]]];o=o+1;l=t[o];e[l[2]]=C[a[l[3]]];o=o+1;l=t[o];e[l[2]]=C[a[l[3]]];o=o+1;l=t[o];e[l[2]]=a[l[3]];o=o+1;l=t[o];c=l[2];i={};n=0;f=c+l[3]-1;for l=c+1,f do n=n+1;i[n]=e[l];end;G={e[c](r(i,1,f-c))};f=c+l[5]-2;n=0;for l=c,f do n=n+1;e[l]=G[n];end;d=f;elseif n==8 then local n=l[2];local c={};local o=0;local l=n+l[3]-1;for l=n+1,l do o=o+1;c[o]=e[l];end;local c,l=h(e[n](r(c,1,l-n)));l=l+n-1;o=0;for l=n,l do o=o+1;e[l]=c[o];end;d=l;else e[l[2]]=e[l[3]];end;elseif n<=11 then if n>10 then if e[l[2]]then o=o+1;else o=o+l[3];end;else local o=l[2];local c,n={e[o]()};local n=o+l[5]-2;local l=0;for o=o,n do l=l+1;e[o]=c[l];end;d=n;end;elseif n==12 then e[l[2]]=C[a[l[3]]];else do return end;end;elseif n<=20 then if n<=16 then if n<=14 then e[l[2]][a[l[3]]]=e[l[5]];elseif n==15 then local o=l[2];local c={};local n=0;local l=o+l[3]-1;for l=o+1,l do n=n+1;c[n]=e[l];end;e[o](r(c,1,l-o));d=o;else o=o+l[3];end;elseif n<=18 then if n>17 then do return end;else e[l[2]]=C[a[l[3]]];end;elseif n>19 then local n=l[2];local c={};local o=0;local l=n+l[3]-1;for l=n+1,l do o=o+1;c[o]=e[l];end;local c,l=h(e[n](r(c,1,l-n)));l=l+n-1;o=0;for l=n,l do o=o+1;e[l]=c[o];end;d=l;else e[l[2]]=a[l[3]];end;elseif n<=23 then if n<=21 then local o=l[2];local c={};local n=0;local l=o+l[3]-1;for l=o+1,l do n=n+1;c[n]=e[l];end;e[o](r(c,1,l-o));d=o;elseif n==22 then e[l[2]]=e[l[3]][a[l[5]]];else e[l[2]]=e[l[3]];end;elseif n<=25 then if n>24 then e[l[2]][a[l[3]]]=e[l[5]];else local n;local c;local r,f;local c;c=l[2];r,f={e[c]()};f=c+l[5]-2;n=0;for l=c,f do n=n+1;e[l]=r[n];end;d=f;o=o+1;l=t[o];e[l[2]]=C[a[l[3]]];o=o+1;l=t[o];e[l[2]][a[l[3]]]=e[l[5]];o=o+1;l=t[o];e[l[2]]=C[a[l[3]]];o=o+1;l=t[o];c=l[2];r,f={e[c]()};f=c+l[5]-2;n=0;for l=c,f do n=n+1;e[l]=r[n];end;d=f;o=o+1;l=t[o];e[l[2]]=C[a[l[3]]];o=o+1;l=t[o];e[l[2]][a[l[3]]]=e[l[5]];end;elseif n>26 then local n=l[2];local a={};local o=0;local c=n+l[3]-1;for l=n+1,c do o=o+1;a[o]=e[l];end;local c={e[n](r(a,1,c-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;d=l;else o=o+l[3];end;o=o+1;end;end;end;return F(h(),{},s())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement