Advertisement
Ectroi

nibaaa

Jun 15th, 2019
128
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.36 KB | None | 0 0
  1. --[[
  2. IronBrew:tm: obfuscation; Version 2.6.1
  3.  
  4. ........................................................................................................................................................................................................
  5. ........................................................................................................................................................................................................
  6. .....,,...,.............................................................................................................................................................................................
  7. .... MMMMM,.............................................................................................................................................................................................
  8. ....MMMMMMM,............................................................................................................................................................................................
  9. ....MMMMMMM,............................................................................................................................................................................................
  10. ....,MMMMMO.............................................................................................................................................................................................
  11. ......,.................................................................................................................................................................................................
  12. ..................................................,,,,,,............................................Z$$.................................................................................................
  13. ...................................................:::::............................................MMMO................................................................................................
  14. .....:???? ,.......:????....,.8MMMMM,.......,,,MMMMI???INMMM.,................,.?ZMMMMDI:,,.........MMM$................................................................................................
  15. .....MMMMM?,.......MMMMM,,.OMMMMMMMM......, 7MM+?+++++++++?+DM$ .............MMMMMMMMMMMMMM ,,......MMM$................................................................................................
  16. .....MMMMM?,.......MMMMM..NMMMMMMMMM.,...,$M7++++++++++++++++++M$ .........MMMMMMMMMMMMMMMMMN .,....MMM$................................................................................................
  17. .....MMMMM?,.......MMMMMMMMMMM8..,,,.,..,MM?++++++++++++++++++++MM,,......MMMMMMMM~,.+MMMMMMMM......MMM$................................................................................................
  18. .....MMMMM?,.......MMMMMMMMZ ,,.......MMMMMMMMMMMMMDZZZZMMMMMMMMMMMMM ...MMMMMM,,,....., MMMMMM.....MMM$................................,.,,............................................................
  19. .....MMMMM?,.......MMMMMMM:............MMMMMMMMMMMMMMMMMMMMMMMMMMMMM....MMMMMD,...........MMMMMM.,..MMM$...:MMMMMMMM:,........8MMM:.,DMMMMM,......?MMMMMMMMI.........MMMM......... MMM,.........MMMI....
  20. .....MMMMM?,.......MMMMMM+............,M?+MMMMMMMMMM++?DMMMMMMMMM?+M,...MMMMM,.............MMMMM,,..MMM$,NMMMMMMMMMMMM8,.,....MMMM,NMMMMMMM,..,,MMMMMMMMMMMMMM.,.....MMMM.........7MMM7.........MMM$....
  21. .....MMMMM?,.......MMMMMM,............,M?++MMMMMMMM7++++MMMMMMMM$??MM,,+MMMMM,.............MMMMM=...MMM$,MMMZ...,?MMMMMM,.....MMMMMMMMM,......DMMMMM:,....MMMMMN,....MMMM.........7MMM7.........MMM$....
  22. .....MMMMM?,.......MMMMMM.............MM+??+MMMMMMM?++++MMMMMMMD??+$M,.MMMMM?.............,MMMMM?...MMM$,M,.,...,,,,MMMMM,....MMMMMM,,,,....,MMMMM,..,....,.MDNN$....MMMM.........7MMM7.........MMM$....
  23. .....MMMMM?,.......MMMMM?,............MM??++???????++++++?????+++++7M..$MMMM,.............,?MMMM.,..MMM$.............OMMMM....MMMMM.........$MMMM,....... MMMMMM.,...MMMM.........7MMM7.........MMM$....
  24. .....MMMMM?,.......MMMMM=,............NM?+++++++++++++++++++++++++?$M..MMMMM+,............,+MMMM+,..NMN$..............MMMM+,..MMMMM.........MMMM......,?MMMMM?.,.....MMMM.........7MMM7.........MMM$....
  25. .....MMMMM?,.......MMMMM,,............,M+?+++++++?++++++++?+?++++++M7,,DMMMM:...............MMMM:,..MMMN.,............$MMM7...MMMM=.........MMMM....,DMMMMM..........MMMM.........7MMM7.........MMM$....
  26. .....MMMMM?,.......MMMMM,,............:M$?++++?MM+++++++++DM?+++++?M,,,DMMMM+,..............MMMM+,..MMMM.,............?NMM?,..ZMMM,,........MMMM.,.MMMMMM,,..........MMMM,........7MMM7.........MMM$....
  27. .....MMMMM?,.......MMMMM,,.............,M=++++++DMD++?++DMM+++++++M:...$MMMM.,..............MMMM ,..MMMM..............OMMM,,..OMMM,,........MMMM.,MMMM?,,......MNZ,,,MMMM.........IMMM?,........MMM?....
  28. .....MMMMM?,.......MMMMM,,...............M+?+++++?+ZMMMN+++?+++++M7,...$MMMM................MMMM.,..=MMMN,..........,,MNMM.,..OMMM,.........?MMMI.,M..........,MMM,.,NMMM,........IMMMI.........MMM?....
  29. .....MMMMM?,.......MMMMM,,................M7+?+++++++++++++++++IM,,....$MMMM,...............MMMM,....MMMMN.,......,,.MMMM,....OMMM,,........,MMMMN..........,+MMM,...,MMMN,.....,,MMMMM,,,.....MMMM.....
  30. .....MMMMM?,.......MMMMM,,................,MM++++?++++++++????MM.......$MMMM,...............MMMM,.....MNMMM$,......MMMMM .....OMMM,,..........MMMMM~......,,MMMM ,....MMMMM,,,..~MMMMMMM~,,,.,MMMMM.....
  31. .....MMMMM?,.......MMMMM,,.................,,MMD+++++++++++$MM,.,......$MMMM,...............MMMM,.....,+NMMMMMMMMMMMMMM..,....OMMM,,.......... +NMMMMMMMMMMMMMM,.......MMMMMMMMMMMMN,NMMMMMMMMMMMN,.....
  32. .....MMMMM?........MMMMM,,.....................::MMMMMMMMM$.,.........,ZMMMM,,..............MMMM,,......, MMMMMMMMMM:.,,......+MMM................MMMMMMMMMM7,,,......,.,MMMMMMMMN.:...MMMMMMMMM,,......
  33. ..........,.......,,.....,.........................,,,,.,...................................................,.,,.,,,...........,,,..................,,..,,,,..............,,..,,,.......,,.,,,,.........
  34. ........................................................................................................................................................................................................
  35. ]]
  36.  
  37. local f=string.byte;local i=string.char;local c=string.sub;local H=table.concat;local I=getfenv or function()return _ENV end;local l=setmetatable;local s=select;local t=unpack;local r=tonumber;local function h(t)local e,o,a="","",{}local d=256;local n={}for l=0,d-1 do n[l]=i(l)end;local l=1;local function f()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=i(f())a[1]=e;while l<#t do local l=f()if n[l]then o=n[l]else o=e..c(e,1,1)end;n[d]=e..c(o,1,1)a[#a+1],e,d=o,o,d+1 end;return table.concat(a)end;local a=h('25W25H27525I25X21H21M26Q25X27525E26527926Q26527525F25P23P25H27025P27525Q26L27G26L27525M25H27925Q27525H25R27C25H26B28325J25H26D25H26E28025I25P27926E27P25H25I26T28F26T27D27128F27127J25P21X28A28H25M23X28F23X27J26528926E27I25H25Q24528F24527V24D28F24D27525J26D27C26O28925H25J28H26V28H25G28025K28025F28026828025R28026Z29S25H27C26I29W25P27C27O27525O25X28926Y27C28T28E21M26P27P21X28227526G2832AK25H26928325Q27F27A29425N29Y29W28026W2AY27527U29E29M28H28027628029P2B727523P25J28727524S25125J25I28024Q24P24H27Q2802BJ2BL2BN25J25L28024T24Q24Q24U24J24W24R24M24X24S24Q24R25J29T27525224X25324S24R24I25J25D28024J2CF24H25J27Z27524R24G24Y24M24M24P24Q25224W25324G25J29X27524O24G25225224K24I24G24N24Q2592CI28024I24K2D525J25E28023X24X24X25123M24G24X25J25V2BW2DO25125227326I26I24K25124S26J2BH24S24J25826J24Q25324I26I2DK28025824Q2CZ26D2BH2BA2BB275');local n=bit and bit.bxor or function(l,e)local o,n=1,0 while l>0 and e>0 do local c,a=l%2,e%2 if c~=a then n=n+o end l,e,o=(l-c)/2,(e-a)/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 l(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 e=1;local function o()local a,o,c,l=f(a,e,e+3);a=n(a,197)o=n(o,197)c=n(c,197)l=n(l,197)e=e+4;return(l*16777216)+(c*65536)+(o*256)+a;end;local function d()local l=n(f(a,e,e),197);e=e+1;return l;end;local function u()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 l*(2^(e-1023))*(c+(o/(2^52)));end;local h=o;local function r(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]=i(n(f(c(o,l,l)),197))end return H(e);end;local e=o;local function X()local t={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};local f={0};local e={};local a={t,nil,f,nil,nil,nil,e};for a=1,o()do local c=n(o(),2);local o=n(o(),35);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;t[a]=e;end;for l=1,o()do f[l-1]=X();end;a[6]=d();local l=o()local o={0,0,0,0,0,0,0,0,0,0,0};for n=1,l do local e=d();local l;if(e==3)then l=(d()~=0);elseif(e==1)then l=u();elseif(e==2)then l=r();end;o[n]=l;end;a[2]=o a[5]=d();return a;end;local function H(l,e,h)local r=l[1];local d=l[2];local Q=l[3];local n=l[6];return function(...)local c=1;local o=-1;local J={};local i={...};local u=s('#',...)-1;local l={};local e={nil,nil,nil,nil};for l=0,u do if(l>=n)then J[l-n]=i[l+1];else e[l]=i[l+1];end;end;local l;local a;while true do l=r[c];a=l[1];if a<=20 then if a<=9 then if a<=4 then if a<=1 then if a>0 then local n=l[2];local c=e[l[3]];e[n+1]=c;e[n]=c[d[l[5]]];if n+1>o then o=n+1 end;else h[d[l[3]]]=e[l[2]];end;elseif a<=2 then local n=l[2];if n>o then o=n end;e[n]=e[l[3]][d[l[5]]];elseif a==3 then if(e[l[2]]==d[l[5]])then c=c+1;else c=c+l[3];end;else local l=l[2];if l>o then o=l end;e[l]={};end;elseif a<=6 then if a==5 then local n=l[2];local i={};local a=0;local f=n+l[3]-1;for l=n+1,f do a=a+1;i[a]=e[l];end;local s=function(...)return{...},s('#',...)end;local s,f=s(e[n](t(i,1,f-n)));f=f+n-1;a=0;for l=n,f do a=a+1;e[l]=s[a];end;o=f;c=c+1;l=r[c];n=l[2];i={};a=0;f=o;for l=n+1,f do a=a+1;i[a]=e[l];end;local s={e[n](t(i,1,f-n))};f=n+l[5]-2;a=0;for l=n,f do a=a+1;e[l]=s[a];end;o=f;c=c+1;l=r[c];h[d[l[3]]]=e[l[2]];c=c+1;l=r[c];n=l[2];if n>o then o=n end;e[n]=h[d[l[3]]];c=c+1;l=r[c];n=l[2];if n>o then o=n end;e[n]=h[d[l[3]]];c=c+1;l=r[c];n=l[2];local h=e[l[3]];e[n+1]=h;e[n]=h[d[l[5]]];if n+1>o then o=n+1 end;c=c+1;l=r[c];n=l[2];if n>o then o=n end;e[n]=d[l[3]];c=c+1;l=r[c];n=l[2];i={};a=0;f=n+l[3]-1;for l=n+1,f do a=a+1;i[a]=e[l];end;s={e[n](t(i,1,f-n))};f=n+l[5]-2;a=0;for l=n,f do a=a+1;e[l]=s[a];end;o=f;c=c+1;l=r[c];n=l[2];if n>o then o=n end;e[n]=d[l[3]];c=c+1;l=r[c];n=l[2];if n>o then o=n end;e[n]=d[l[3]];else local l=l[2];if l>o then o=l end;e[l]={};end;elseif a<=7 then local n=l[2];local c=n+l[3]-2;local o={};local l=0;for n=n,c do l=l+1;o[l]=e[n];end;do return t(o,1,l)end;elseif a>8 then h[d[l[3]]]=e[l[2]];else local n=l[2];local l=l[3];o=n-1;for l=n,n+(l>0 and l-1 or u)do local n=J[l-n];e[l]=n;if n and l>o then o=l;end;end;end;elseif a<=14 then if a<=11 then if a>10 then local n=l[2];local c=o;local o={};local l=0;for n=n,c do l=l+1;o[l]=e[n];end;do return t(o,1,l)end;else local n=l[2];local c=n+l[3]-2;local o={};local l=0;for n=n,c do l=l+1;o[l]=e[n];end;do return t(o,1,l)end;end;elseif a<=12 then local l=l[2];local n=e[l];local o=o-l;for o=1,o do n[o]=e[l+o]end;elseif a>13 then for l=l[2],l[3]do e[l]=nil;end;else local c=l[2];local d={};local n=0;local a=o;for l=c+1,a do n=n+1;d[n]=e[l];end;local a={e[c](t(d,1,a-c))};local l=c+l[5]-2;n=0;for l=c,l do n=n+1;e[l]=a[n];end;o=l;end;elseif a<=17 then if a<=15 then local l=l[2];i={};local o=o;for l=l+1,o do i[#i+1]=e[l];end;do return e[l](t(i,1,o-l))end;elseif a==16 then local c=l[2];local a={};local n=0;local d=o;for l=c+1,d do n=n+1;a[n]=e[l];end;local a={e[c](t(a,1,d-c))};local l=c+l[5]-2;n=0;for l=c,l do n=n+1;e[l]=a[n];end;o=l;else do return end;end;elseif a<=18 then local c=l[2];local a={};local n=0;local d=c+l[3]-1;for l=c+1,d do n=n+1;a[n]=e[l];end;local a={e[c](t(a,1,d-c))};local l=c+l[5]-2;n=0;for l=c,l do n=n+1;e[l]=a[n];end;o=l;elseif a==19 then local n=l[2];local c=(l[5]-1)*50;local a=e[n];local l=o-n;for l=1,l do a[c+l]=e[n+l]end;else local n=l[2];if n>o then o=n end;e[n]=h[d[l[3]]];end;elseif a<=30 then if a<=25 then if a<=22 then if a>21 then local n=l[2];local a={};local c=0;local l=n+l[3]-1;for l=n+1,l do c=c+1;a[c]=e[l];end;e[n](t(a,1,l-n));o=n-1;else local c=l[2];local a={};local n=0;local d=c+l[3]-1;for l=c+1,d do n=n+1;a[n]=e[l];end;local a={e[c](t(a,1,d-c))};local l=c+l[5]-2;n=0;for l=c,l do n=n+1;e[l]=a[n];end;o=l;end;elseif a<=23 then c=c+l[3];elseif a>24 then local c=l[2];local a={};local n=0;local l=c+l[3]-1;for l=c+1,l do n=n+1;a[n]=e[l];end;local d=function(...)return{...},s('#',...)end;local a,l=d(e[c](t(a,1,l-c)));l=l+c-1;n=0;for l=c,l do n=n+1;e[l]=a[n];end;o=l;else for l=l[2],l[3]do e[l]=nil;end;end;elseif a<=27 then if a==26 then local n=l[2];if n>o then o=n end;e[n]=e[l[3]][d[l[5]]];else local n=l[2];local l=Q[l[3]];if n>o then o=n end;e[n]=H(l,nil,h);end;elseif a<=28 then if(e[l[2]]==d[l[5]])then c=c+1;else c=c+l[3];end;elseif a>29 then local l=l[2];i={};local o=o;for l=l+1,o do i[#i+1]=e[l];end;do return e[l](t(i,1,o-l))end;else local n=l[2];local l=l[3];o=n-1;for l=n,n+(l>0 and l-1 or u)do local n=J[l-n];e[l]=n;if n and l>o then o=l;end;end;end;elseif a<=35 then if a<=32 then if a>31 then local n=l[2];local c=e[l[3]];e[n+1]=c;e[n]=c[d[l[5]]];if n+1>o then o=n+1 end;else do return end;end;elseif a<=33 then local n=l[2];if n>o then o=n end;e[n]=d[l[3]];elseif a==34 then local n=l[2];if n>o then o=n end;e[n]=d[l[3]];else local n=l[2];if n>o then o=n end;e[n]=h[d[l[3]]];end;elseif a<=38 then if a<=36 then local l=l[2];local n=e[l];local o=o-l;for o=1,o do n[o]=e[l+o]end;elseif a==37 then c=c+l[3];else local c=l[2];local n=o;local o={};local l=0;for n=c,n do l=l+1;o[l]=e[n];end;do return t(o,1,l)end;end;elseif a<=39 then local c=l[2];local a={};local n=0;local l=c+l[3]-1;for l=c+1,l do n=n+1;a[n]=e[l];end;local d=function(...)return{...},s('#',...)end;local a,l=d(e[c](t(a,1,l-c)));l=l+c-1;n=0;for l=c,l do n=n+1;e[l]=a[n];end;o=l;elseif a==40 then local n=l[2];local l=Q[l[3]];if n>o then o=n end;e[n]=H(l,nil,h);else local n=l[2];local a={};local c=0;local l=n+l[3]-1;for l=n+1,l do c=c+1;a[c]=e[l];end;e[n](t(a,1,l-n));o=n-1;end;c=c+1;end;end;end;return H(X(),{},I())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement