Advertisement
MegumuSenpai

New Whitelist

Aug 10th, 2019
431
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 20.53 KB | None | 0 0
  1. --[[
  2. Made by Megumu#8008
  3. <3
  4. ]]
  5.  
  6. _G.Key = ""
  7.  
  8. local f=string.byte;local i=string.char;local c=string.sub;local r=table.concat;local C=math.ldexp;local L=getfenv or function()return _ENV end;local F=setmetatable;local H=select;local a=unpack;local t=tonumber;local function h(f)local l,n,d="","",{}local a=256;local o={}for e=0,a-1 do o[e]=i(e)end;local e=1;local function O()local l=t(c(f,e,e),36)e=e+1;local n=t(c(f,e,e+l-1),36)e=e+l;return n end;l=i(O())d[1]=l;while e<#f do local e=O()if o[e]then n=o[e]else n=l..c(l,1,1)end;o[a]=l..c(n,1,1)d[#d+1],l,a=n,n,a+1 end;return table.concat(d)end;local d=h('21221427521621M27521422P22Y23B22T22X23423B22Z23222S22V23J23B23F23G22X23E23G21621627921Y21Z27T27923B23321621727922R22522921621927922G22I21T21Y22K21621L27922522G21T2231822722121X22522I1821X21Z28Q28E21621827928O28Q2161Y27923322522K23F28R22M28L22521621B27923C21W22122928R22J2161Z27922S21Z22322121W29H29J28R28Y28428L21V29N27922P21Y22M29T21T2241828528728Z27522N22121T28F21K2A327C27E27G27I27K27M23122U23021A21527526T27921N27926S21426025Z1N2792AX2AJ2B52752B12B323027926P2792B921426P1W1821422U1W2751T29O2141N2BO2141O2AZ2142182AJ2141U23N24F2131S23K21B24O26V23S29F21P2CB24O1T28321421G2791P2CH2CJ27526V25426725Z21P2542C82CG2752CN2142CL2CX27926V24O2CC2D424O2BF2752BH2BJ2BL2BN27527021C2B31E21C27527121K22W2142192C02BQ2752192BU1P2BX2DP2751U23F2C421923C2C826V22O2CR21P22O2CV2CM2CK2EB2CO1G2CC2EF24O26O102B321O102DE1O2B32181O27526P21K2AJ23F2C026V182E7182C826O1G2EL1G2ET1W24O21423H2BU26W22O2B321922O2ET21C2BL2192DJ2BI1W23S2DO2BU2BJ2482FR27526W2202FG2202FJ2AJ2FM27526O21S2FG21S2F82G22BU26V26W2662CS26W21A24O2BB2B42B62142B82B62BU23D2BU2CW2CI2EC2D127526Q1O2BL1S2ES2C92EN21421P2EN2C92DN2H42DN2C922827421P22825Y22F26Q23C2GZ23C2142C92FI2H42FI2C92G02H42G02C921C2132H421C25Z2HH22G2GZ22G2HM26V2G82H42G82C92FA2H42FA2H72HD22W2HG26Q2542GZ2542I524G27521P2IN2C92FQ2H42FQ2C92542HX2CT2I026Q2482GZ2FU2C923K2IO2J52C926G2IO2J92C92142HD2142IH1W162141S1W2HG26V2JD2H42JF22F26V25K2IO2JT2C922G2IX22G2IZ2602GZ2602I525C2IO2K52C925S2IO2K92C92402112H424025X2HH214192JJ2142152K82KA2I51W2AV21P2KR2C923C2IX23C2IZ21K2KK1S21K2KN26V2KR2H42KU26V21C2KS2LA2HB2KE2HE2KH26Q182L1182L42LA2HY2L4102KS2LP2C91O2IX1O2IZ1O2L11O2LO2LQ2L41G2KS2M32H22LE102LG22W2L122W2M22M42L422O2KS2MG2C921K2IX21K2IZ10152JJ2M82JR182LE182KH26V2342KS2MY2JC2LE2142LG2202L12202L42MY2H42N02I62KS21S2L42602HD2602IH2482MP1S2482MW23K2LE23K2MW26G2102H426G25W2KI2NL2N32JR25S2NU21P25S2NX2JS2HD25K2IH25C142JJ25C2O625K2O325K2O62142N22LG24W2OC1S24W2O62542O32542O626W2HD26W2IH21S2OO21S2O62202O32202OV2O326W2NX26Q2P02JJ2P22JR2P42HT2O626G2HD26G2IH1G2OO1G2O61O2O31O2O61G2O32PP2HH22W2OO22W2PU2PW2O62482HD2482IH182OO182O621C2O321C2O61W2O31W2PA1W2OO2QJ2JR2142O32142O623S2HD23S2IH26W132JJ26W25V2JR26829O21P2682R126V22W2O32Q12HH25K2QY1S25K2R726O2R426O2R72542HD2542IH2682RE2R62JR26G2R426G2R723S2R423S2R12II2RE2542R724G2R424G2R724O2HD24O2IH24G2RE2S82JR24O2R424O2R72402R42402S12482RE2482R723K2R423K2R722G2HD22G2IH2GY21422O2H126V2H32H52I52H821P2HA26V1O2R41O2S12HJ2T32HL2HN2IO2HQ26V2HS21P2HU2D32SJ2S12I22T32I42C92I721P2I92D32IO2ID26V26029421P26025U2HH2IJ2T32IL2C92IN2H42IQ2CA2IO2IU2CP2IX2542IZ2J12T32J326V2J52H42J726V2J92NV2I52402U72402UA26Q26W2BL22O26W2I52682IO2VB2C92JT2H42JV26V2JX2H42JZ2HH2K12T32K32C92K52H42K726V2K92H42KB26V2282U72282V42KJ2T32KM2KO2VW2KQ2KS2L82KW2H42KY2HH2L02T32L32C92L62KT2LL2LB2L41O2U71O2V42LI2T32LK2HV2WM2H22M12LS2LU2LW2KK2T42M02H42LR26V2M32H42M52VU1X2VW25T2PY2X22MC2C92X821P2XA2MG2HP2L42MK2H42MM2HH23C2X223C2MF2MH2N82MZ2L42402XC21P2402XE26Q2N52T32N72C92N921P2NB2NE2I82NF2NH2IH22G122TW2UA2I62U721S2YM2282Y22282Y5228112T32YT2JR22G2Y222G2XE2O72VG2IH2202YW22O2202Z32342Y22342Z322O2Y222O2Y522W2Z822W2Z31G2Y21G2Z32OW2H42OY2HH102Z8102Z3182Y2182Z321K2Y221K2Y521K2Z831062JR1W2Y21W2Z32PJ2NV2IH2142Z82142Z325S2BO2O425S2JR25K310O25K310Q26Q25K2EN22O310U2JR26O310O26O310Q26V2Q52H42Q72HH26W310Y26W3115268310O2683115248310O248310V248310Y311L2JR23K310O23K31152QT2IT2IH254310Y254311524G310O24G311524O310O24O310V24O310Y31282JR228310O22831152RM2H42RO2HH220310Y2203115234310O234311523C310O23C310V234310Y312S2JR312U2WC31252SB2PM310Y1G31151O310O1O311518310O18310V10310Y10313D313F31152SY2VK2JM220310O312O311Q2O323K2PI2O32NW2JR2ZG2HP2Z32Z02VK2ZZ3101310331052XE2KM2792FN279314E2141L2H8314F22T314I27922W23J314L2791K314P2751J22W2162XC27522729722321Z21Y22J22K29M2NU314Y31503152315422128E29M28927522422522222L22729Y314Y28P29D29427529629829A29C29E29G29I29K22I29M2BR21429Q29S29U315Y29X2AD21422R2A027Y27527W315M2142AF2AH316D2142802822842862162BU21422K21Z315428C21Y315L21A27923H22J28R22P224314F21422W24N314S26G22I314S2141M317D21G314P26G26226022W2352B02B225Z2BD2ET2H321B2H32701W2FG2FD21K2FG2C026C2DG25Z2G3214268182FG2BL21426K2EK31852H326P102G2317V2EP25Z21O2ES214272318B21J2BL2HV2B321P2DJ24O2712BG27926W318L318N2DK2EV2142EX2CO25C318V2K72702F5318M2F7318P318R318T2L9318V318X318Z2D93191319E21O319G2DL2EW2EY248318V2J327022W2EL2H82722HO21J2TN31A02CS2HA319Z31A131952I41W2C02722H321J2H62EZ318V318T319N2BS319131A721O2H826X21C31AD2FN319T31972EY23C318V2TK2702FF318M2HO2DL2FQ23H31822342FG2342DK2FK2DO31AW21K2J92DX2142DL2V931BK26C22G2FG2I431BL21C2G22FN2702282FG2282DK31AE2FV2142U525Z2CS2B322F317W2BC2BU26Y31C2172BO24O26T2C01F318224O2B322S2IB26D182L3219318B2692FN318626K2542FG2IL21426G31B42FH27526H1G2FQ219319G25S31BB318531BD21426H31BF318631D731BJ319G31D72LZ31DA31D61G2MC31DP31DG1G2XV31DT31D72N731DX1G22G21531E024O31E3319G26L21K2FL2C026H2BU2DT27531CV2FL2FN26E2542HL2192UE26V24G318V2IQ26D2FN1N2FN26831CZ25Z1Z31D126K31D42HO26L1O31D9318O25W31DD21931DF26L31DI2FN31F431BJ318O31F431DO31FH1O31DS31FK31DW31FK31DZ31FK31E221931FK31E531FT31EF31E92DO2C026L31ED2BU31ES2DS2FN26D279315F31C4317X318531CG31BP2EQ31BS26D2C022W2C026T2GP316R2CH214315Q214216315721421S21Z21Z21V22622L21Y22322K21T315228828I22I22I21Z22I216316Z315G29721Z22L31HB2HX31HE316T31HH23B31GZ31H131H331H53169291315P29529729922I29B22329D29F27529V315Z316129P29R29T31I4316829Z2232A127U316E21Z2CY31122EL2BU26Q31AH31AJ31892CS318T31IJ318M2BU31AN2BH26W3180318M2C026P31BU31972FN2CP318V2UE26O318421O2FN26Q2H821J2TC319E2XK2HM26O31IP21O318B31IM27531AI2I531IP21P31IR31JK318B31IV319131IY21O31J031J223F31J431JG2F72EI318E2EM2F82G021M2FD319E31DT31J131EH2F82FA31EE2FO2IL31KJ26W31B031852HL2BI31J2318631GL2752GQ2752AV31G827931HC279316V28D315L316922321S22131HB316922222922K22531763177317A314O2BX21426W31GB162BU31AT31KG21426C31GB31KJ31CQ2ES31CT31EF31KZ27531GH31EA31M1182DN31LY318P31CW318X26V31IY21P2AJ24O2692BU1U2BU26A31C21931CG2JN318V27531MF2BU2BT31M42HL15318B31CQ2HL23131MX31M52DO318B26X2C031BK26X31M021431KU31C331GO214314X31GR31LG314E2602BH314E31AR31NH31NH1W317D2DM31L127531L3316X316N31NT22L222316G31L731L91Q319131GB2152BU26C31IY31BK26931N926K31O92C026F25K2FG2JV25X314C27925T1W2ES1W2BU25X22W2IL22Q2H826I21K2FA1T31ME2L5318V31CG2722482AJ192US23K318V2J725W31IP218318B25S318E2182H326431IY2BZ27525Z31CM25Z23C2ID25H1G2G022Y319G25I22G2FU1S2TX2I6318V2I925H31ET2FN25D27931GT25O31KD319G25P22G31KI31BS25L31N9251319G31DT24X31QN31QF182FL318B25L2342FL31DF25L317X31C325131N62C025D31QS31N327526X22031BN2HS31MO318531MQ25Z21S31C61C31RH22F26F1W31RI31RN22F27223431P731BD2KV31B12HM31O82EQ2C031MG31OP2BU31OD31RZ27526F318E23C2H625X31Q827525S319E1O319G25T22O31KL2HO31PL318127525T31FY31N731OT2DO2H826F26G31RI31SW22F31N527531GJ2AW31GM27531ND');local o=bit and bit.bxor or function(e,l)local n,o=1,0 while e>0 and l>0 do local d,c=e%2,l%2 if d~=c then o=o+n end e,l,n=(e-d)/2,(l-c)/2,n*2 end if e<l then e=l end while e>0 do local l=e%2 if l>0 then o=o+n end e,n=(e-l)/2,n*2 end return o end local function l(l,e,n)if n then local e=(l/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(l%(e+e)>=e)and 1 or 0;end;end;local e=1;local function n()local l,n,d,c=f(d,e,e+3);l=o(l,40)n=o(n,40)d=o(d,40)c=o(c,40)e=e+4;return(c*16777216)+(d*65536)+(n*256)+l;end;local function t()local l=o(f(d,e,e),40);e=e+1;return l;end;local function O()local o=n();local e=n();local c=1;local o=(l(e,1,20)*(2^32))+o;local n=l(e,21,31);local e=((-1)^l(e,32));if(n==0)then if(o==0)then return e*0;else n=1;c=0;end;elseif(n==2047)then return(o==0)and(e*(1/0))or(e*(0/0));end;return C(e,n-1023)*(c+(o/(2^52)));end;local C=n;local function h(l)local n;if(not l)then l=C();if(l==0)then return'';end;end;n=c(d,e,e+l-1);e=e+l;local l={}for e=1,#n do l[e]=i(o(f(c(n,e,e)),40))end return r(l);end;local e=n;local function i(...)return{...},H('#',...)end local function I()local a={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,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={0,0,0};local e={};local d={a,nil,f,nil,e};local e=n()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};for n=1,e do local l=t();local e;if(l==1)then e=(t()~=0);elseif(l==0)then e=O();elseif(l==2)then e=h();end;c[n]=e;end;d[2]=c for d=1,n()do local c=o(n(),221);local n=o(n(),5);local o=l(c,1,2);local e=l(n,1,11);local e={e,l(c,3,11),nil,nil,n};if(o==0)then e[3]=l(c,12,20);e[5]=l(c,21,29);elseif(o==1)then e[3]=l(n,12,33);elseif(o==2)then e[3]=l(n,12,32)-1048575;elseif(o==3)then e[3]=l(n,12,32)-1048575;e[5]=l(c,21,29);end;a[d]=e;end;d[4]=t();for e=1,n()do f[e-1]=I();end;return d;end;local function C(e,h,O)local l=e[1];local n=e[2];local c=e[3];local e=e[4];return function(...)local o=l;local d=n;local G=c;local r=e;local e=i local l=1;local f=-1;local c={};local s={...};local B=H('#',...)-1;local K={};local n={};for e=0,B do if(e>=r)then c[e-r]=s[e+1];else n[e]=s[e+1];end;end;local e=B-r+1 local e;local c;while true do e=o[l];c=e[1];if c<=42 then if c<=20 then if c<=9 then if c<=4 then if c<=1 then if c==0 then n[e[2]]=n[e[3]]-d[e[5]];else n[e[2]]=d[e[3]];end;elseif c<=2 then local a;local f;local c;n[e[2]]={unpack({},1,e[3])};l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];c=e[2];f=n[c];a=e[3];for e=1,a do f[e]=n[c+e]end;elseif c==3 then n[e[2]]=n[e[3]]+n[e[5]];else local c;n[e[2]]=d[e[3]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];n[e[2]]=#n[e[3]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];c=e[2];n[c]=n[c]-n[c+2];l=l+e[3];end;elseif c<=6 then if c>5 then n[e[2]]();f=A;else local l=e[2];local o={};local e=l+e[3]-1;for e=l+1,e do o[#o+1]=n[e];end;do return n[l](a(o,1,e-l))end;end;elseif c<=7 then if n[e[2]]then l=l+1;else l=l+e[3];end;elseif c==8 then n={};for e=0,B do if e<r then n[e]=s[e+1];else break end;end;else local C;local G;local r;local i;local c;local H;local t;n[e[2]]=h[e[3]];l=l+1;e=o[l];n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];t=e[2];H={};c=0;i=t+e[3]-1;for e=t+1,i do c=c+1;H[c]=n[e];end;r={n[t](a(H,1,i-t))};i=t+e[5]-2;c=0;for e=t,i do c=c+1;n[e]=r[c];end;f=i;l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]][n[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];t=e[2];H={};c=0;i=t+e[3]-1;for e=t+1,i do c=c+1;H[c]=n[e];end;r={n[t](a(H,1,i-t))};i=t+e[5]-2;c=0;for e=t,i do c=c+1;n[e]=r[c];end;f=i;l=l+1;e=o[l];G=e[3];C=n[G]for e=G+1,e[5]do C=C..n[e];end;n[e[2]]=C;l=l+1;e=o[l];l=l+e[3];end;elseif c<=14 then if c<=11 then if c>10 then n[e[2]]=h[e[3]];else n[e[2]]=-n[e[3]];end;elseif c<=12 then n[e[2]]();f=A;elseif c==13 then n[e[2]]=n[e[3]][d[e[5]]];else local h;local r;local i;local t;local H;local C;local c;n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];c=e[2];C=n[e[3]];n[c+1]=C;n[c]=C[d[e[5]]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;r={n[c](a(H,1,i-c))};i=c+e[5]-2;t=0;for e=c,i do t=t+1;n[e]=r[t];end;f=i;l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]*d[e[5]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;r={n[c](a(H,1,i-c))};i=c+e[5]-2;t=0;for e=c,i do t=t+1;n[e]=r[t];end;f=i;l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];c=e[2];H={};i=c+e[3]-1;for e=c+1,i do H[#H+1]=n[e];end;do return n[c](a(H,1,i-c))end;l=l+1;e=o[l];c=e[2];i=f;h={};t=0;for e=c,i do t=t+1;h[t]=n[e];end;do return a(h,1,t)end;l=l+1;e=o[l];l=l+e[3];end;elseif c<=17 then if c<=15 then n[e[2]]=n[e[3]]*d[e[5]];elseif c>16 then n[e[2]]=O[d[e[3]]];else l=l+e[3];end;elseif c<=18 then if(n[e[2]]==n[e[5]])then l=l+1;else l=l+e[3];end;elseif c==19 then n[e[2]]=n[e[3]]+d[e[5]];else n[e[2]]=n[e[3]]-d[e[5]];end;elseif c<=31 then if c<=25 then if c<=22 then if c>21 then n={};for e=0,B do if e<r then n[e]=s[e+1];else break end;end;else n[e[2]]=n[e[3]][n[e[5]]];end;elseif c<=23 then local r;local i;local t;local H;local O;local c;c=e[2];O=n[e[3]];n[c+1]=O;n[c]=O[d[e[5]]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;r={n[c](a(H,1,i-c))};i=c+e[5]-2;t=0;for e=c,i do t=t+1;n[e]=r[t];end;f=i;l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];c=e[2];O=n[e[3]];n[c+1]=O;n[c]=O[d[e[5]]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;n[c](a(H,1,i-c));f=c;elseif c==24 then n[e[2]]=n[e[3]]-n[e[5]];else n[e[2]]=(e[3]~=0);end;elseif c<=28 then if c<=26 then if n[e[2]]then l=l+1;else l=l+e[3];end;elseif c>27 then n[e[2]]=O[d[e[3]]];else n[e[2]]=C(G[e[3]],nil,O);end;elseif c<=29 then n[e[2]]=#n[e[3]];elseif c==30 then local l=e[2];local c,o={n[l]()};local o=l+e[5]-2;local e=0;for l=l,o do e=e+1;n[l]=c[e];end;f=o;else n[e[2]]=n[e[3]][n[e[5]]];end;elseif c<=36 then if c<=33 then if c==32 then if(n[e[2]]~=d[e[5]])then l=l+1;else l=l+e[3];end;else local o=e[2];local d=n[o+2];local c=n[o]+d;n[o]=c;if d>0 then if c<=n[o+1]then l=l+e[3];n[o+3]=c;end;elseif c>=n[o+1]then l=l+e[3];n[o+3]=c;end;end;elseif c<=34 then n[e[2]]=n[e[3]];elseif c==35 then n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];if(n[e[2]]==n[e[5]])then l=l+1;else l=l+e[3];end;else if not n[e[2]]then l=l+1;else l=l+e[3];end;end;elseif c<=39 then if c<=37 then n[e[2]]=n[e[3]]%d[e[5]];elseif c==38 then n[e[2]]=#n[e[3]];else local c=e[2];local o=f;local l={};local e=0;for o=c,o do e=e+1;l[e]=n[o];end;do return a(l,1,e)end;end;elseif c<=40 then n[e[2]]=n[e[3]]+n[e[5]];elseif c==41 then do return end;else local f=G[e[3]];local a;local c={};a=F({},{__index=function(l,e)local e=c[e];return e[1][e[2]];end,__newindex=function(n,e,l)local e=c[e]e[1][e[2]]=l;end;});for d=1,e[5]do l=l+1;local e=o[l];if e[1]==34 then c[d-1]={n,e[3]};else c[d-1]={h,e[3]};end;K[#K+1]=c;end;n[e[2]]=C(f,a,O);end;elseif c<=64 then if c<=53 then if c<=47 then if c<=44 then if c==43 then local r;local i;local c;local H;local t;n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];t=e[2];H={};c=0;i=t+e[3]-1;for e=t+1,i do c=c+1;H[c]=n[e];end;r={n[t](a(H,1,i-t))};i=t+e[5]-2;c=0;for e=t,i do c=c+1;n[e]=r[c];end;f=i;l=l+1;e=o[l];n[e[2]]=n[e[3]]-d[e[5]];l=l+1;e=o[l];if n[e[2]]then l=l+1;else l=l+e[3];end;else n[e[2]]=n[e[3]]+d[e[5]];end;elseif c<=45 then local o=e[2];local l=n[e[3]];n[o+1]=l;n[o]=l[d[e[5]]];elseif c>46 then l=l+e[3];else n[e[2]]={unpack({},1,e[3])};end;elseif c<=50 then if c<=48 then if(n[e[2]]>n[e[5]])then l=l+1;else l=l+e[3];end;elseif c==49 then if(n[e[2]]==n[e[5]])then l=l+1;else l=l+e[3];end;else n[e[2]]=(e[3]~=0);end;elseif c<=51 then n[e[2]]=-n[e[3]];elseif c==52 then n[e[2]]={unpack({},1,e[3])};else local H;local C;local h;local i;local c;local r;local t;n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];t=e[2];r={};c=0;i=t+e[3]-1;for e=t+1,i do c=c+1;r[c]=n[e];end;h={n[t](a(r,1,i-t))};i=t+e[5]-2;c=0;for e=t,i do c=c+1;n[e]=h[c];end;f=i;l=l+1;e=o[l];C=e[3];H=n[C]for e=C+1,e[5]do H=H..n[e];end;n[e[2]]=H;end;elseif c<=58 then if c<=55 then if c>54 then local o=e[2];local d=n[o+2];local c=n[o]+d;n[o]=c;if d>0 then if c<=n[o+1]then l=l+e[3];n[o+3]=c;end;elseif c>=n[o+1]then l=l+e[3];n[o+3]=c;end;else local l=e[2];local c={};local o=0;local e=l+e[3]-1;for e=l+1,e do o=o+1;c[o]=n[e];end;n[l](a(c,1,e-l));f=l;end;elseif c<=56 then n[e[2]]=d[e[3]];elseif c>57 then n[e[2]]=n[e[3]];else n[e[2]]=h[e[3]];end;elseif c<=61 then if c<=59 then local o=e[3];local l=n[o]for e=o+1,e[5]do l=l..n[e];end;n[e[2]]=l;elseif c==60 then if(n[e[2]]>n[e[5]])then l=l+1;else l=l+e[3];end;else n[e[2]]=n[e[3]]*d[e[5]];end;elseif c<=62 then local o=e[2];local c=o+e[3]-2;local l={};local e=0;for o=o,c do e=e+1;l[e]=n[o];end;do return a(l,1,e)end;elseif c==63 then local l=e[2];local o=n[e[3]];n[l+1]=o;n[l]=o[d[e[5]]];else local i;local H;local t;local O;local c;n[e[2]]=n[e[3]]%d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];c=e[2];O={};t=c+e[3]-1;for e=c+1,t do O[#O+1]=n[e];end;do return n[c](a(O,1,t-c))end;l=l+1;e=o[l];c=e[2];t=f;H={};i=0;for e=c,t do i=i+1;H[i]=n[e];end;do return a(H,1,i)end;l=l+1;e=o[l];do return end;end;elseif c<=75 then if c<=69 then if c<=66 then if c>65 then local a=G[e[3]];local d;local c={};d=F({},{__index=function(l,e)local e=c[e];return e[1][e[2]];end,__newindex=function(n,e,l)local e=c[e]e[1][e[2]]=l;end;});for d=1,e[5]do l=l+1;local e=o[l];if e[1]==34 then c[d-1]={n,e[3]};else c[d-1]={h,e[3]};end;K[#K+1]=c;end;n[e[2]]=C(a,d,O);else n[e[2]]=C(G[e[3]],nil,O);end;elseif c<=67 then local o=e[3];local l=n[o]for e=o+1,e[5]do l=l..n[e];end;n[e[2]]=l;elseif c==68 then local l=e[2];local o=n[l];local e=e[3];for e=1,e do o[e]=n[l+e]end;else local l=e[2];local c=l+e[3]-2;local o={};local e=0;for l=l,c do e=e+1;o[e]=n[l];end;do return a(o,1,e)end;end;elseif c<=72 then if c<=70 then local o=e[2];local c={};local l=0;local d=o+e[3]-1;for e=o+1,d do l=l+1;c[l]=n[e];end;local c={n[o](a(c,1,d-o))};local e=o+e[5]-2;l=0;for e=o,e do l=l+1;n[e]=c[l];end;f=e;elseif c==71 then n[e[2]]=n[e[3]]%d[e[5]];else local l=e[2];local o={};local e=l+e[3]-1;for e=l+1,e do o[#o+1]=n[e];end;do return n[l](a(o,1,e-l))end;end;elseif c<=73 then local r;local i;local t;local H;local C;local c;n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];c=e[2];C=n[e[3]];n[c+1]=C;n[c]=C[d[e[5]]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;r={n[c](a(H,1,i-c))};i=c+e[5]-2;t=0;for e=c,i do t=t+1;n[e]=r[t];end;f=i;l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]+d[e[5]];l=l+1;e=o[l];n[e[2]]=n[e[3]]*d[e[5]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;r={n[c](a(H,1,i-c))};i=c+e[5]-2;t=0;for e=c,i do t=t+1;n[e]=r[t];end;f=i;l=l+1;e=o[l];n[e[2]]=n[e[3]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;r={n[c](a(H,1,i-c))};i=c+e[5]-2;t=0;for e=c,i do t=t+1;n[e]=r[t];end;f=i;l=l+1;e=o[l];if(n[e[2]]==n[e[5]])then l=l+1;else l=l+e[3];end;elseif c>74 then local l=e[2];local c,o={n[l]()};local o=l+e[5]-2;local e=0;for l=l,o do e=e+1;n[l]=c[e];end;f=o;else n[e[2]]=n[e[3]][d[e[5]]];end;elseif c<=80 then if c<=77 then if c>76 then if(n[e[2]]~=d[e[5]])then l=l+1;else l=l+e[3];end;else local o=e[2];n[o]=n[o]-n[o+2];l=l+e[3];end;elseif c<=78 then if not n[e[2]]then l=l+1;else l=l+e[3];end;elseif c>79 then local C;local i;local t;local H;local r;local c;c=e[2];r=n[e[3]];n[c+1]=r;n[c]=r[d[e[5]]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;C={n[c](a(H,1,i-c))};i=c+e[5]-2;t=0;for e=c,i do t=t+1;n[e]=C[t];end;f=i;l=l+1;e=o[l];n[e[2]]=n[e[3]][d[e[5]]];l=l+1;e=o[l];c=e[2];r=n[e[3]];n[c+1]=r;n[c]=r[d[e[5]]];l=l+1;e=o[l];n[e[2]]=d[e[3]];l=l+1;e=o[l];c=e[2];H={};t=0;i=c+e[3]-1;for e=c+1,i do t=t+1;H[t]=n[e];end;n[c](a(H,1,i-c));f=c;l=l+1;e=o[l];n[e[2]]=O[d[e[3]]];l=l+1;e=o[l];n[e[2]]();f=c;else n[e[2]]=n[e[3]]-n[e[5]];end;elseif c<=83 then if c<=81 then local l=e[2];local o=n[l];local e=e[3];for e=1,e do o[e]=n[l+e]end;elseif c==82 then local o=e[2];local c=f;local l={};local e=0;for o=o,c do e=e+1;l[e]=n[o];end;do return a(l,1,e)end;else local o=e[2];local d={};local l=0;local c=o+e[3]-1;for e=o+1,c do l=l+1;d[l]=n[e];end;local c={n[o](a(d,1,c-o))};local e=o+e[5]-2;l=0;for e=o,e do l=l+1;n[e]=c[l];end;f=e;end;elseif c<=84 then do return end;elseif c==85 then local o=e[2];n[o]=n[o]-n[o+2];l=l+e[3];else local l=e[2];local c={};local o=0;local e=l+e[3]-1;for e=l+1,e do o=o+1;c[o]=n[e];end;n[l](a(c,1,e-l));f=l;end;l=l+1;end;end;end;return C(I(),{},L())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement