From venuslock, 2 Months ago, written in Plain Text.
Embed
  1. --those who remain script, auto farm
  2. --[[
  3.         Made by Megumu/Purity/Mommy Mango
  4.         <3
  5. ]]
  6.  
  7. local f=string.byte;local t=string.char;local c=string.sub;local J=table.concat;local N=math.ldexp;local H=getfenv or function()return _ENV end;local F=setmetatable;local h=select;local i=unpack;local r=tonumber;local function s(f)local e,o,n="","",{}local d=256;local a={}for l=0,d-1 do a[l]=t(l)end;local l=1;local function i()local e=r(c(f,l,l),36)l=l+1;local o=r(c(f,l,l+e-1),36)l=l+e;return o end;e=t(i())n[1]=e;while l<#f do local l=i()if a[l]then o=a[l]else o=e..c(e,1,1)end;a[d]=e..c(o,1,1)n[#n+1],e,d=o,o,d+1 end;return table.concat(n)end;local a=s('26I26J27527427527826J26N27826H26M27824B23U23M24924826H27B27524F24224B23Y27D27824F23U23T23R27R26L27823M23P24823Y24924F26I27227826426B1R1K1426B27525T2781G27826526Z24R26J21H26Z27526323N28C1H23N26J22Z25C26Z28C1428Q26J25H25F2751G29626J25D26Z25N28O29325E25N26326J21629D22Z26326R28U26R28X25D27821R27829529729929B28Q21P29326325N28U29L25C29O28D29Q29A26328N1J29I29428F26J21R2AH26X29929827525D26R2A02AA26526J29D172782632431K1K1H2AZ2442612AH21I2AH27926I26A28K27821M27825U1J25G26J1F1J1K2B42931L2932B52751L2AH25X29321729325L2781Q2782BV28Q1Q29328L2752C52752BR26J1Q2AH26Y27C26W27825725524K25B24K25424M24Q25424J24U25525024N24K24Q24V24U24V26H26K27823W23Y24F2D523P24D26H26827823P23Y24C23S23S23R23O24824E24927R29326J24B24923O24F23Y23S24F25023X24E23P2DW23M23O23P26H2CF2752D524F23P23U23Q2DV23U23R23R2ED24F23N23O23Z26H2CH2E82D62502EB2ED23S2EF23R2502EI2EK2EM2692782DJ23U23Z24824F24928123W27L2D42EC27R2D327524J24F24F24B24S2D626H25M27823N2FI24B24825T25G25G27G2F623Y23T28125H23S23O23Q25G24923U24C25G24D24H23W26525423U25V24C26H26D2D42D624V23Y24823S23Y23P23Z23U23P24F27K27E2752DR28124F26H26P2782CP2CZ25N24P24Y25N25725A25524I25B24Y25J25N24U24Q25B25N24M2HA2CQ25426H26C2GL2F72G82EI23U27U27W27R2GK27523Q23U23K23Y25024C2F82DU27V27X26H2F12752502ER2FD2EU2EG26H26Z26G27525N2IQ25N2DJ2IK25N23O23R23Z25N25Y25N25H2J22692IR25N2DN24F2DM23P25N2DZ2E124F2E323P25F28323R23X2HI2J225H25E2J42J52IR2IT2EF2IS2GR2IZ25N2JI2DV24F25F25L25K25L2JL2J22JO2JQ2JR23O2IU27G23S23K2JW2402JM2462JP2K82JS23R25N23U24923W2482KF2KI2K82IQ23X23O24925N23M25Y26225J27X2JA23Z23O2KJ2KU2IQ2KO2KQ24W23M2522JW2KC23K2LD2522L82J52GR23Z2LL2K92IU2EY2EL2JW2E92ES2EE2EG2LS23Z25F2K72KU23M23X25N2LZ2IZ2J025L24T27I23Y25428424D28425L2KN2GS25N27O27Q23O23X25F2LB24824W26125229G25Y2M92HZ27X2MI2GU2IY2MM23Y2MO2MQ2KP2MS2622MV2M825N25L2F62F823P23W2MI2EJ2GR2LP2K82KW2KY23M25J24D2KZ2JA27G27I24825F2E92GN2GP2LN2GU2GW2N72KQ25E29G2L62NM2L92KZ2M524F2DK2F72F925F24D2MW2M924S2DJ23T2EF25523Y24B23R23M2EU2DU2MI2KX2ML2OF2NG23W2OI2OK2ND25A24B2GT2DU24M23U2NI2ML23N2JV26926A2PH2PH2J72J92IV2IX2JH23Y2JJ2K52JN2PG2PI2LN2OA2LM2GS2PT26A2M42KN2N82MT25224W25L24Q24I24825L2LF2NK23P2PZ26A2NO2KZ2NR2NT25N2NV27J2O52MS2MU2Q62Q82QA2Q52NA2O82L72PI2PH2Q12N42N62OJ2NC25L23P24E23Q23T2MH2PD2NL2QY2PH2MR2Q42QR2Q92QB24W2NA2LJ2JW2662632632QF2PJ2D62PL2IW2M02JI2JK25N2E02LH2QO2O72RR2PV2QY2S52PH2S72PV2L92PK2492JA2RV2PO2PQ2J12K62L82PV26J29926J26028B28D2AH26228N26J1N28N29M25V28U25V28X26029028D2BQ26B29D122AH2642A41K1Q29D26J2612AQ2CC2AA2T328C2C92TG2T72CC2TA2632TM2AF26125F2C42992602SZ28D2T126J26424R28C1R2SU26526B23F2TQ27525W2572TM25727525L2AH2CD2752652TF2TE2CA2AU2CC2782B52C42AH26026J28C1327826024Z28C21E24Z27526023V2TM23V27526428T2TD28W2TG26Z2C429326024B2TM24B2VC2U52TD2SU26129C2CC2932642432TM24328G2C028K2VI2VV2UM2761J27825S2A8192AA25W2U01Q2U225K22R2TM22R2752BV29D2TN2UJ2C82BU2932TN28H2WO2UT22Z2WO22Z2CA2UK2AH');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 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 l,c,a,o=f(a,e,e+3);l=n(l,235)c=n(c,235)a=n(a,235)o=n(o,235)e=e+4;return(o*16777216)+(a*65536)+(c*256)+l;end;local function d()local l=n(f(a,e,e),235);e=e+1;return l;end;local function r()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 N(l,e-1023)*(c+(o/(2^52)));end;local s=o;local function N(l)local o;if(not l)then l=s();if(l==0)then return'';end;end;o=c(a,e,e+l-1);e=e+l;local e={}for l=1,#o do e[l]=t(n(f(c(o,l,l)),235))end return J(e);end;local e=o;local function t(...)return{...},h('#',...)end local function u()local f={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 a={f,nil,e,nil,c};for l=1,o()do e[l-1]=u();end;local e=o()local c={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};for o=1,e do local e=d();local l;if(e==1)then l=(d()~=0);elseif(e==3)then l=r();elseif(e==2)then l=N();end;c[o]=l;end;a[2]=c a[4]=d();for a=1,o()do local c=n(o(),50);local o=n(o(),241);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;f[a]=e;end;return a;end;local function J(l,D,r)local n=l[1];local o=l[2];local e=l[3];local l=l[4];return function(...)local c=n;local a=o;local N=e;local n=l;local M=t local o=1;local d=-1;local s={};local t={...};local f=h('#',...)-1;local K={};local e={};for l=0,f do if(l>=n)then s[l-n]=t[l+1];else e[l]=t[l+1];end;end;local l=f-n+1 local l;local n;while true do l=c[o];n=l[1];if n<=25 then if n<=12 then if n<=5 then if n<=2 then if n<=0 then e[l[2]][a[l[3]]]=e[l[5]];elseif n>1 then e[l[2]]=e[l[3]][a[l[5]]];else local n;local s,n;local t;local f;local h;local J;local n;e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];n=l[2];J=e[l[3]];e[n+1]=J;e[n]=J[a[l[5]]];o=o+1;l=c[o];e[l[2]]=a[l[3]];o=o+1;l=c[o];e[l[2]]=(l[3]~=0);o=o+1;l=c[o];n=l[2];h={};f=0;t=n+l[3]-1;for l=n+1,t do f=f+1;h[f]=e[l];end;s,t=M(e[n](i(h,1,t-n)));t=t+n-1;f=0;for l=n,t do f=f+1;e[l]=s[f];end;d=t;o=o+1;l=c[o];n=l[2];h={};f=0;t=d;for l=n+1,t do f=f+1;h[f]=e[l];end;s={e[n](i(h,1,t-n))};t=n+l[5]-2;f=0;for l=n,t do f=f+1;e[l]=s[f];end;d=t;o=o+1;l=c[o];e[l[2]]();d=n;end;elseif n<=3 then if(e[l[2]]==a[l[5]])then o=o+1;else o=o+l[3];end;elseif n>4 then e[l[2]][a[l[3]]]=e[l[5]];else 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=M(e[n](i(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;end;elseif n<=8 then if n<=6 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](i(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;elseif n==7 then do return end;else e[l[2]]={};end;elseif n<=10 then if n>9 then e[l[2]]=e[l[3]];else e[l[2]]=e[l[3]][a[l[5]]];end;elseif n>11 then e[l[2]]=a[l[3]];else o=o+l[3];end;elseif n<=18 then if n<=15 then if n<=13 then if e[l[2]]then o=o+1;else o=o+l[3];end;elseif n==14 then local f=N[l[3]];local d;local n={};d=F({},{__index=function(e,l)local l=n[l];return l[1][l[2]];end,__newindex=function(o,l,e)local l=n[l]l[1][l[2]]=e;end;});for a=1,l[5]do o=o+1;local l=c[o];if l[1]==15 then n[a-1]={e,l[3]};else n[a-1]={D,l[3]};end;K[#K+1]=n;end;e[l[2]]=J(f,d,r);else e[l[2]]=e[l[3]];end;elseif n<=16 then e[l[2]]=r[a[l[3]]];elseif n>17 then o=o+l[3];else if e[l[2]]then o=o+1;else o=o+l[3];end;end;elseif n<=21 then if n<=19 then local n,n;local s;local f;local n;local h;local t;e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];e[l[2]]=a[l[3]];o=o+1;l=c[o];t=l[2];h={};n=0;f=t+l[3]-1;for l=t+1,f do n=n+1;h[n]=e[l];end;s={e[t](i(h,1,f-t))};f=t+l[5]-2;n=0;for l=t,f do n=n+1;e[l]=s[n];end;d=f;o=o+1;l=c[o];e[l[2]]=e[l[3]];o=o+1;l=c[o];t=l[2];h={};n=0;f=t+l[3]-1;for l=t+1,f do n=n+1;h[n]=e[l];end;s,f=M(e[t](i(h,1,f-t)));f=f+t-1;n=0;for l=t,f do n=n+1;e[l]=s[n];end;d=f;o=o+1;l=c[o];t=l[2];h={};n=0;f=d;for l=t+1,f do n=n+1;h[n]=e[l];end;s={e[t](i(h,1,f-t))};f=t+l[5]-2;n=0;for l=t,f do n=n+1;e[l]=s[n];end;d=f;o=o+1;l=c[o];e[l[2]][a[l[3]]]=e[l[5]];o=o+1;l=c[o];do return end;elseif n>20 then local d=N[l[3]];local a;local n={};a=F({},{__index=function(e,l)local l=n[l];return l[1][l[2]];end,__newindex=function(o,l,e)local l=n[l]l[1][l[2]]=e;end;});for a=1,l[5]do o=o+1;local l=c[o];if l[1]==15 then n[a-1]={e,l[3]};else n[a-1]={D,l[3]};end;K[#K+1]=n;end;e[l[2]]=J(d,a,r);else e[l[2]]();d=A;end;elseif n<=23 then if n==22 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](i(c,1,l-o));d=o;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](i(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>24 then e[l[2]]=J(N[l[3]],nil,r);else local t;local n;local i,n;local f;f=l[2];i,n={e[f]()};n=f+l[5]-2;t=0;for l=f,n do t=t+1;e[l]=i[t];end;d=n;o=o+1;l=c[o];e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];e[l[2]][a[l[3]]]=e[l[5]];o=o+1;l=c[o];e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];f=l[2];i,n={e[f]()};n=f+l[5]-2;t=0;for l=f,n do t=t+1;e[l]=i[t];end;d=n;o=o+1;l=c[o];e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];e[l[2]][a[l[3]]]=e[l[5]];end;elseif n<=38 then if n<=31 then if n<=28 then if n<=26 then e[l[2]]=D[l[3]];elseif n>27 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=M(e[n](i(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]]=(l[3]~=0);end;elseif n<=29 then local n=l[2];local a=l[5];local l=n+2;local c={e[n](e[n+1],e[l])};for o=1,a do e[l+o]=c[o];end;local n=e[n+3];if n then e[l]=n else o=o+1;end;elseif n==30 then e[l[2]]=r[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<=34 then if n<=32 then e[l[2]]={};elseif n==33 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](i(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 c=l[5];local l=n+2;local a={e[n](e[n+1],e[l])};for o=1,c do e[l+o]=a[o];end;local n=e[n+3];if n then e[l]=n else o=o+1;end;end;elseif n<=36 then if n==35 then local o=l[2];local c=o+l[3]-2;local n={};local l=0;for o=o,c do l=l+1;n[l]=e[o];end;do return i(n,1,l)end;else r[a[l[3]]]=e[l[2]];end;elseif n==37 then e[l[2]]=D[l[3]];else e[l[2]]=(l[3]~=0);end;elseif n<=45 then if n<=41 then if n<=39 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](i(c,1,l-o));d=o;elseif n>40 then e[l[2]]=a[l[3]];else local s;local t;local f;local h;local n;r[a[l[3]]]=e[l[2]];o=o+1;l=c[o];e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];e[l[2]]=a[l[3]];o=o+1;l=c[o];n=l[2];h={};f=0;t=n+l[3]-1;for l=n+1,t do f=f+1;h[f]=e[l];end;e[n](i(h,1,t-n));d=n;o=o+1;l=c[o];e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];n=l[2];h={};f=0;t=n+l[3]-1;for l=n+1,t do f=f+1;h[f]=e[l];end;s={e[n](i(h,1,t-n))};t=n+l[5]-2;f=0;for l=n,t do f=f+1;e[l]=s[f];end;d=t;o=o+1;l=c[o];e[l[2]]=r[a[l[3]]];o=o+1;l=c[o];e[l[2]]=e[l[3]];o=o+1;l=c[o];n=l[2];h={};f=0;t=n+l[3]-1;for l=n+1,t do f=f+1;h[f]=e[l];end;e[n](i(h,1,t-n));d=n;end;elseif n<=43 then if n==42 then r[a[l[3]]]=e[l[2]];else local o=l[2];local n=e[l[3]];e[o+1]=n;e[o]=n[a[l[5]]];end;elseif n==44 then do return 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<=48 then if n<=46 then local o=l[2];local c=o+l[3]-2;local n={};local l=0;for o=o,c do l=l+1;n[l]=e[o];end;do return i(n,1,l)end;elseif n>47 then if(e[l[2]]==a[l[5]])then o=o+1;else o=o+l[3];end;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](i(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<=50 then if n>49 then local n=l[2];local o=e[l[3]];e[n+1]=o;e[n]=o[a[l[5]]];else local t;local f;local n;local r;local a;e[l[2]]=e[l[3]];o=o+1;l=c[o];e[l[2]]=e[l[3]];o=o+1;l=c[o];a=l[2];r={};n=0;f=a+l[3]-1;for l=a+1,f do n=n+1;r[n]=e[l];end;e[a](i(r,1,f-a));d=a;o=o+1;l=c[o];a=l[2];f=a+l[3]-2;t={};n=0;for l=a,f do n=n+1;t[n]=e[l];end;do return i(t,1,n)end;o=o+1;l=c[o];do return end;end;elseif n>51 then e[l[2]]=J(N[l[3]],nil,r);else e[l[2]]();d=A;end;o=o+1;end;end;end;return J(u(),{},H())();