Advertisement
CriShoux

KAT

May 2nd, 2021
492
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 20.46 KB | None | 0 0
  1. return(function(S,o,c,n,e,l)local f=unpack or table.unpack;local r=string.char;local n=table.getn or function(e)return#e end;local X=setmetatable;local F=l;local B=table.concat;local a=string.sub;local K=getfenv or function()return _ENV end;local i=e;local h=select;local C=pairs;local O=string.byte;local A={}for e=0,255 do A[e]=r(e)end;local function H(d)local l,n,o="","",{}local c=256;local e=1;local function t()local l=i(a(d,e,e),36)e=e+1;local n=i(a(d,e,e+l-1),36)e=e+l;return n end;l=r(t())o[1]=l;while e<#d do local e=t()if A[e]then n=A[e]else n=l..a(l,1,1)end;A[c]=l..a(n,1,1)o[#o+1],l,c=n,n,c+1 end;return B(o)end;local i=H('24O24U24O24P24S24O27922S22U23A23E24P24H27924O21S23323E2312362381V1A1H24P24V27H22B22Z23E27C22T1O24P24I27H22923623922423A22T1T16101227F27H23822W22X23822O22V1A1C1624P24L28322Q23923F28821K1R161N1B1Q1N24P24J27H22722W23C23I23J21Z171E1Q121928127H21W22Q23328728928B28D27T27921S22W23923523A27O28E27922322Q27L22V2391E1E29224M27H27J27L27N27P1H2121V1R1M1J29327H22C28H23723B22M1C111C1L1U26K27H24O23M2791324O27827925627924P2B627H23S2B827H24G24O2B527624Q24O24R2AX2BK2BH2BH2BF24P2B72B72792BA2762BQ24O2BD2BO2BJ2B32BK2B72BJ2BH2BT24P2BH27929Q2542792BZ2B929424P24T2762742BE26L2762752CG2BS2CE27527524K2792CA24O27T2CU27423K27925527H2BV24O2532AX27G27924U2CZ2BE2CH2B72CS2D42AX29Q2792D527H2C72DI2AX2BD27H2DJ2792D72DM27H2A82DP2AX24N2AX2DQ24O2CX2DF27H2DE2DT27928Q2DW27H2822E92792942EC2BI27H2D927925724O2BH2C22E62EG2EF2C02E32B42EH2DA2582EG2B72B32E02BK2E02DH2ES2B22DZ2AX2E827923L27925924O2EK2BS2B625A2EL2FI2AX2FC2EM24O2C52FL24O2942FO24O2FC2DS27925B2FD2BK2FB24O2FX2B72BO2FC2BR2FN2FH24P2FC2FC2BX2B62FX2ER27H2FC2FX2C42B62GA24O2822FS2FU2CY2FW2F52B72E82F22F627H2EW2EF2FV2E02DV2EO2DY2EF2EB2EO2EE2EO2CN2EO2752EF2E22E02D12EF2E52F42F824O26I2G02G22792412AX2G62E124O21K21D21F21C22T21K21F21H21L21E21G21C21E21I21F21G2HA2DC2FX27923522Q22Y22Y23A22S1V21N1B1L1K1821I1H2192161W21F1U21521I21L26729H27921X23222X23E21S2361P1P161L2H824O2CN2BJ2FZ2B02F52FF2762BJ2C32DB2762CG2HS2EH2EP2BK2F32BK2BD2JS2DR2FJ2BK2752FV2HM2EG2752BR2HQ2D227H2JH27H28Q24P2BF24O29J23923E22P23A27P216101L1G111I1721221C21F24P2HG24O22022X23623D23A21Z1P1A1L1E1U1821Q1O21B21621B2AK27A29K22Y22R22P1A131M12182J224O22C2A123323G23D1Y11152LS2HA2L12L323A2CF27H23B22U23D2372M72HA23722S23E23723J2M827922V22Q23D22Y23824P24X29I29K22023A23A1R101D2161K2AH1R1A1X2131K21B21Q1X1Z26Z25C25S28P27H22Y22X22Z22Y22V21X1E1316161829124P2E522F22722122821W22021A2152111Y21K21724P2HC24O23522U23023C23A22R24P2DO24O22323623A23I23H23C121B27S2MU23922E23H2IK2OT29R29T29V29X2C021Z23223I23F27728F22U23622Z2OI27H21T22U23C23822R23A18142NH2MM27C23I23823621L1A1I1I1U1C172LI27I22Z23623E23H22R21A2JB191F2P927923122Q22R2PD2OJ21Z22Q23I23322823C2AH2Q12M52L422C172NR2QA2NV2AL2PB22Z22D23C1P2181B2A61R2QC24O23B23I27W2QQ2L22L421W1E1T1L29F25G2AX2KC2CH2FZ2B12C02C52AX2B52RS27H24W2JP2C62JF2JI2792BM2S12S42AX2OA2ED2RO2B226D2AX2CE2SA2AX2CS2K82HR2AX2ID2FZ23S2AW2HS2RX2BO2BH24Y2S42S32RV2792SP2B62BH2SK2FZ2S32T12S52B92BB2SW2RY2BH2GY2JI2T22BK2RN2S42562CK2BP2CV2EU2S22KA2C72F02AX2502AX2DL24O26A2B82S324U24C2B823U2S924S2SB27H2U02EY2U327923X2CH2TG2BG24O2KZ2FT2TL2BV2U22AX2SS2B723S2CE2G62D72RX2CH2RR2B62G62JE2CH2HA2C52G62FE2KA2OA2BO2B72FC2ET2UC2OJ2C52S32BJ2C52KC2H62TL2BH2CC2AX25K2UA2TH2752MT27H29Q27T2IB2TU2CI2S323Y2492CL24O2VJ2B72752UI27H2VZ2CJ2VX2HI2VP2S02B42402762BD2FH27H2452D82BW2FI24U26X2WH2WG2UH2U724O2WN2SE27H26M2VK2W62DG2C82W92BE2WB2PE2H22WQ2WH2BD2BH2WK2WH2SN2UR2WP2XA2W22792WU2BR2EB2CG2DH2XE2VY2WV2O924O2W72WY2HA2562X12JY2AX2WG2CI2X62742WL2CI2SB2WO2AX2Y32WS27926F2RO2XI2WI2792XL2W42UB2XO2XQ2TJ2XS2XU2JK2792XX2752XZ2X82CI2722DC2Y724O2YT2U62AX26O2YA2792CG2DS2YE2XN2CR2WX2YJ27H2XT2WC2K12X42XY2WJ2Y127526V2YU2XL2ZJ2YY2W32Z12S02H624U23T2B82VW2B72BH2XL2ZV2GR2CH2H823S2G82BV2SX2JM24O2HK2KA2JO2UY2CH2CA310C2B72DY2EI2EX2YU24O2TQ2S12K52EN2SH2KA2DK2D22G62OZ24O22S29K23023A23D1T2S726N2JJ2C02BO2T62SI2JZ310S2TS2T431182TB2AX2VE2BK2K9311E31192C02A023E2P82E522C2QZ2R12R32R51N1R2HK26H31152EH2Y12YD2ZK2WP278310Q3118311H2AX26E311E310F2FI2BY2S92SI2JO31192JI2ZW312K310K2C1310R2BC2762H629J23322723J23A1I27Q1K29Y27I27K27M27O27Q24P2CX2OL2ON2OP2OR21D181K1B1Z1M21L21N2KF2OU2KK2KM1A2KO2KQ2KS2KU2KW24P2H222223822N23E22O2381E112QU1L1B21O1H2GF26G25Z26G24P2KC2QE2302XO2792NJ22W2KK2OH2KC22922U22Q24P24Z27H2J428T21V23A1P1R218192151U1A1W1Y21N2171E21O21D21O21125Q26B25M25W25R313128G28I28K28M28O2HA2MA2MC2M72C022E2L22PD2H2314V23F22D23I1P1S1N2101J1M1V2AJ2OJ22B22W22W23A22V23I14112R82QE2QG24E2AX23V311D2RQ2ZA2UT2HT2T32AX2V92FI2JS2VA2YM27924A2RO2ID2K72EH2TY2CI2SD2YD2WP2SD2XL2SG2YV2TY2UL2CP2S02X726W2WY2B52W02YV317O2FN2U527T2752A82ZB28E2RN2XX27T27G2X72Y127T2G52XB2FK318727H31732G32TH2BD31022U92PE2BD2822BO2822DS2C52822822JW2942DL2C52942942DY2C52CS27T2H42KD2K12C528Q28Q31902792CS2CS28Q318X2XP31082FN2E4319C2S72GM319C311C2942KC318T2FQ3171319C2S12942HI312Q2TL2C527G2BD2IB319O319H2K0318R2CI2K023P31242AX31A62ZN31722XN27G2E52UM27627G319X2WY319I2JV2S82S72K527G2SD2ZS2B827T312L2XL31AT2792462TR2AX311J312G2BK2CA2PO24O22B23923I2J62361S1W15112NT2Q02F82AA2312PS2PU1F121Q1C1M2QX2792LV23E2LX23D21K101M191V1C2LT31BU31BW2M02M2313727U23923823929W1V1631BN21R1Q1H151Y21O2GF24O22G2472Q12282372A222C131E1H101U31B522928S28U2HZ28X28Z2NU2DH313X22H2372MB1V2Q131B731CC31CE31CG2LR316K2QF2PD2DS31BJ2AC31362HA31CT2A22PE279316C316E316G316I310V310X23323131101T31C929Z2OM2OO2OQ1B313D313F313H313J314I24O22F22U22X2OF2OH311Q2LW2LY1Z1E1D131N1Q31B522V2PQ31BL2PV2PX2PZ24P319031C52LY31BY31C031C21X1M21O2RZ27922K21S31F52AL31EQ23D2121017121N1C31FC31FE2KG2IF2IH2IJ1V21631BE1U1S1721E21P2162192KX2HA21S22Z23829V31DW24O22Q23723323I23423G1Y2O82H821Y22P23H23E23422R214101F1829G2H82AM22X2AO2AQ2AS2AU31CO24O314D319031GH31GJ31GL31GN1W1831CY171I21L31E82R923322X23422S21S2A51J181L21E1S1J21A1Z2ML24O26W25J26725P2622LT2J42J62J82JA2JC26Q2SJ2S4311Z24O316R2D831782Z22U12WP2JR2YV317624O31B12HS2T02HS24D2SI2BN316T2UV2TL2S12JN27H2GF27331742WH318S2A82XO2752BA2BO2BD2JW2K02S12K32CH2C52CM316U2VO2JU31JG2JP31AL2BH27G318K24O31962EA2CH2GJ312R319I2FC318N319I251319E279318O2CI2BO318V2JI2SD31K22AK2942FC2CU2AK31K8311H2943129319J2T52763198319E2BO2A8311C279310H316S2CT310L2JI2UE2BK2B5318M2B62EK317V2BK2EW31H82V531JY2BK2FH2UX2FG24O2FH2782C52FH31LP31K931LL31LS31JE31LK2FH2UQ27H2FH2S331KL2FC25231LS31M124O2MT29431M528Q27G31LO2CI2A831M52D12FH2482GG2DF310M31LY2WZ31MC31LM31K924P31LQ2EW31M52BJ2WE31MM2OA31M52CS31MW27931LI31KS31MR31LS2SS31M52SS31N131LS2DH31M52WD31LH2YC316U2G924O314T31NA2FH2V831LV319I31M52CG31NL31MN31NO31LN31NO27G31M527G31NS31LJ27631LQ31NV31O231LS2B731M52B731NS2DS31M52EK31NS2H631M52FX31NS31J22G1319Q31LC31OK311C2FC31OJ2DY31LF2HL319731LG2W02ZT2CH317F2ZX2WP317F31IT2SI2JI');local B=(bit or bit32)and(bit or bit32).bxor or function(e,n)local l,o=1,0 while e>0 and n>0 do local d,a=e%c,n%c if d~=a then o=o+l end e,n,l=(e-d)/c,(n-a)/c,l*c end if e<n then e=n end while e>0 do local n=e%c if n>0 then o=o+l end e,l=(e-n)/c,l*c end return o end local function d(l,e,n)if n then local e=(l/c^(e-1))%c^((n-1)-(e-1)+1);return e-e%1;else local e=c^(e-1);return(l%(e+e)>=e)and 1 or 0;end;end;local e=1;local E=0;local function n()local o,n,l,d=O(i,e,e+o);o=B(o,168)n=B(n,168)l=B(l,168)d=B(d,168)e=e+4;return(d*S)+(l*65536)+(n*256)+o;end;local function D(...)return{...},h('#',...)end local function H()local l=B(O(i,e,e),168);e=e+1;return l;end;local function t()local n,l=O(i,e,e+c);n=B(n,168)l=B(l,168)e=e+c;return(l*256)+n;end;local function s()local l={};local r={};local S={};local C={[1]={},[6]=S,[o]=nil,[c]=l,[4]=r,[9]=nil,};local f={}local l={}for t=1,H()==0 and t()*c or n()do local l=H();while true do if(l==0)then l=(H()~=0);break;end if(l==1)then local o,d,n='',n();if(d==0)then l=o;break;end;n=a(i,e,e+d-1);n={O(n,1,#n)}e=e+d;for e=1,#n do o=o..A[B(n[e],168)]end l=o break;end if(l==4)then local n,e=n(),n();local d,n,e,o=1,(d(e,1,20)*(c^32))+n,d(e,21,31),((-1)^d(e,32));if e==0 then if n==0 then l=o*0 break;else e=1;d=0;end;elseif(e==2047)then l=(o*((n==0 and 1 or 0)/0))break;end;l=(o*(c^(e-1023)))*(d+(n/(c^52)));break;end if(l==c)then local n=n();l=a(i,e,e+n-1);e=e+n;break;end l=nil break;end f[t]=l;end;for r=1,n()do local e=H();if(d(e,1,1)==0)then local i=d(e,4,6);local a=d(e,c,o);local e,B,H,l=t(),H()==1,t(),{};local e={[7]=nil,[5]=H,[8]=e,[o]=B,};if(a==c)then e[o]=n()-65536 end if(a==1)then e[o]=n()end if(a==o)then e[o],e[7]=n()-65536,t()end if(a==0)then e[o],e[7]=t(),t()end if(d(i,o,o)==1)then l[7]=7 e[7]=f[e[7]]end if(d(i,1,1)==1)then l[5]=5 e[5]=f[e[5]]end if(d(i,c,c)==1)then l[o]=o e[o]=f[e[o]]end if B then F(C[1],e)e[c]=l end S[r]=e;end end;C[o]=H();if E<1 then E=1 local l=t()C[7]=a(i,e,e+l-1)e=e+l end for e=1,n()do r[e-1]=s();end;return C;end;local function F(e,t,i,l)local d=e[4];local L=0;local l=e[o];local n={}local A=e[1];local J=e[6];local e=e[9];return function(...)local S={};local a=l;local O=h('#',...)-1;local K={};local h=D local n={};local H=-1;local E={...};local l=1;local s=d;local d=J;for e=0,O do if(e>=a)then K[e-a]=E[e+1];else n[e]=E[e+1];end;end;local e=O-a+1 local e;local a;while true do e=d[l];a=e[8];if L>0 then n[e[5]]=e[o];end if a<=40 then if a<=19 then if a<=9 then if a<=4 then if a<=1 then if a==0 then local e=e[5]n[e]=n[e]()else do return n[e[5]]end end;elseif a<=c then local a=e[5];local t=e[7];local d=a+c local a={n[a](n[a+1],n[d])};for e=1,t do n[d+e]=a[e];end;local a=a[1]if a then n[d]=a l=e[o];else l=l+1;end;elseif a>o then local e=e[5]n[e]=n[e](n[e+1])else local S;local a;local O,i,H,E;n[e[5]]=t[e[o]];l=l+1;e=d[l];for n,l in C(A)do for d,n in C(l[c])do O,i,H,E={l[n]:byte(1,#l[n])},'',e[5],e[o]for e=1,#O do i,H=i..r(B(O[e],H)),(H+E)%256 end l[n],l[c]=i,{};end end;l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];a=e[5];S=n[e[o]];n[a+1]=S;n[a]=S[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];t[e[o]]=n[e[5]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];l=n[e[5]]and l+1 or e[o];end;elseif a<=6 then if a==5 then local S;local E;local H;local a;local O,i,f,h;n[e[5]]=t[e[o]];l=l+1;e=d[l];for n,l in C(A)do for d,n in C(l[c])do O,i,f,h={l[n]:byte(1,#l[n])},'',e[5],e[o]for e=1,#O do i,f=i..r(B(O[e],f)),(f+h)%256 end l[n],l[c]=i,{};end end;l=l+1;e=d[l];a=e[5];H=n[e[o]];n[a+1]=H;n[a]=H[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];n[e[5]]={};l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];a=e[5];E=n[a];S=50*e[7];for e=a+1,e[o]do E[S+e-a]=n[e]end;else n[e[5]]=(e[o]~=0);end;elseif a<=7 then n[e[5]]=n[e[o]];elseif a==8 then n[e[5]][e[o]]=n[e[7]];else local l=e[5]local d={n[l](n[l+1])};local o=0;for e=l,e[7]do o=o+1;n[e]=d[o];end end;elseif a<=14 then if a<=11 then if a==10 then t[e[o]]=n[e[5]];else n[e[5]]=n[e[o]][e[7]];end;elseif a<=12 then l=n[e[5]]and e[o]or l+1;elseif a>13 then local r;local H;local B;local C;local c;local a;a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];n[e[5]]={};l=l+1;e=d[l];a=e[5]n[a](f(n,a+1,e[o]))l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]C={n[a](n[a+1])};B=0;for e=a,e[7]do B=B+1;n[e]=C[B];end l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];a=e[5]n[a]=n[a]()l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]]+e[7];l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];a=e[5]n[a]=n[a]()l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];n[e[5]]={};l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];n[e[5]]=(e[o]~=0);l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]={};l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];a=e[5]n[a]=n[a](n[a+1])l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=e[7];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]][e[o]]=n[e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];a=e[5];H=n[a];r=50*e[7];for e=a+1,e[o]do H[r+e-a]=n[e]end;else n[e[5]]=n[e[o]]*e[7];end;elseif a<=16 then if a==15 then n[e[5]]=n[e[o]]+e[7];else for e=e[5],e[o]do n[e]=nil;end;end;elseif a<=17 then n[e[5]][e[o]]=e[7];elseif a==18 then local e=e[5]n[e](n[e+1])else l=n[e[5]]==e[7]and l+1 or e[o];end;elseif a<=29 then if a<=24 then if a<=21 then if a==20 then n[e[5]]=(e[o]~=0);else n[e[5]]();end;elseif a<=22 then local c;local a;a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];elseif a>23 then local a;local f;local c;t[e[o]]=n[e[5]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];t[e[o]]=n[e[5]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];t[e[o]]=n[e[5]];l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];c=e[5]f={n[c](n[c+1])};a=0;for e=c,e[7]do a=a+1;n[e]=f[a];end l=l+1;e=d[l];l=e[o];else n[e[5]]=t[e[o]];end;elseif a<=26 then if a>25 then do return end;else local l=e[5]local d={n[l](n[l+1])};local o=0;for e=l,e[7]do o=o+1;n[e]=d[o];end end;elseif a<=27 then local l=e[5]n[l]=n[l](f(n,l+1,e[o]))elseif a>28 then local e=e[5]local o,l=h(n[e](n[e+1]))H=l+e-1 local l=0;for e=e,H do l=l+1;n[e]=o[l];end;else n[e[5]]=t[e[o]];end;elseif a<=34 then if a<=31 then if a>30 then n[e[5]]=n[e[o]];else n[e[5]]=n[e[o]]-n[e[7]];end;elseif a<=32 then n[e[5]]=n[e[o]][e[7]];elseif a>33 then local l=e[5];local o=n[e[o]];n[l+1]=o;n[l]=o[e[7]];else local d=e[5];local t=e[7];local a=d+c local d={n[d](n[d+1],n[a])};for e=1,t do n[a+e]=d[e];end;local d=d[1]if d then n[a]=d l=e[o];else l=l+1;end;end;elseif a<=37 then if a<=35 then local H;local h;local S;local a;local E,f,O,F;n[e[5]]={};l=l+1;e=d[l];for n,l in C(A)do for d,n in C(l[c])do E,f,O,F={l[n]:byte(1,#l[n])},'',e[5],e[o]for e=1,#E do f,O=f..r(B(E[e],O)),(O+F)%256 end l[n],l[c]=f,{};end end;l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];a=e[5];S=n[e[o]];n[a+1]=S;n[a]=S[e[7]];l=l+1;e=d[l];a=e[5]h={n[a](n[a+1])};H=0;for e=a,e[7]do H=H+1;n[e]=h[H];end l=l+1;e=d[l];l=e[o];elseif a==36 then local d=n[e[7]];if d then l=l+1;else n[e[5]]=d;l=e[o];end;else local B;local r,C;local c;local a;a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]]-n[e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]]*e[7];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];n[e[5]]={};l=l+1;e=d[l];a=e[5]r,C=h(n[a](n[a+1]))H=C+a-1 B=0;for e=a,H do B=B+1;n[e]=r[B];end;l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,H))l=l+1;e=d[l];a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];l=n[e[5]]and e[o]or l+1;end;elseif a<=38 then local e=e[5]n[e]=n[e](f(n,e+1,H))elseif a==39 then n[e[5]][e[o]]=n[e[7]];else local B=s[e[o]];local f;local a={};f=X({},{__index=function(l,e)local e=a[e];return e[1][e[c]];end,__newindex=function(n,e,l)local e=a[e]e[1][e[c]]=l;end;});for c=1,e[7]do l=l+1;local e=d[l];if e[8]==31 then a[c-1]={n,e[o]};else a[c-1]={t,e[o]};end;S[#S+1]=a;end;n[e[5]]=F(B,f,i);end;elseif a<=61 then if a<=50 then if a<=45 then if a<=42 then if a>41 then local t;local a;local S,H,O,E;for n,l in C(A)do for d,n in C(l[c])do S,H,O,E={l[n]:byte(1,#l[n])},'',e[5],e[o]for e=1,#S do H,O=H..r(B(S[e],O)),(O+E)%256 end l[n],l[c]=H,{};end end;l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];a=e[5];t=n[e[o]];n[a+1]=t;n[a]=t[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];a=e[5];t=n[e[o]];n[a+1]=t;n[a]=t[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];else local c;local a;n[e[5]]=n[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];a=e[5]n[a](n[a+1])l=l+1;e=d[l];n[e[5]]=n[e[o]][e[7]];l=l+1;e=d[l];a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];a=e[5]n[a](f(n,a+1,e[o]))l=l+1;e=d[l];n[e[5]]=i[e[o]];end;elseif a<=43 then local e=e[5]n[e]=n[e](f(n,e+1,H))elseif a==44 then local l=e[5];local d=n[l];local a=50*e[7];for e=l+1,e[o]do d[a+e-l]=n[e]end;else n[e[5]]={};end;elseif a<=47 then if a==46 then for n,l in C(A)do for d,n in C(l[c])do local d,o,e,a={l[n]:byte(1,#l[n])},'',e[5],e[o]for n=1,#d do o,e=o..r(B(d[n],e)),(e+a)%256 end l[n],l[c]=o,{};end end;else n[e[5]]=n[e[o]]*e[7];end;elseif a<=48 then local e=e[5]local o,l=h(n[e](n[e+1]))H=l+e-1 local l=0;for e=e,H do l=l+1;n[e]=o[l];end;elseif a==49 then l=n[e[5]]==e[7]and l+1 or e[o];else n[e[5]]=e[o];end;elseif a<=55 then if a<=52 then if a>51 then l=n[e[5]]and l+1 or e[o];else local B=s[e[o]];local f;local a={};f=X({},{__index=function(l,e)local e=a[e];return e[1][e[c]];end,__newindex=function(n,e,l)local e=a[e]e[1][e[c]]=l;end;});for c=1,e[7]do l=l+1;local e=d[l];if e[8]==31 then a[c-1]={n,e[o]};else a[c-1]={t,e[o]};end;S[#S+1]=a;end;n[e[5]]=F(B,f,i);end;elseif a<=53 then local a;a=e[5]n[a]=n[a]()l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];n[e[5]]=n[e[o]];l=l+1;e=d[l];for e=e[5],e[o]do n[e]=nil;end;l=l+1;e=d[l];l=e[o];elseif a==54 then n[e[5]]=n[e[o]]-n[e[7]];else local e=e[5]n[e](n[e+1])end;elseif a<=58 then if a<=56 then n[e[5]]=e[o];elseif a>57 then n[e[5]]=i[e[o]];else do return end;end;elseif a<=59 then local d=e[5];local l=n[e[o]];n[d+1]=l;n[d]=l[e[7]];elseif a==60 then n[e[5]]={};else local l=e[5]n[l]=n[l](f(n,l+1,e[o]))end;elseif a<=71 then if a<=66 then if a<=63 then if a>62 then n[e[5]]();else do return n[e[5]]end end;elseif a<=64 then local l=e[5];local d=n[l];local a=50*e[7];for e=l+1,e[o]do d[a+e-l]=n[e]end;elseif a>65 then local l=e[5]n[l](f(n,l+1,e[o]))else for n,l in C(A)do for n,d in C(l[c])do local o,e,n,a={l[d]:byte(1,#l[d])},'',e[5],e[o]for d=1,#o do e,n=e..r(B(o[d],n)),(n+a)%256 end l[d],l[c]=e,{};end end;end;elseif a<=68 then if a==67 then local e=e[5]n[e]=n[e]()else local c;local a;a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];t[e[o]]=n[e[5]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];t[e[o]]=n[e[5]];l=l+1;e=d[l];for e=e[5],e[o]do n[e]=nil;end;end;elseif a<=69 then n[e[5]]=i[e[o]];elseif a>70 then local a;local O,H,f,S;for n,l in C(A)do for d,n in C(l[c])do O,H,f,S={l[n]:byte(1,#l[n])},'',e[5],e[o]for e=1,#O do H,f=H..r(B(O[e],f)),(f+S)%256 end l[n],l[c]=H,{};end end;l=l+1;e=d[l];n[e[5]]=i[e[o]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];a=e[5]n[a]=n[a](n[a+1])l=l+1;e=d[l];t[e[o]]=n[e[5]];l=l+1;e=d[l];do return end;else local l=e[5]n[l](f(n,l+1,e[o]))end;elseif a<=76 then if a<=73 then if a>72 then for e=e[5],e[o]do n[e]=nil;end;else n[e[5]]=n[e[o]]+e[7];end;elseif a<=74 then local e=e[5]n[e]=n[e](n[e+1])elseif a>75 then n[e[5]][e[o]]=e[7];else l=e[o];end;elseif a<=79 then if a<=77 then l=e[o];elseif a==78 then local c;local a;n[e[5]]=t[e[o]];l=l+1;e=d[l];a=e[5];c=n[e[o]];n[a+1]=c;n[a]=c[e[7]];l=l+1;e=d[l];n[e[5]]=e[o];l=l+1;e=d[l];a=e[5]n[a]=n[a](f(n,a+1,e[o]))l=l+1;e=d[l];t[e[o]]=n[e[5]];l=l+1;e=d[l];n[e[5]]=t[e[o]];l=l+1;e=d[l];n[e[5]]();l=l+1;e=d[l];do return end;else l=n[e[5]]and l+1 or e[o];end;elseif a<=80 then local d=n[e[7]];if d then l=l+1;else n[e[5]]=d;l=e[o];end;elseif a==81 then l=n[e[5]]and e[o]or l+1;else t[e[o]]=n[e[5]];end;l=l+1;end;end;end;return f({F(s(),{},K())()})or nil;end)(16777216,3,2,"#",tonumber,table.insert)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement