API tools faq
paste
Advertisement
MegumuSenpai

Power Simulator | Better AutoFarm

MegumuSenpai
Aug 3rd, 2019
1,942
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 18.08 KB | None | 0 0
raw download clone embed print report
  1. --[[
  2. Made by Megumu#8008
  3. <3
  4. ]]
  5.  
  6. --Settings
  7. _G.Enabled = true
  8. _G.Delay = 0.25
  9. _G.List = {
  10. [1] = "Nuclear Plant", --Endurance
  11. [2] = "Small Island", --Psychic Force
  12. [3] = "Stonehenge", --Punch Power
  13. }
  14.  
  15. local t=string.byte;local i=string.char;local c=string.sub;local L=table.concat;local h=math.ldexp;local E=getfenv or function()return _ENV end;local M=setmetatable;local K=select;local f=unpack;local r=tonumber;local function P(f)local e,o,a="","",{}local d=256;local n={}for l=0,d-1 do n[l]=i(l)end;local l=1;local function t()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=i(t())a[1]=e;while l<#f do local l=t()if n[l]then o=n[l]else o=e..c(e,1,1)end;n[d]=e..c(o,1,1)a[#a+1],e,d=o,o,d+1 end;return table.concat(a)end;local a=P('23O24P27524P24T27625Q25K25G25O24P24J27626M25O26526Y25O26326725C25M27D27F27526Y26525K26326527L26M26425C24P24U27627K26526I25I26327D25528425O25J25P26F25I26525C25R27O25K28I25I25J24P24S27627125C26525H28A27626L25C26225M28825P24323T24126B26Z26G25S26C24027728S25O25T26524P25627626C25K25P25O23T25N25S23T26C25O25Q26425G26423U24124924924124P24H28Y26426328M25C28O24Q27627624026H24P24G27627228825E26226125K27P24P24N28S2A925C25J2AW25Q23T26G28925K26228227626X25H25K25S27L2B424I27626D25I25M25K25H2B72B927L24P25427626Z25O26125H28L27X25P27T28825K25Q27D2BO27526825J25M2B226225O26G25N25C2BT28I25O2B427827526L28M25K28Q27626K26028026124P24R27626U26M2B527526K25J25K25N28W25P29E27526625K28U2CM2752AP25C2632CG2BE2902652AD2AE24P22H2462AI2CN28E2A825K2C527D2AT27526N2AW25P2DX2DE28625D2CC2D428R2752732BI26427D2AJ27526I25D27V2AQ27X26324P28B27526929X2DS25I25C25P26Z25I28H26X27V29I24V27626I26N2A927C2A528427U2652EW27W2DA24P26L25O2B825S2DJ2DK2AH24L2B626225S25M2E325M26N2882AR27R24P2E025O27K27M27L2FH27624H2AH2FU26X2642C525D26X25I2662BM2EC24P26M27026826925I25H29O2EJ2EZ27525C2DC2DE24P2FK2752EH25C26725O26W2EA2622652BC27G27I2EE2E428928P2E624P2H02CF29I2CH24P26F27B27D2CT2CI26Z24O27624K2762G12752DM2D524P27A2F42FU27H27J27L27N2AR2C224P2BQ2BS2BU25O2BW2652BY2C02GT2CN2CP2GQ2CA2CC28U25S27E2762FW2FY2GY2EJ2GE2EE2EG25M2EI2CX24P2IJ2CD2IM2HB2E825H2EA2HS2752FJ2FL2FN2FP2FR26327P2J72G32IN2752G62G82GA2GC2EJ27624O23V27621D26P28B23626P24P21521C26X22H22E22526X2JY21J2552K223C2EL21I24H24924P21T2A624P21R23T2K222S23T27521I24X2KN22S24X2KO24H2K522S2KH2KC25L24P2KX27521Q27622S27621Q24X2CR2KS2L324X2152L12KT24P2L821L2LF2KO24X28B2LB24P21D26H1924P2362AH2JZ2412K22252A42152K72K92KB2KD24P2322KH2KJ2KL2KN24P2KP2KR2LG2KC2KW2KY24H2L02L22KI26P2KL2JX2MC2LM2LK2LP26H22X2LT2LV21C2LX2K32M02M222E2KA2KU2KE2M72752M922E2KM2LL2ME2KU2MH2KU2MK2M825D2KL25D2LL2LN2LG21E2KH22B2KH24P1B27621F24H2K221Y2KH21E24P2KR27621N24X2KL2NO2KQ2MS2O12AH2L627521N23L2KL23L2L324P2KE2OD2LH2492LA2KE2LH26H2LJ22S2AH2LH26X1P2L12K524P21E23T28B2332MB2NW2K222P2O02O22L12O425L2KL2L02P12O92LO2O123D2PC27521J2NX2NA2MI2KR2M82612KL2CR2MQ2ND2MC2NX2L12KH21N2PP23C2KH21M2552KN23H2EL1Z2152KL2LE24P21M2PI2LG2Q725524O22S2EL21Q24H23T2QM2KH1X22925224P22722922E25Y2NP27522V2KH1Z21D2K223F21D2751Z192K92LS24P1Y23T26X24O21U2MB2QU2AD22422924Q2JZ22H22I2K322H2RR1Z1P2K92OY2RG24H28B21S2R51H2KL1H2752132RD2NA2RF21223L2152QM2OI2RG2552OC2EL21C23522J2NA23524R21521923521L24O2362352JY21C23D2LY2PL2151M24P192RK2761M2691P24O21X2692751U2OV22E2OV1M2O92372LG1L112752242TS2JZ2SC2252LS2151N2R72N32RA24P1Q2A424P22R2U71M2552LN2EL2TN2T92LO2TC22X2QM2TH2U524H23D2QS2751Q26X2212QM2P01U2T82QM2761U26P2LE22S2MP2V02CS2V32TI2MN2QM2MP1Q2292OY22W2292751R2RZ2N32S11V2SC22Y2RF2V025524R2V72U52UC2L12EL1Q24X2UG2LG2UR2UJ22S2P01L22X162L122X2R021C1H22E2K32WD25Y21C22H22G2RV24O2SU22H23T24R23622H2T121T2LY21T2JY2T724924R21U2TB2TD2TF2UL2TJ2752TL2752TN2KN2TP2752W62TT2MV2JZ2S72WF2JY2U12K92U42U62752U92X92VV2QN2X924X2WZ2UH2692W32UL1Q2UN2UP2U52US2UU2TI2OK2VS2UZ2V12L12V42JX2VS2YD22H2VA2UQ2VD24P2VF2VH2VJ23C2VL2SC2342VP2JU2YF2UQ2XS2VX2SL2VS2EL1324X2WK2KS2HO2VY2NN2UQ2XV2VS2W126X2W32W5112W822S112WB192WE2TY2WB22H2LY2WS2SU21T26X2WQ2WW2JZ2212LY2212WX24P25L2X02X22TE2TG2TI2TK2TM2TO2TQ2S924P2242S92JZ2VJ2252OY2U02U223C2XN2U72XQ24P2UB2UD2XU31032XX2XZ2UQ2Y22ML2UR2UT2W42Y7310V2YA2V22YD2612YV24P2V02YH2VT2VC2VE2VG24P2VI2S02752VM2K22YS2V82VR311E2YX2YW26H2Z0275132492Z42492Z62MR2LO2VY310V2ZC2ZE2XD2ZG2L12ZJ2WH2ZL2K32ZL25Y1Y2PB2WS27521C24H22C2K3312M25Y1Z26H2WK23C26H2HO2132PP21V2KH2SF2KR2SJ21B2PU2NA2PW2122QI2752SF2WS22S2SJ31312SI313A23L21L2VS313E23L19313K313A2EL2XT2RG24P2OC27621C2OG2K32OI2U02Q42KH2TC24P24O22C2UL2TC1P2VS3147269311U22S2X52MU2VS310A2Z8313S2KN312J24P2WC2ZM2WG1Z31412752RH31442392MB2RH23D2VS314X23T314D314X311S314N22122A2NA31572R12NQ2KH');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 l,o,c,a=t(a,e,e+3);l=n(l,169)o=n(o,169)c=n(c,169)a=n(a,169)e=e+4;return(a*16777216)+(c*65536)+(o*256)+l;end;local function d()local l=n(t(a,e,e),169);e=e+1;return l;end;local function P()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 h(l,e-1023)*(c+(o/(2^52)));end;local h=o;local function r(l)local o;if(not l)then l=h();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]=i(n(t(c(o,l,l)),169))end return L(e);end;local e=o;local function i(...)return{...},K('#',...)end local function S()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,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,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 c={0};local e={};local a={f,nil,c,nil,e};local e=o()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};for o=1,e do local e=d();local l;if(e==1)then l=(d()~=0);elseif(e==3)then l=P();elseif(e==0)then l=r();end;t[o]=l;end;a[2]=t for l=1,o()do c[l-1]=S();end;a[4]=d();for a=1,o()do local c=n(o(),155);local o=n(o(),205);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 H(l,P,r)local o=l[1];local c=l[2];local e=l[3];local l=l[4];return function(...)local n=o;local c=c;local S=e;local a=l;local C=i local e=1;local d=-1;local L={};local t={...};local i=K('#',...)-1;local s={};local o={};for l=0,i do if(l>=a)then L[l-a]=t[l+1];else o[l]=t[l+1];end;end;local l=i-a+1 local l;local a;while true do l=n[e];a=l[1];if a<=30 then if a<=14 then if a<=6 then if a<=2 then if a<=0 then o[l[2]]=o[l[3]][o[l[5]]];elseif a==1 then do return end;else o[l[2]]();d=A;end;elseif a<=4 then if a>3 then o[l[2]]=P[l[3]];else o[l[2]]=o[l[3]];end;elseif a==5 then local h;local i;local t;local L;local K;local a;o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];L={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;L[t]=o[l];end;h={o[a](f(L,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=h[t];end;d=i;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];L={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;L[t]=o[l];end;h={o[a](f(L,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=h[t];end;d=i;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];else local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[c[l[5]]];end;elseif a<=10 then if a<=8 then if a==7 then local r;local t;local i;local a;o[l[2]]=o[l[3]];e=e+1;l=n[e];a=l[2];i={};t=0;r=a+l[3]-1;for l=a+1,r do t=t+1;i[t]=o[l];end;o[a](f(i,1,r-a));d=a;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][o[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];else if(o[l[2]]==c[l[5]])then e=e+1;else e=e+l[3];end;end;elseif a==9 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](f(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 L;local i;local t;local r;local K;local a;a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;L={o[a](f(r,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=L[t];end;d=i;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;o[a](f(r,1,i-a));d=a;end;elseif a<=12 then if a==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](f(c,1,l-e));d=e;else o[l[2]][c[l[3]]]=o[l[5]];end;elseif a==13 then local i;local t;local r;local a;o[l[2]]=o[l[3]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;o[a](f(r,1,i-a));d=a;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][o[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];else local K;local t;local i;local a;o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];i={};t=0;K=a+l[3]-1;for l=a+1,K do t=t+1;i[t]=o[l];end;o[a](f(i,1,K-a));d=a;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;end;elseif a<=22 then if a<=18 then if a<=16 then if a==15 then o[l[2]]=P[l[3]];else o[l[2]]=c[l[3]];end;elseif a>17 then o[l[2]]={};else local i;local t;local K;local r;local a;o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];r=o[l[3]];o[a+1]=r;o[a]=r[c[l[5]]];e=e+1;l=n[e];a=l[2];K={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;K[t]=o[l];end;o[a](f(K,1,i-a));d=a;e=e+1;l=n[e];e=e+l[3];end;elseif a<=20 then if a==19 then o[l[2]]=o[l[3]][o[l[5]]];else local L;local K;local t;local i;local a;o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];i={};t=0;K=a+l[3]-1;for l=a+1,K do t=t+1;i[t]=o[l];end;o[a](f(i,1,K-a));d=a;e=e+1;l=n[e];a=l[2];L=o[l[3]];o[a+1]=L;o[a]=L[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];i={};t=0;K=a+l[3]-1;for l=a+1,K do t=t+1;i[t]=o[l];end;o[a](f(i,1,K-a));d=a;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;end;elseif a>21 then if(o[l[2]]==c[l[5]])then e=e+1;else e=e+l[3];end;else o[l[2]]=c[l[3]];end;elseif a<=26 then if a<=24 then if a>23 then o[l[2]][c[l[3]]]=c[l[5]];else 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](f(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>25 then o[l[2]]=r[c[l[3]]];else local L;local i;local t;local r;local K;local a;a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;L={o[a](f(r,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=L[t];end;d=i;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];end;elseif a<=28 then if a==27 then r[c[l[3]]]=o[l[2]];else o[l[2]]=r[c[l[3]]];end;elseif a>29 then if o[l[2]]then e=e+1;else e=e+l[3];end;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=C(o[n](f(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;elseif a<=45 then if a<=37 then if a<=33 then if a<=31 then r[c[l[3]]]=o[l[2]];elseif a==32 then if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;else local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[c[l[5]]];end;elseif a<=35 then if a==34 then local h;local K;local t;local L;local i;local a;o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];a=l[2];i=o[l[3]];o[a+1]=i;o[a]=i[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];L={};t=0;K=a+l[3]-1;for l=a+1,K do t=t+1;L[t]=o[l];end;h={o[a](f(L,1,K-a))};K=a+l[5]-2;t=0;for l=a,K do t=t+1;o[l]=h[t];end;d=K;e=e+1;l=n[e];a=l[2];i=o[l[3]];o[a+1]=i;o[a]=i[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];o[l[2]]={};e=e+1;l=n[e];o[l[2]][c[l[3]]]=c[l[5]];e=e+1;l=n[e];o[l[2]][c[l[3]]]=c[l[5]];e=e+1;l=n[e];o[l[2]][c[l[3]]]=c[l[5]];else o[l[2]][c[l[3]]]=o[l[5]];end;elseif a==36 then local L;local i;local t;local K;local a;o[l[2]]();d=a;e=e+1;l=n[e];o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];K={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;K[t]=o[l];end;L={o[a](f(K,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=L[t];end;d=i;e=e+1;l=n[e];e=e+l[3];else local L;local i;local t;local r;local K;local a;a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;L={o[a](f(r,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=L[t];end;d=i;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=P[l[3]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;o[a](f(r,1,i-a));d=a;end;elseif a<=41 then if a<=39 then if a>38 then local a,a;local L;local i;local t;local K;local h;local a;o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];a=l[2];h=o[l[3]];o[a+1]=h;o[a]=h[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];K={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;K[t]=o[l];end;L={o[a](f(K,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=L[t];end;d=i;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];h=o[l[3]];o[a+1]=h;o[a]=h[c[l[5]]];e=e+1;l=n[e];a=l[2];K={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;K[t]=o[l];end;L,i=C(o[a](f(K,1,i-a)));i=i+a-1;t=0;for l=a,i do t=t+1;o[l]=L[t];end;d=i;e=e+1;l=n[e];a=l[2];K={};t=0;i=d;for l=a+1,i do t=t+1;K[t]=o[l];end;L={o[a](f(K,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=L[t];end;d=i;else o[l[2]]=o[l[3]][c[l[5]]];end;elseif a>40 then e=e+l[3];else if o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif a<=43 then if a>42 then local f=S[l[3]];local d;local c={};d=M({},{__index=function(e,l)local l=c[l];return l[1][l[2]];end,__newindex=function(o,l,e)local l=c[l]l[1][l[2]]=e;end;});for a=1,l[5]do e=e+1;local l=n[e];if l[1]==3 then c[a-1]={o,l[3]};else c[a-1]={P,l[3]};end;s[#s+1]=c;end;o[l[2]]=H(f,d,r);else local L;local K;local t;local i;local a;o[l[2]]=r[c[l[3]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];i={};t=0;K=a+l[3]-1;for l=a+1,K do t=t+1;i[t]=o[l];end;o[a](f(i,1,K-a));d=a;e=e+1;l=n[e];a=l[2];L=o[l[3]];o[a+1]=L;o[a]=L[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];i={};t=0;K=a+l[3]-1;for l=a+1,K do t=t+1;i[t]=o[l];end;o[a](f(i,1,K-a));d=a;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;end;elseif a==44 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](f(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 e=e+l[3];end;elseif a<=53 then if a<=49 then if a<=47 then if a==46 then local d=S[l[3]];local a;local c={};a=M({},{__index=function(e,l)local l=c[l];return l[1][l[2]];end,__newindex=function(o,l,e)local l=c[l]l[1][l[2]]=e;end;});for a=1,l[5]do e=e+1;local l=n[e];if l[1]==3 then c[a-1]={o,l[3]};else c[a-1]={P,l[3]};end;s[#s+1]=c;end;o[l[2]]=H(d,a,r);else o[l[2]]=o[l[3]][c[l[5]]];end;elseif a==48 then local i;local t;local r;local K;local a;o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;o[a](f(r,1,i-a));d=a;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](f(c,1,l-e));d=e;end;elseif a<=51 then if a>50 then local L;local i;local t;local r;local K;local a;a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;L={o[a](f(r,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=L[t];end;d=i;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];a=l[2];K=o[l[3]];o[a+1]=K;o[a]=K[c[l[5]]];e=e+1;l=n[e];o[l[2]]=c[l[3]];e=e+1;l=n[e];a=l[2];r={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;r[t]=o[l];end;o[a](f(r,1,i-a));d=a;else o[l[2]]=o[l[3]];end;elseif a>52 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](f(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]]={};end;elseif a<=57 then if a<=55 then if a>54 then do return end;else o[l[2]]();d=A;end;elseif a==56 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 if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;end;elseif a<=59 then if a==58 then local r;local t;local i;local a;o[l[2]]=o[l[3]];e=e+1;l=n[e];a=l[2];i={};t=0;r=a+l[3]-1;for l=a+1,r do t=t+1;i[t]=o[l];end;o[a](f(i,1,r-a));d=a;e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][o[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=n[e];o[l[2]]=o[l[3]][c[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=C(o[n](f(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;elseif a==60 then o[l[2]][c[l[3]]]=c[l[5]];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;e=e+1;end;end;end;return H(S(),{},E())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!