Advertisement
MegumuSenpai

Zombie Strike | Always Headshot

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