Advertisement
CracksStuff

test

May 25th, 2020
1,411
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C++ 11.08 KB | None | 0 0
  1. --[[this is ironbrew2 retardedly modified by U_M9]]
  2. return(function()return(function()return(function()return(function()return(function()return(function()local _____________=string.byte
  3. local _______________=string.char
  4. local ________=string.sub
  5. local _=setmetatable
  6. local __=select
  7. local ____________=tonumber
  8. local ______=tostring
  9. local ____=type
  10. local ___=true
  11. local _=false
  12. local function ________________(...)local ___=__(1,...)local __=''local _=2-2+4-3
  13. while(___[_])do
  14. __=__..___[_]_=_+1
  15. end
  16. return __
  17. end
  18. local function _________________(...)local _=__(1,...)local __=__(2,...)return _*2^__
  19. end
  20. local function _____(...)local ____=__(1,...)local ___=__(2,...)local _=__(3,...)if(_==nil)then
  21. _=___
  22. ___=#____+1
  23. end
  24. ____[___]=_
  25. end
  26. local ____________________=getfenv or function()return _ENV
  27. end
  28. local function ______________(...)return{...},__('#',...)end
  29. local __________
  30. function __________(...)local ___=__(1,...)local _=__(2,...)or 1
  31. local __=__(3,...)or#___
  32. if _==__ then
  33. return ___[_]else
  34. return ___[_],__________(___,_+1,__)end
  35. end
  36. local function _____(...)local _=__(1,...)or 0;local __=__(2,...);return _/__ end;local function _____(...)local _=__(1,...)or 0;local __=__(2,...);return _+__ end;local function _____(__,_____)__=______(__)_____=______(_____)if ____(__)~=____(_____)then return _ end;if ____(__)~=____(_____)then return _ end;local ____={_____,__,_____,__}if ____[1]~=____[1]then return not ___ or _ end;if ____[1]~=____[2]then return not ___ or _ end;if ____[2]~=____[1]then return not ___ or _ end;if ____[2]~=____[2]then return not ___ or _ end;local __________,_______,________,_____________,_________,______________=1 and 2,2 and nil,___==not not ___,_==0,not 2==_,-1==0;local ______,____,____________,___________=74,{99,115,90,111,110,121,102,105,74},88,95;if __________ then if ________ then if _________ then if __________ and not _______ then if not _____________==________ then if _______==___ then else if _________==4 then if _______==(function()return not _______ end)()then for ___=1,#__ do if __:sub(___,______)=='true'then return _ end end end else if not ______________ and _________ then if(function()return 1==2 end)()and ________==________ and _________~=________ then if _______ and __________ then local ___,__,_='string','byte',nil;return not ___==__ and _ else if __________=='string'and ________=='find'then return not'gsub'end end else if ______==____[#____]and ____[1]==(function()return ____________ and ____[1]end)()then if __________==___________-1 or not ____ then return(function()return __==______ and ___________-1==______ end)()or ______==_______ else if __ and ______==({74})[1]and(function(_,__)return _ and __ end)(1,2)then return not __==_ and not(function()return not __:find(_____)and _____:find(__)end)()and ___ end end end end end end end end else if not ______==___ then if 4==______ and{3}==____ then if _________==_______ then if'string'and'reverse'then local __,_____='detsiletihW',___;if __ and _____==not not _ then while ___==not _ do for __=1,12 do local _=____[__]if _ then ____[_]=____[__]and _ else ____[__]=____[_]end end end end end end end end end else for ____=1,#_____+#__ do if ____==4 then ____=____+1 else ____=____+1;local ____=_;local ______,________,_____='https://','string','byte'for _______,_____ in pairs({99,89,101,121,95,80,92,103,105})do if ________[_______]==_____ and(function(_)end)(_____)then ____=___ else ____=_;for ____=1,10 do for ____=5,24 do if ____~=3 then return(function()if not ______==__ then return _ end end)()else return not ___ end end end end end;return ____ end end end else if ______==____[3]then if __:sub(3,3):sub(#_____)==not 4 then if __:gsub('%q','eq')then return(function(__,_,___)return __,_,___ end)(__,_____,'\n')else local ______,____=_,{87,104,105,116,101,108,105,115,116,32,115,117,99,99,101,115,115}if(function()return not 1==__ end)()then for __=1,#____ do local _____=string.char(____[__])if ____[__]==_____:byte()then local _=_ or ___ end end;return ______==nil and _____==___________ else ______=_;for __=1,10 do if __%2==0 then return _ end end end end end end end else if ______==____ and __~=__ then return not ___ or _ end end end
  37. local function ____(...)local ____=__(1,...)local _____=__(2,...)local __=__(3,...)or _;if __ then
  38. if ____<=_____ then
  39. if not ____<=_____ then return _ end
  40. if(____+10<=_____+10)then return ___ end
  41. return _
  42. end
  43. else
  44. if ____<_____ then
  45. if not(____<_____)then return _ end
  46. if(____+10<_____+10)then return ___ end
  47. return _
  48. end
  49. return _
  50. end
  51. end
  52. local function ____(...)local _____=__(1,...)local ____=__(2,...)local __=__(3,...)or _;if __ then
  53. if _____>=____ then
  54. if not(_____>=____)then return _ end
  55. if(_____+10>=____+10)then return ___ end
  56. return _
  57. end
  58. else
  59. if _____>____ then
  60. if not(_____>____)then return _ end
  61. if(_____+10>____+10)then return ___ end
  62. return _
  63. end
  64. return _
  65. end
  66. end
  67. local function ___________(_______)local __,___,_____="","",{}local ____=256;local ______={}for _=0,____-1 do ______[_]=_______________(_)end;local _=1;local function _________()local __=____________(________(_______,_,_),36)_=_+1;local ___=____________(________(_______,_,_+__-1),36)_=_+__;return ___ end;__=_______________(_________())_____[1]=__;while _<#_______ do local _=_________()if ______[_]then ___=______[_]else ___=__..________(__,1,1)end;______[____]=__..________(___,1,1)_____[#_____+1],__,____=___,___,____+1 end;return ________________(_____)end;local ____________=___________('26326627526426527526625524Z26L26425W27924Y24X25B25624T24Q24S25324W25526426227925525B24Z25726426127924624Q24Q24U24925724Q26423Z27925228224U24T26C26P26P25424R25925127W25225B24S25625724S24N25724T24T28T28V28N28P28R28X24T28I28K26O26M29724P25725825224X27L25B24U24U26O25924X24Z26P24824R24S28S28M28O25623R28U27K28Z25626627F27927427526727925O2792662A42752A62792642A52A32662782752722AF2A427S2AB2782A22A72A42AH2A72A72AD2AT2A42A92AQ2AT275');local _______=bit and bit.bxor or function(_,___)local __,____=1,0
  68. while _>0 and ___>0 do
  69. local ______,_____=_%2,___%2
  70. if ______~=_____ then ____=____+__ end
  71. _,___,__=(_-______)/2,(___-_____)/2,__*2
  72. end
  73. if _<___ then _=___ end
  74. while _>0 do
  75. local ___=_%2
  76. if ___>0 then ____=____+__ end
  77. _,__=(_-___)/2,__*2
  78. end
  79. return ____
  80. end
  81. local function ______(__,_,___)if ___ then
  82. local _=(__/2^(_-1))%2^((___-1)-(_-1)+1);return _-_%1;else
  83. local _=2^(_-1);return(__%(_+_)>=_)and 1 or 0;end;end;local _=1;local function ____()local _____,____,__,___=_____________(____________,_,_+3);_____=_______(_____,222)____=_______(____,222)__=_______(__,222)___=_______(___,222)_=_+4;return(___*16777216)+(__*65536)+(____*256)+_____;end;local function ___________()local __=_______(_____________(____________,_,_),222);_=_+1;return __;end;local function _________()local ___,__=_____________(____________,_,_+2);___=_______(___,222)__=_______(__,222)_=_+2;return(__*256)+___;end;local function __________________()local __=____();local _=____();local ____=1;local ___=(______(_,1,20)*(2^32))+__;local __=______(_,21,31);local _=((-1)^______(_,32));if _____(__,0)then
  84. if _____(___,0)then
  85. return _*0;else
  86. __=1;____=0;end;elseif _____(__,2047)then
  87. return _____(___,0)and(_*(1/0))or(_*(0/0));end;return _________________(_,__-1023)*(____+(___/(2^52)));end;local ___________________=____;local function _________________(__)local ___;if(not __)then
  88. __=___________________();if _____(__,0)then
  89. return'';end;end;___=________(____________,_,_+__-1);_=_+__;local __={}for _=1,#___ do
  90. __[_]=_______________(_______(_____________(________(___,_,_)),222))end
  91. return ________________(__);end;local _=____;local function _______________()local __________={};local ____________={};local _={};local ________={__________,____________,nil,_};local _=____()local __={}for ____=1,_ do
  92. local ___=___________();local _;if _____(___,1)then _=(___________()~=0);elseif _____(___,0)then _=__________________();elseif _____(___,2)then _=_________________();end;__[____]=_;end;________[3]=___________();for ________=1,____()do
  93. local _=___________();if(_____(______(_,1,1),0))then
  94. local ___=______(_,2,3);local _______=______(_,4,6);local _={_________(),_________(),nil,nil};if _____(___,0)then
  95. _[3]=_________();_[4]=_________();elseif _____(___,1)then
  96. _[3]=____();elseif _____(___,2)then
  97. _[3]=____()-(2^16)elseif _____(___,3)then
  98. _[3]=____()-(2^16)_[4]=_________();end;if _____(______(_______,1,1),1)then _[2]=__[_[2]]end
  99. if _____(______(_______,2,2),1)then _[3]=__[_[3]]end
  100. if _____(______(_______,3,3),1)then _[4]=__[_[4]]end
  101. __________[________]=_;end
  102. end;for _=1,____()do ____________[_-1]=_______________();end;return ________;end;local function ________________(_,____,___________)local ______=_[1];local ____=_[2];local _=_[3];return function(...)local _______=______;local ____=____;local ____=_;local ______=1;local _________=-1;local function ________(...)local _=__(1,...)or ______+1;______=_;end;local _______________={};local _____________={...};local ____________=__('#',...)-1;local _={};local __={};for _=0,____________ do
  103. if(_>=____)then
  104. _______________[_-____]=_____________[_+1];else
  105. __[_]=_____________[_+1];end;end;local _=____________-____+1
  106. local _;local ____;while ___ do
  107. _=_______[______];____=_[1];if ____<=8 then if ____<=3 then if ____<=1 then if _____(____,0)then __[_[2]]();else ___________[_[3]]=__[_[2]];end;elseif ____>2 then ___________[_[3]]=__[_[2]];else __[_[2]]=___________[_[3]];end;elseif ____<=5 then if ____>4 then local ____;local ____________,_____________;local _____;local ___;__[_[2]]=(_[3]~=0);________();_=_______[______];___________[_[3]]=__[_[2]];________();_=_______[______];__[_[2]]=___________[_[3]];________();_=_______[______];__[_[2]]=___________[_[3]];________();_=_______[______];___=_[2];_____=__[_[3]];__[___+1]=_____;__[___]=_____[_[4]];________();_=_______[______];__[_[2]]=_[3];________();_=_______[______];___=_[2]____________,_____________=______________(__[___](__________(__,___+1,_[3])))_________=_____________+___-1
  108. ____=0;for _=___,_________ do
  109. ____=____+1;__[_]=____________[____];end;________();_=_______[______];___=_[2]__[___]=__[___](__________(__,___+1,_________))________();_=_______[______];__[_[2]]();________();_=_______[______];do return end;else
  110. local _=_[2]__[_]=__[_](__________(__,_+1,_________))end;elseif ____<=6 then __[_[2]]=___________[_[3]];elseif ____>7 then __[_[2]]=_[3];else __[_[2]]=_[3];end;elseif ____<=13 then if ____<=10 then if ____>9 then
  111. local _=_[2]__[_]=__[_](__________(__,_+1,_________))else do return end;end;elseif ____<=11 then
  112. local ___=_[2]local ____,_=______________(__[___](__________(__,___+1,_[3])))_________=_+___-1
  113. local _=0;for ___=___,_________ do
  114. _=_+1;__[___]=____[_];end;elseif ____>12 then do return end;else local ___=_[2];local ____=__[_[3]];__[___+1]=____;__[___]=____[_[4]];end;elseif ____<=15 then if ____>14 then local ____=_[2];local ___=__[_[3]];__[____+1]=___;__[____]=___[_[4]];else __[_[2]]=(_[3]~=0);end;elseif ____<=16 then
  115. local ___=_[2]local ____,_=______________(__[___](__________(__,___+1,_[3])))_________=_+___-1
  116. local _=0;for ___=___,_________ do
  117. _=_+1;__[___]=____[_];end;elseif ____>17 then __[_[2]]=(_[3]~=0);else __[_[2]]();end;________();end;end;end;return ________________(_______________(),{},____________________())();end)()end)()end)()end)()end)()end)()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement