Advertisement
MegumuSenpai

th3ltgrounds | Kill All

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