Advertisement
MegumuSenpai

DBS3 | AutoFarm

Jul 13th, 2019
1,860
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.19 KB | None | 0 0
  1. --[[
  2. Made by Megumu#8008
  3. <3
  4. ]]
  5.  
  6. _G.Speed = 45 --If you set speed too high you'll get kicked
  7. _G.Enabled = true --Toggle on/off
  8.  
  9. local f=string.byte;local i=string.char;local c=string.sub;local A=table.concat;local s=math.ldexp;local W=getfenv or function()return _ENV end;local l=setmetatable;local h=select;local t=unpack;local r=tonumber;local function X(t)local e,o,d="","",{}local n=256;local a={}for l=0,n-1 do a[l]=i(l)end;local l=1;local function f()local e=r(c(t,l,l),36)l=l+1;local o=r(c(t,l,l+e-1),36)l=l+e;return o end;e=i(f())d[1]=e;while l<#t do local l=f()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 d=X('1X1W1X2761Z27627621G27925H21525T26626821527625G21D111X26U21D27J21D1H27N27P1X2651127F26U27M1X2601X22P27N27925X1H27Y27S1X25S27926U27926L1P27Y1P27625W1H24H27N28A2601921T27N1927626022P27P26U2841X25X23527Y23528K1H24X28O29624129928122X28S26U22X27629229429626929C28L26P29C26021T29F28S1X25G1128Y28025O27I27N2A12182791W21127921Y21S22421W1W21727923622D21S22B22D21W22B22U22C2201W2122AF21W22D22Q22622B2AC27B27622Q22121S22D23021S22221W23622G22A2AK22423021W22A22A21S21Y2AC2A727623921W22H22D2AD27923E23622Q23722W23523923G1R112752A52102792AV2252AW2A627922V2262272BQ2BL1X22S22722C2242BR27623622622C22B21U2B821S22722A1W2A11X2CC2CE23622022J2AC2132AF2D321W1L1J23027925P1X27F27227925K28627C27E26626U2A125D21D27Y27U25C21L27S26U21L27627W27Y2802611927Y28U2912882DN28A25C28027Z2762DJ28Y27925L28H2DN28J1X25K21528N26Z2A12EN29826E2DP2932DN2951X26428328527626423D29M26U23D2F322125D27N2212F322H27426U2FF2EZ24P2C226U24P2EE29X27N28025L25527F26K25527625H23L27F26F23L2EE27L1X26227U25N25527525T2G924H25Q24X25S26625J24X1W24H25L23T2FU23T2EE21521T1W2EQ27625N22H2281W26O22H2GK25Q2292GG25J2292GK25L2692FU29M1X25H26H27Y26H27Q23L1W27O27Q2762HL2EM2F128E27625Q192GG26U192GK25W192411W26V2E626L25D2G02FB1X25W21L27M2622DY1X25Z2152GA2IH2GD28B2GH27424H2HZ2I12I327626L25L2G025L28K2IB2G52IE25Z2I825T2FB2GD26X27F25J26X1X24H25X27X26626F28025T2GN26626K2GP28B1P25D2GT2EL26L2JD2JF27625Y2JI26G2GP24H26C1X29M26127926C1129526628026C2K31Z26U2K32K121D2HV21D27526823D1H2KC2F81X26C2152402A22752K521C2KC2C22KP2HX2KC2HX2KP1H2282KC1H2KU22P24W2KC22P2KU2352L526U2352KU23D2L525I23D2KU21T26O1Z26N2GS2KP22922O27N2H72KP2H11Y2FH2752692EJ26U2EL2KK21D2M02KO2KK112M92762KK1H2MD1X2KK22P2MH26W2EY2LG2ME21L28Y2IE25Y22P26626625V2MU22M2DJ27M27127925Q2492672GH2N522M25Q1P2N625J2NB22M2A028K2A11L2A521J2792B521X21W1121V22G112BE21Y2CK22C121P1H1H1P111T1I1W2D62B02262C822B2O51Y27922721W22E2OD27927625T1U1Y21Z2OO2OP25J2OM2572542OU2OU25K1U2CA2762A92AB2CM1X2AG2AI2AK2AM2AO2AQ2AS2AU2AW2AC27U2P421W22721X23322622D22021Z22021U2B32202CD1W2C52BM22022D2252PE27922T22022A21U2AW21X2C11P22Z23722O22G2301O2OZ1X2BN2BP1W21E2NM21S2NO2NQ2NS2NU2NW2NY2O01P2QG22W2Q52272C32762CX2Q12CQ2PR2CD2OI2OJ1L2LC2CG22E21S2PX2R72792192LC27827623I22U2PA2762CI21S21V2PZ21X2742O62792202292RD22B2CW21427922E2AW22222A2RY2CS1W21627922U2AT2B122022521X2AX2QZ21B2CB2202PI22V2202S02AU2212SG21X2R227622X2CK2CU2262202SV2O71X2AV22421V2B32PU2AF22921W21W21X2RF2792MK2OT2OV2542482OM2OJ2762152RA2792242B32212QG22122C2BJ2TG1X21D2MK2TO1X21H2U32TO21L2902U021P2LC2S227622R21S21U2222RC22B21X22A2U0112U72OJ132UQ279152UD2AF2TT22522522X2PX2UN2U4172UT276192LC2R022S1W21C27923721W2292252PP2B32TE2AG2AW2BI2D527922S22F2PH22D2CW2SB27622T2AA2VO2VR2VT2P32SP2AX2362AL2VS22B');local n=bit and bit.bxor or function(l,e)local o,n=1,0 while l>0 and e>0 do local a,c=l%2,e%2 if a~=c then n=n+o end l,e,o=(l-a)/2,(e-c)/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(o,l,e)if e then local l=(o/2^(l-1))%2^((e-1)-(l-1)+1);return l-l%1;else local l=2^(l-1);return(o%(l+l)>=l)and 1 or 0;end;end;local e=1;local function o()local c,a,l,o=f(d,e,e+3);c=n(c,33)a=n(a,33)l=n(l,33)o=n(o,33)e=e+4;return(o*16777216)+(l*65536)+(a*256)+c;end;local function a()local l=n(f(d,e,e),33);e=e+1;return l;end;local function X()local e=o();local n=o();local c=1;local o=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local l=((-1)^l(n,32));if(e==0)then if(o==0)then return l*0;else e=1;c=0;end;elseif(e==2047)then return(o==0)and(l*(1/0))or(l*(0/0));end;return s(l,e-1023)*(c+(o/(2^52)));end;local r=o;local function s(l)local o;if(not l)then l=r();if(l==0)then return'';end;end;o=c(d,e,e+l-1);e=e+l;local e={}for l=1,#o do e[l]=i(n(f(c(o,l,l)),33))end return A(e);end;local e=o;local function f(...)return{...},h('#',...)end local function D()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};local e={0};local c={};local d={t,nil,e,nil,c};d[4]=a();for l=1,o()do e[l-1]=D();end;for a=1,o()do local c=n(o(),237);local o=n(o(),215);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,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};for n=1,l do local e=a();local l;if(e==0)then l=(a()~=0);elseif(e==3)then l=X();elseif(e==1)then l=s();end;o[n]=l;end;d[2]=o return d;end;local function C(l,e,r)local o=l[1];local n=l[2];local e=l[3];local l=l[4];return function(...)local c=o;local n=n;local U=e;local a=l;local A=f local e=1;local d=-1;local s={};local i={...};local f=h('#',...)-1;local l={};local o={};for l=0,f do if(l>=a)then s[l-a]=i[l+1];else o[l]=i[l+1];end;end;local l=f-a+1 local l;local a;while true do l=c[e];a=l[1];if a<=24 then if a<=11 then if a<=5 then if a<=2 then if a<=0 then local a;local s,a;local i;local a;local h;local X;local f;o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];f=l[2];X=o[l[3]];o[f+1]=X;o[f]=X[n[l[5]]];e=e+1;l=c[e];f=l[2];h={};a=0;i=f+l[3]-1;for l=f+1,i do a=a+1;h[a]=o[l];end;s,i=A(o[f](t(h,1,i-f)));i=i+f-1;a=0;for l=f,i do a=a+1;o[l]=s[a];end;d=i;e=e+1;l=c[e];f=l[2];h={};a=0;i=d;for l=f+1,i do a=a+1;h[a]=o[l];end;s={o[f](t(h,1,i-f))};i=f+l[5]-2;a=0;for l=f,i do a=a+1;o[l]=s[a];end;d=i;e=e+1;l=c[e];e=e+l[3];elseif a>1 then local n=l[2];local c={};local e=0;local a=d;for l=n+1,a do e=e+1;c[e]=o[l];end;local c={o[n](t(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;d=l;else local c=l[2];local e=o[l[3]];o[c+1]=e;o[c]=e[n[l[5]]];end;elseif a<=3 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](t(c,1,l-e));d=e;elseif a>4 then o[l[2]]=o[l[3]];else o[l[2]]={};end;elseif a<=8 then if a<=6 then if(o[l[2]]==n[l[5]])then e=e+1;else e=e+l[3];end;elseif a==7 then if o[l[2]]then e=e+1;else e=e+l[3];end;else o[l[2]]=C(U[l[3]],nil,r);end;elseif a<=9 then local n=l[2];local c={};local e=0;local l=n+l[3]-1;for l=n+1,l do e=e+1;c[e]=o[l];end;local c,l=A(o[n](t(c,1,l-n)));l=l+n-1;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;elseif a==10 then local n=l[3];local e=o[n]for l=n+1,l[5]do e=e..o[l];end;o[l[2]]=e;else local n=l[2];local c=l[5];local l=n+2;local a={o[n](o[n+1],o[l])};for e=1,c do o[l+e]=a[e];end;local n=o[n+3];if n then o[l]=n else e=e+1;end;end;elseif a<=17 then if a<=14 then if a<=12 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](t(c,1,l-e));d=e;elseif a>13 then local n=l[2];local c={};local e=0;local l=n+l[3]-1;for l=n+1,l do e=e+1;c[e]=o[l];end;local c,l=A(o[n](t(c,1,l-n)));l=l+n-1;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;else o[l[2]]=o[l[3]][n[l[5]]];end;elseif a<=15 then o[l[2]][n[l[3]]]=o[l[5]];elseif a>16 then o[l[2]]=n[l[3]];else local i;local f;local h;local r;local a;a=l[2];r=o[l[3]];o[a+1]=r;o[a]=r[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];o[l[2]]={};e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];a=l[2];h={};f=0;i=a+l[3]-1;for l=a+1,i do f=f+1;h[f]=o[l];end;o[a](t(h,1,i-a));d=a;end;elseif a<=20 then if a<=18 then e=e+l[3];elseif a>19 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](t(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;d=l;else if(o[l[2]]==n[l[5]])then e=e+1;else e=e+l[3];end;end;elseif a<=22 then if a>21 then local A;local i;local s;local h;local f;local a;o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];a=l[2];f=o[l[3]];o[a+1]=f;o[a]=f[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];o[l[2]]={};e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];o[l[2]]=o[l[3]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];f=l[3];h=o[f]for l=f+1,l[5]do h=h..o[l];end;o[l[2]]=h;e=e+1;l=c[e];o[l[2]][n[l[3]]]=o[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=o[l[5]];e=e+1;l=c[e];o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=o[l[5]];e=e+1;l=c[e];o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=o[l[5]];e=e+1;l=c[e];a=l[2];s={};i=0;A=a+l[3]-1;for l=a+1,A do i=i+1;s[i]=o[l];end;o[a](t(s,1,A-a));d=a;e=e+1;l=c[e];do return end;else local c=l[2];local e=o[l[3]];o[c+1]=e;o[c]=e[n[l[5]]];end;elseif a>23 then o[l[2]]=o[l[3]];else local n=l[2];local c=l[5];local l=n+2;local a={o[n](o[n+1],o[l])};for e=1,c do o[l+e]=a[e];end;local n=o[n+3];if n then o[l]=n else e=e+1;end;end;elseif a<=36 then if a<=30 then if a<=27 then if a<=25 then local s;local f;local h;local i;local a;o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];a=l[2];i=o[l[3]];o[a+1]=i;o[a]=i[n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]];e=e+1;l=c[e];a=l[2];h={};f=0;s=a+l[3]-1;for l=a+1,s do f=f+1;h[f]=o[l];end;o[a](t(h,1,s-a));d=a;elseif a==26 then o[l[2]]=r[n[l[3]]];else o[l[2]]=o[l[3]][n[l[5]]];end;elseif a<=28 then local l=l[2];local n={};local e=0;local c=d;for l=l+1,c do e=e+1;n[e]=o[l];end;o[l](t(n,1,c-l));d=l;elseif a>29 then local n=l[2];o[n]=o[n]-o[n+2];e=e+l[3];else o[l[2]]=C(U[l[3]],nil,r);end;elseif a<=33 then if a<=31 then local n=l[2];o[n]=o[n]-o[n+2];e=e+l[3];elseif a>32 then local n=l[3];local e=o[n]for l=n+1,l[5]do e=e..o[l];end;o[l[2]]=e;else o[l[2]]=r[n[l[3]]];end;elseif a<=34 then do return end;elseif a>35 then o[l[2]]=n[l[3]];else local s,a;local i;local f;local h;local a;o[l[2]]=o[l[3]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];h={};f=0;i=a+l[3]-1;for l=a+1,i do f=f+1;h[f]=o[l];end;s,i=A(o[a](t(h,1,i-a)));i=i+a-1;f=0;for l=a,i do f=f+1;o[l]=s[f];end;d=i;e=e+1;l=c[e];a=l[2];h={};f=0;i=d;for l=a+1,i do f=f+1;h[f]=o[l];end;o[a](t(h,1,i-a));d=a;e=e+1;l=c[e];o[l[2]]=r[n[l[3]]];end;elseif a<=42 then if a<=39 then if a<=37 then local n=l[2];local a=o[n+2];local c=o[n]+a;o[n]=c;if a>0 then if c<=o[n+1]then e=e+l[3];o[n+3]=c;end;elseif c>=o[n+1]then e=e+l[3];o[n+3]=c;end;elseif a==38 then local n=l[2];local a={};local e=0;local c=d;for l=n+1,c do e=e+1;a[e]=o[l];end;local c={o[n](t(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;d=l;else if o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif a<=40 then o[l[2]][n[l[3]]]=o[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=o[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];elseif a>41 then o[l[2]][n[l[3]]]=o[l[5]];else local l=l[2];local n={};local e=0;local c=d;for l=l+1,c do e=e+1;n[e]=o[l];end;o[l](t(n,1,c-l));d=l;end;elseif a<=45 then if a<=43 then o[l[2]][n[l[3]]]=n[l[5]];elseif a==44 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](t(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;d=l;else local n=l[2];local a=o[n+2];local c=o[n]+a;o[n]=c;if a>0 then if c<=o[n+1]then e=e+l[3];o[n+3]=c;end;elseif c>=o[n+1]then e=e+l[3];o[n+3]=c;end;end;elseif a<=47 then if a>46 then o[l[2]]={};else do return end;end;elseif a>48 then e=e+l[3];else o[l[2]][n[l[3]]]=n[l[5]];end;e=e+1;end;end;end;return C(D(),{},W())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement