MegumuSenpai

My Hero Online | Inf Money

Aug 10th, 2019
290
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.49 KB | None | 0 0
  1. --[[
  2. Made by Megumu#8008
  3. <3
  4. ]]
  5.  
  6. _G.Amount = 1500000
  7.  
  8. local t=string.byte;local r=string.char;local c=string.sub;local u=table.concat;local h=math.ldexp;local B=getfenv or function()return _ENV end;local l=setmetatable;local A=select;local f=unpack;local i=tonumber;local function s(t)local e,o,a="","",{}local n=256;local d={}for l=0,n-1 do d[l]=r(l)end;local l=1;local function f()local e=i(c(t,l,l),36)l=l+1;local o=i(c(t,l,l+e-1),36)l=l+e;return o end;e=r(f())a[1]=e;while l<#t do local l=f()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 a=s('21P21C21P27621O21L27621P22I22K22822G21O21J27A23E22G22123222G22722322C22M27F21827A23322G22522927Q22K22122G22H23222122A22722K22I27F21M27A23122922K21W27N22621O21I27A23522A22M22K22928D28F27N21O21N27A23C22322G22B22128I21G27A23I22D22K28722M28122721O27527623022022G22622123I22A22827X27K27F27H27623F22C22722G27M27O28T21Q28L22A22927A2A327721R27A22Q23E28U27A23G22822A22029021427A21321H25P25E22B21H27621221P1T21P22827A21B2112AL2282112AP2112AS2AZ2761Z2AK25E2282AO21P1Y21H2B32BA2171T2AY2AS2BB2B22AT2B02BB21H2312AT2BA21B2B72B927621A2191D21P22F2192BW21922L21P22D2C221P2BX2252AT2C82BX2592CC2C324T2CG21P21J2312AY2BQ21P21F22T2AY22T27621R22L2AY2C521P21Q1D26L2AT2BZ2C91L2C22281L2AP2BA2BV2A4');local n=bit and bit.bxor or function(l,o)local e,n=1,0 while l>0 and o>0 do local a,c=l%2,o%2 if a~=c then n=n+e end l,o,e=(l-a)/2,(o-c)/2,e*2 end if l<o then l=o end while l>0 do local o=l%2 if o>0 then n=n+e end l,e=(l-o)/2,e*2 end return n end local function l(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 e=1;local function o()local o,a,c,l=t(a,e,e+3);o=n(o,61)a=n(a,61)c=n(c,61)l=n(l,61)e=e+4;return(l*16777216)+(c*65536)+(a*256)+o;end;local function d()local l=n(t(a,e,e),61);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 i(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]=r(n(t(c(o,l,l)),61))end return u(e);end;local e=o;local function u(...)return{...},A('#',...)end local function s()local r={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};local t={};local e={};local a={r,nil,t,nil,e};a[4]=d();local e=o()local c={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==3)then l=(d()~=0);elseif(e==0)then l=P();elseif(e==1)then l=i();end;c[o]=l;end;a[2]=c for a=1,o()do local c=n(o(),27);local o=n(o(),109);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;r[a]=e;end;for l=1,o()do t[l-1]=s();end;return a;end;local function P(l,e,h)local e=l[1];local o=l[2];local c=l[3];local l=l[4];return function(...)local a=e;local n=o;local e=c;local c=l;local l=u local o=1;local r=-1;local i={};local t={...};local d=A('#',...)-1;local l={};local e={};for l=0,d do if(l>=c)then i[l-c]=t[l+1];else e[l]=t[l+1];end;end;local l=d-c+1 local l;local d;while true do l=a[o];d=l[1];if d<=7 then if d<=3 then if d<=1 then if d==0 then e[l[2]]=n[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](f(c,1,l-o));r=o;end;elseif d>2 then local u;local t;local d;local i;local A;local c;e[l[2]]=h[n[l[3]]];o=o+1;l=a[o];c=l[2];A=e[l[3]];e[c+1]=A;e[c]=A[n[l[5]]];o=o+1;l=a[o];e[l[2]]=n[l[3]];o=o+1;l=a[o];c=l[2];i={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;i[d]=e[l];end;u={e[c](f(i,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;e[l]=u[d];end;r=t;o=o+1;l=a[o];e[l[2]]=h[n[l[3]]];o=o+1;l=a[o];c=l[2];A=e[l[3]];e[c+1]=A;e[c]=A[n[l[5]]];o=o+1;l=a[o];e[l[2]]=n[l[3]];o=o+1;l=a[o];c=l[2];i={};d=0;t=c+l[3]-1;for l=c+1,t do d=d+1;i[d]=e[l];end;u={e[c](f(i,1,t-c))};t=c+l[5]-2;d=0;for l=c,t do d=d+1;e[l]=u[d];end;r=t;o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=h[n[l[3]]];else do return end;end;elseif d<=5 then if d==4 then e[l[2]]=h[n[l[3]]];else local i;local d;local A;local t;local c;e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];c=l[2];t=e[l[3]];e[c+1]=t;e[c]=t[n[l[5]]];o=o+1;l=a[o];e[l[2]]=n[l[3]];o=o+1;l=a[o];e[l[2]]=n[l[3]];o=o+1;l=a[o];e[l[2]]=h[n[l[3]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];c=l[2];A={};d=0;i=c+l[3]-1;for l=c+1,i do d=d+1;A[d]=e[l];end;e[c](f(A,1,i-c));r=c;o=o+1;l=a[o];do return end;end;elseif d>6 then e[l[2]]=e[l[3]][n[l[5]]];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](f(c,1,l-o));r=o;end;elseif d<=11 then if d<=9 then if d>8 then e[l[2]]=h[n[l[3]]];else local c=l[2];local o=e[l[3]];e[c+1]=o;e[c]=o[n[l[5]]];end;elseif d>10 then do return end;else e[l[2]]=e[l[3]][n[l[5]]];end;elseif d<=13 then if d==12 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](f(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;r=l;else e[l[2]]=n[l[3]];end;elseif d>14 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](f(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;r=l;else local o=l[2];local c=e[l[3]];e[o+1]=c;e[o]=c[n[l[5]]];end;o=o+1;end;end;end;return P(s(),{},B())();
Add Comment
Please, Sign In to add comment