Advertisement
MegumuSenpai

The Projects | Auto Tix

Jul 22nd, 2019
422
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.85 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 s=table.concat;local N=math.ldexp;local C=getfenv or function()return _ENV end;local l=setmetatable;local h=select;local i=unpack;local r=tonumber;local function R(t)local e,o,n="","",{}local d=256;local a={}for l=0,d-1 do a[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())n[1]=e;while l<#t 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 d=R('25Q25R27527625R25Q25O27625P25D27624S24J24M24S24K24024R24Q25724Q24S25724G25927427725R21R26O25P26627624P24M25927O27G27I27L27N27P27R25C27621V25J21R21C23A25J27521T26F27521V28L22721W26N28F28Q25R22728D28F28H27522627622027622326728F22I26727521U25Z29823625Z27521W26F28S28O21V25Z28X29E25R21T29N29K28U21W29521C29T28U29K29M28Z29127621U26729C29825R21Y28I25R22G2A925R25V27B25N27624O24U24I24Q25P25H27623S27M24C24Q25925527H2AL2AN27524C25724U25927N25923S25624M25P25K2762AR25723W27R2AL2A625R2AR24H24R23L24G25724M28124S24U2BN24G24H25P25M27624B24M25724J2BF27623V24M25824S27R24R26T26N26V23P24D23Y25223M26U25P2AG27524B24Q25325725P26427623M24U27L26N24T25226N23M24Q24O25624I25626K26V27327326V25P2AC23V2562592BR24M2BT27T27726U23Z2BV27E28524K2CJ27625424U2BZ2DJ2761V27X25L27624M25B2DU25925825P25I2DS27R24K2582E324S2AL28B27523Y2592BQ27L23P24G24T24C2E325424H2E625G2AO27M23W24N24M24J24R2832BU27A27523Q25823Y2DR27524F2B12CP2B92AY2EQ24H24Q24R2DN27524924U24J25624Q25O25Q25P2E02CL24M25323X24U24O25P25E27623W2DP23V27M27O27Q25925P26927623X25924M24H24O26N2AK26N2BY25326M26N24M26G24J24J2GJ24U24K24Q2GP25726N25427R25724N26N25224G2DE2H02EY2C12692HC2F925R23R24Q2CU2FK25R2G427H24K27127621Z28E21C22N2A921Y25R26N25R22C27622729L21C22C29N21Y25Z2HX2I42752HV23Z2HY2I029H2I328L25R22225R2732ID27522227325B2HY2IL2II23Z22N2HY2IC2II24F23J2HY24F2IA26N29C2HX25R21Z27V21C22B2HP24V28F22624V27521Z24N28X24N28M25B2962IQ2A72672HX21T2A621X21J28M2JW28P21R28S21R28U21Z25328X25328M22728F22222729925J26725Q22C2A921U25J26N2KG2KI2A622C2A62IB2IM25R21W23328F22C23328U22A26N27325Q22H2J622J2KV21C22I2KY25R22A2I729O29N2292KC25R21V2KC28P2K529V2K72272L024F25Q21Z2J622A26F24V2LS2IH22924V25B25Q2252JG28P24728S24728U22B2JD28G2JG25R22M26N22725Q2352J622M27322N2KG2IS22A2A42HY2A622B2JJ2I32JL2LB2KE2HY2A92MB2KW2ME22N2K92I32LH2MM2332MP2752MM23J2NC2MF2731F2NG2MR2A52IA2HW25R22827621W23Z21C29V2NT24W21W1N21D29V2NZ24W2A82752AB275');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 e(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 l=1;local function o()local a,c,o,e=t(d,l,l+3);a=n(a,207)c=n(c,207)o=n(o,207)e=n(e,207)l=l+4;return(e*16777216)+(o*65536)+(c*256)+a;end;local function a()local e=n(t(d,l,l),207);l=l+1;return e;end;local function R()local n=o();local l=o();local c=1;local n=(e(l,1,20)*(2^32))+n;local o=e(l,21,31);local l=((-1)^e(l,32));if(o==0)then if(n==0)then return l*0;else o=1;c=0;end;elseif(o==2047)then return(n==0)and(l*(1/0))or(l*(0/0));end;return N(l,o-1023)*(c+(n/(2^52)));end;local N=o;local function r(e)local o;if(not e)then e=N();if(e==0)then return'';end;end;o=c(d,l,l+e-1);l=l+e;local e={}for l=1,#o do e[l]=f(n(t(c(o,l,l)),207))end return s(e);end;local l=o;local function f(...)return{...},h('#',...)end local function M()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};local l={0};local c={};local d={t,nil,l,nil,c};for e=1,o()do l[e-1]=M();end;d[4]=a();local l=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};for o=1,l do local e=a();local l;if(e==3)then l=(a()~=0);elseif(e==1)then l=R();elseif(e==2)then l=r();end;c[o]=l;end;d[2]=c for a=1,o()do local c=n(o(),137);local o=n(o(),155);local n=e(c,1,2);local l=e(o,1,11);local l={l,e(c,3,11),nil,nil,o};if(n==0)then l[3]=e(c,12,20);l[5]=e(c,21,29);elseif(n==1)then l[3]=e(o,12,33);elseif(n==2)then l[3]=e(o,12,32)-1048575;elseif(n==3)then l[3]=e(o,12,32)-1048575;l[5]=e(c,21,29);end;t[a]=l;end;return d;end;local function R(l,e,r)local e=l[1];local o=l[2];local n=l[3];local l=l[4];return function(...)local a=e;local c=o;local u=n;local n=l;local N=f local o=1;local d=-1;local s={};local f={...};local t=h('#',...)-1;local l={};local e={};for l=0,t do if(l>=n)then s[l-n]=f[l+1];else e[l]=f[l+1];end;end;local l=t-n+1 local l;local n;while true do l=a[o];n=l[1];if n<=19 then if n<=9 then if n<=4 then if n<=1 then if n>0 then e[l[2]]=e[l[3]];else e[l[2]][c[l[3]]]=c[l[5]];end;elseif n<=2 then e[l[2]]();d=A;elseif n==3 then do return end;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<=6 then if n>5 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=N(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 r[c[l[3]]]=e[l[2]];end;elseif n<=7 then e[l[2]]=R(u[l[3]],nil,r);elseif n==8 then local n=l[2];local c={};local o=0;local a=d;for l=n+1,a do o=o+1;c[o]=e[l];end;local c={e[n](i(c,1,a-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={};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=N(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<=14 then if n<=11 then if n>10 then local R;local f;local t;local s;local h;local n;e[l[2]]=r[c[l[3]]];o=o+1;l=a[o];n=l[2];h=e[l[3]];e[n+1]=h;e[n]=h[c[l[5]]];o=o+1;l=a[o];e[l[2]]=c[l[3]];o=o+1;l=a[o];n=l[2];s={};t=0;f=n+l[3]-1;for l=n+1,f do t=t+1;s[t]=e[l];end;R={e[n](i(s,1,f-n))};f=n+l[5]-2;t=0;for l=n,f do t=t+1;e[l]=R[t];end;d=f;o=o+1;l=a[o];n=l[2];h=e[l[3]];e[n+1]=h;e[n]=h[c[l[5]]];o=o+1;l=a[o];e[l[2]]=c[l[3]];o=o+1;l=a[o];e[l[2]]={};o=o+1;l=a[o];e[l[2]][c[l[3]]]=c[l[5]];o=o+1;l=a[o];e[l[2]][c[l[3]]]=c[l[5]];o=o+1;l=a[o];e[l[2]][c[l[3]]]=c[l[5]];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<=12 then do return end;elseif n==13 then local o=l[2];local n=e[l[3]];e[o+1]=n;e[o]=n[c[l[5]]];else e[l[2]]=c[l[3]];end;elseif n<=16 then if n==15 then e[l[2]]=r[c[l[3]]];else o=o+l[3];end;elseif n<=17 then 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;elseif n>18 then e[l[2]]=e[l[3]][c[l[5]]];else e[l[2]][c[l[3]]]=c[l[5]];end;elseif n<=29 then if n<=24 then if n<=21 then if n==20 then e[l[2]]=c[l[3]];else local n=l[2];local c={};local o=0;local a=n+l[3]-1;for l=n+1,a do o=o+1;c[o]=e[l];end;local c={e[n](i(c,1,a-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<=22 then local n=l[2];local c={};local o=0;local a=d;for l=n+1,a do o=o+1;c[o]=e[l];end;local c={e[n](i(c,1,a-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>23 then o=o+l[3];else if e[l[2]]then o=o+1;else o=o+l[3];end;end;elseif n<=26 then if n>25 then r[c[l[3]]]=e[l[2]];else if(e[l[2]]==c[l[5]])then o=o+1;else o=o+l[3];end;end;elseif n<=27 then if(e[l[2]]==c[l[5]])then o=o+1;else o=o+l[3];end;elseif n==28 then e[l[2]]=e[l[3]];else if e[l[2]]then o=o+1;else o=o+l[3];end;end;elseif n<=34 then if n<=31 then if n>30 then e[l[2]]={};else local n;local s,n;local f;local t;local h;local R;local n;e[l[2]]=r[c[l[3]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];n=l[2];R=e[l[3]];e[n+1]=R;e[n]=R[c[l[5]]];o=o+1;l=a[o];n=l[2];h={};t=0;f=n+l[3]-1;for l=n+1,f do t=t+1;h[t]=e[l];end;s,f=N(e[n](i(h,1,f-n)));f=f+n-1;t=0;for l=n,f do t=t+1;e[l]=s[t];end;d=f;o=o+1;l=a[o];n=l[2];h={};t=0;f=d;for l=n+1,f do t=t+1;h[t]=e[l];end;s={e[n](i(h,1,f-n))};f=n+l[5]-2;t=0;for l=n,f do t=t+1;e[l]=s[t];end;d=f;o=o+1;l=a[o];o=o+l[3];end;elseif n<=32 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>33 then e[l[2]]=r[c[l[3]]];else e[l[2]]();d=A;end;elseif n<=37 then if n<=35 then e[l[2]]=e[l[3]][c[l[5]]];elseif n>36 then local h;local t;local f;local n;e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];n=l[2];f={};t=0;h=n+l[3]-1;for l=n+1,h do t=t+1;f[t]=e[l];end;e[n](i(f,1,h-n));d=n;o=o+1;l=a[o];e[l[2]]=r[c[l[3]]];o=o+1;l=a[o];e[l[2]]();d=n;o=o+1;l=a[o];e[l[2]]=r[c[l[3]]];o=o+1;l=a[o];e[l[2]]=r[c[l[3]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];else e[l[2]]=R(u[l[3]],nil,r);end;elseif n<=38 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==39 then local n=l[2];local o=e[l[3]];e[n+1]=o;e[n]=o[c[l[5]]];else e[l[2]]={};end;o=o+1;end;end;end;return R(M(),{},C())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement