Advertisement
MegumuSenpai

Street Kings | Health AutoFarm

Jul 24th, 2019
2,096
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.58 KB | None | 0 0
  1. --[[
  2. Made by Megumu#8008
  3. <3
  4. ]]
  5.  
  6. local f=string.byte;local i=string.char;local c=string.sub;local D=table.concat;local s=math.ldexp;local F=getfenv or function()return _ENV end;local l=setmetatable;local r=select;local d=unpack;local h=tonumber;local function u(d)local e,o,n="","",{}local a=256;local t={}for l=0,a-1 do t[l]=i(l)end;local l=1;local function f()local e=h(c(d,l,l),36)l=l+1;local o=h(c(d,l,l+e-1),36)l=l+e;return o end;e=i(f())n[1]=e;while l<#d do local l=f()if t[l]then o=t[l]else o=e..c(e,1,1)end;t[a]=e..c(o,1,1)n[#n+1],e,a=o,o,a+1 end;return table.concat(n)end;local t=u('25127425124T27525324X27525U25W26025S25324Y27526D26125W25O25S25J25I25325A27526X26225Y25W26127J27L27N25325427I27K27M25J26E25Y25J26425H25D27P24Z27526U26126425S26325D25324W27525Y26025W26426327G27525J25S25G25C26428W28M27525T25W25D25C26025328E27426E26425U26327W25027527521X23U25325B27526Q25S25D26E27N25F26425Y27F29N29B25D25W25J25D27N26Q28Z28U29B29Q26U26229124L27529S26325T26Z26225D26425V29V29526426228T28N27426926425D26127F2AD27426P26425I25Y2AB25T23Z24523X27326F26S25O26W23W27927526925S25P28L24M27526W25W25T25S24525Z25O24526W25S25U29725C24623X23P23P23X25325927526P25C25J2AO2AQ29H29I25126Z26T2BG27425E28R28L29Y25126R29025S29S25J25F2802C72742BW2AX25S2712AV2CE2CF27424F27523925921X2222582CX23825124525124J2752DF23P2DI2DK25126T2DN2742DF26D2DR2512DF25X2DV23523X2DB24J23X27423G2752DJ27423424L2DH24J2AZ23425921H2DI2CX2EA2DH2532AZ23G2592112512552CX23C2512AD2E825122T2DA22224J2CX22S2452EC2DH2512F42DM24J2F723C26D2DQ24J2DU2EY2F02F22742F4152DI2F723125X2E22DY2F824T2EC2772F824522T2512522FP25H2DB24M25H27422W2512FA27522W25P25125024J2GE25122W21P2452GG21P2G821926T2GG2192FL2452EW2F722T1T2DB2511T2FL2592DH24K2CX22V27127424Q2H921H23A26T2DB23M2DQ21H22S24L25X2502522AZ2311D2DB24O1D2G82CX2FK25122C2FX24J2FX2292392E223927422K2E727522G26L27424J2IC2F826T2EW2DQ25123A2112222F12IM25M2382CX23L2CX');local n=bit and bit.bxor or function(l,o)local e,n=1,0 while l>0 and o>0 do local c,a=l%2,o%2 if c~=a then n=n+e end l,o,e=(l-c)/2,(o-a)/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 o,e,a,c=f(t,l,l+3);o=n(o,181)e=n(e,181)a=n(a,181)c=n(c,181)l=l+4;return(c*16777216)+(a*65536)+(e*256)+o;end;local function a()local e=n(f(t,l,l),181);l=l+1;return e;end;local function X()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 s(l,o-1023)*(c+(n/(2^52)));end;local h=o;local function s(e)local o;if(not e)then e=h();if(e==0)then return'';end;end;o=c(t,l,l+e-1);l=l+e;local e={}for l=1,#o do e[l]=i(n(f(c(o,l,l)),181))end return D(e);end;local l=o;local function f(...)return{...},r('#',...)end local function u()local d={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 l={};local c={};local t={d,nil,l,nil,c};for e=1,o()do l[e-1]=u();end;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,0,0,0,0};for o=1,l do local e=a();local l;if(e==3)then l=(a()~=0);elseif(e==1)then l=X();elseif(e==2)then l=s();end;c[o]=l;end;t[2]=c t[4]=a();for a=1,o()do local c=n(o(),193);local o=n(o(),22);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;d[a]=l;end;return t;end;local function X(l,e,i)local n=l[1];local o=l[2];local e=l[3];local l=l[4];return function(...)local a=n;local n=o;local e=e;local c=l;local l=f local e=1;local t=-1;local h={};local f={...};local r=r('#',...)-1;local l={};local o={};for l=0,r do if(l>=c)then h[l-c]=f[l+1];else o[l]=f[l+1];end;end;local l=r-c+1 local l;local c;while true do l=a[e];c=l[1];if c<=17 then if c<=8 then if c<=3 then if c<=1 then if c==0 then e=e+l[3];else o[l[2]][n[l[3]]]=o[l[5]];end;elseif c==2 then for l=l[2],l[3]do o[l]=nil;end;else o[l[2]]=n[l[3]];end;elseif c<=5 then if c>4 then local i;local f;local r;local c;o[l[2]]=n[l[3]];e=e+1;l=a[e];o[l[2]]={};e=e+1;l=a[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=a[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=a[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=a[e];c=l[2];r={};f=0;i=c+l[3]-1;for l=c+1,i do f=f+1;r[f]=o[l];end;o[c](d(r,1,i-c));t=c;else o[l[2]]=n[l[3]];end;elseif c<=6 then o[l[2]]=o[l[3]][n[l[5]]];elseif c==7 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;t=n;else o[l[2]]=(l[3]~=0);end;elseif c<=12 then if c<=10 then if c>9 then do return end;else if o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif c>11 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](d(c,1,l-e));t=e;else local i;local f;local r;local c;o[l[2]]=n[l[3]];e=e+1;l=a[e];o[l[2]]=(l[3]~=0);e=e+1;l=a[e];o[l[2]]=o[l[3]];e=e+1;l=a[e];o[l[2]]=n[l[3]];e=e+1;l=a[e];o[l[2]]=(l[3]~=0);e=e+1;l=a[e];for l=l[2],l[3]do o[l]=nil;end;e=e+1;l=a[e];c=l[2];r={};f=0;i=c+l[3]-1;for l=c+1,i do f=f+1;r[f]=o[l];end;o[c](d(r,1,i-c));t=c;e=e+1;l=a[e];e=e+l[3];end;elseif c<=14 then if c>13 then o[l[2]]={};else o[l[2]][n[l[3]]]=n[l[5]];end;elseif c<=15 then o[l[2]]={};elseif c>16 then o[l[2]][n[l[3]]]=n[l[5]];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;t=n;end;elseif c<=26 then if c<=21 then if c<=19 then if c==18 then o[l[2]]=o[l[3]][n[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](d(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;t=l;end;elseif c==20 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](d(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;t=l;else local e=l[2];local c=o[l[3]];o[e+1]=c;o[e]=c[n[l[5]]];end;elseif c<=23 then if c==22 then o[l[2]]=i[n[l[3]]];else o[l[2]]=o[l[3]];end;elseif c<=24 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](d(c,1,l-e));t=e;elseif c==25 then for l=l[2],l[3]do o[l]=nil;end;else local D;local r;local f;local s;local h;local c;o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]={};e=e+1;l=a[e];o[l[2]]=i[n[l[3]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]][n[l[3]]]=o[l[5]];e=e+1;l=a[e];o[l[2]]=i[n[l[3]]];e=e+1;l=a[e];c=l[2];h=o[l[3]];o[c+1]=h;o[c]=h[n[l[5]]];e=e+1;l=a[e];o[l[2]]=n[l[3]];e=e+1;l=a[e];c=l[2];s={};f=0;r=c+l[3]-1;for l=c+1,r do f=f+1;s[f]=o[l];end;D={o[c](d(s,1,r-c))};r=c+l[5]-2;f=0;for l=c,r do f=f+1;o[l]=D[f];end;t=r;end;elseif c<=30 then if c<=28 then if c==27 then o[l[2]]=i[n[l[3]]];else o[l[2]]=(l[3]~=0);end;elseif c>29 then local e=l[2];local c=o[l[3]];o[e+1]=c;o[e]=c[n[l[5]]];else if o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif c<=32 then if c==31 then local s;local D;local r;local f;local h;local c;o[l[2]]=i[n[l[3]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]=i[n[l[3]]];e=e+1;l=a[e];o[l[2]]=o[l[3]];e=e+1;l=a[e];c=l[2];h={};f=0;r=c+l[3]-1;for l=c+1,r do f=f+1;h[f]=o[l];end;D={o[c](d(h,1,r-c))};r=c+l[5]-2;f=0;for l=c,r do f=f+1;o[l]=D[f];end;t=r;e=e+1;l=a[e];c=l[2];s=o[l[3]];o[c+1]=s;o[c]=s[n[l[5]]];else o[l[2]][n[l[3]]]=o[l[5]];end;elseif c<=33 then e=e+l[3];elseif c==34 then do return end;else o[l[2]]=o[l[3]];end;e=e+1;end;end;end;return X(u(),{},F())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement