Advertisement
MegumuSenpai

Chicago 1949 Remastered | Garbage AutoFarm

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