Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[this is ironbrew2 retardedly modified by U_M9]]
- return(function()return(function()return(function()return(function()return(function()return(function()local _____________=string.byte
- local _______________=string.char
- local ________=string.sub
- local _=setmetatable
- local __=select
- local ____________=tonumber
- local ______=tostring
- local ____=type
- local ___=true
- local _=false
- local function ________________(...)local ___=__(1,...)local __=''local _=2-2+4-3
- while(___[_])do
- __=__..___[_]_=_+1
- end
- return __
- end
- local function _________________(...)local _=__(1,...)local __=__(2,...)return _*2^__
- end
- local function _____(...)local ____=__(1,...)local ___=__(2,...)local _=__(3,...)if(_==nil)then
- _=___
- ___=#____+1
- end
- ____[___]=_
- end
- local ____________________=getfenv or function()return _ENV
- end
- local function ______________(...)return{...},__('#',...)end
- local __________
- function __________(...)local ___=__(1,...)local _=__(2,...)or 1
- local __=__(3,...)or#___
- if _==__ then
- return ___[_]else
- return ___[_],__________(___,_+1,__)end
- end
- 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
- local function ____(...)local ____=__(1,...)local _____=__(2,...)local __=__(3,...)or _;if __ then
- if ____<=_____ then
- if not ____<=_____ then return _ end
- if(____+10<=_____+10)then return ___ end
- return _
- end
- else
- if ____<_____ then
- if not(____<_____)then return _ end
- if(____+10<_____+10)then return ___ end
- return _
- end
- return _
- end
- end
- local function ____(...)local _____=__(1,...)local ____=__(2,...)local __=__(3,...)or _;if __ then
- if _____>=____ then
- if not(_____>=____)then return _ end
- if(_____+10>=____+10)then return ___ end
- return _
- end
- else
- if _____>____ then
- if not(_____>____)then return _ end
- if(_____+10>____+10)then return ___ end
- return _
- end
- return _
- end
- end
- 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
- while _>0 and ___>0 do
- local ______,_____=_%2,___%2
- if ______~=_____ then ____=____+__ end
- _,___,__=(_-______)/2,(___-_____)/2,__*2
- end
- if _<___ then _=___ end
- while _>0 do
- local ___=_%2
- if ___>0 then ____=____+__ end
- _,__=(_-___)/2,__*2
- end
- return ____
- end
- local function ______(__,_,___)if ___ then
- local _=(__/2^(_-1))%2^((___-1)-(_-1)+1);return _-_%1;else
- 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
- if _____(___,0)then
- return _*0;else
- __=1;____=0;end;elseif _____(__,2047)then
- return _____(___,0)and(_*(1/0))or(_*(0/0));end;return _________________(_,__-1023)*(____+(___/(2^52)));end;local ___________________=____;local function _________________(__)local ___;if(not __)then
- __=___________________();if _____(__,0)then
- return'';end;end;___=________(____________,_,_+__-1);_=_+__;local __={}for _=1,#___ do
- __[_]=_______________(_______(_____________(________(___,_,_)),222))end
- return ________________(__);end;local _=____;local function _______________()local __________={};local ____________={};local _={};local ________={__________,____________,nil,_};local _=____()local __={}for ____=1,_ do
- local ___=___________();local _;if _____(___,1)then _=(___________()~=0);elseif _____(___,0)then _=__________________();elseif _____(___,2)then _=_________________();end;__[____]=_;end;________[3]=___________();for ________=1,____()do
- local _=___________();if(_____(______(_,1,1),0))then
- local ___=______(_,2,3);local _______=______(_,4,6);local _={_________(),_________(),nil,nil};if _____(___,0)then
- _[3]=_________();_[4]=_________();elseif _____(___,1)then
- _[3]=____();elseif _____(___,2)then
- _[3]=____()-(2^16)elseif _____(___,3)then
- _[3]=____()-(2^16)_[4]=_________();end;if _____(______(_______,1,1),1)then _[2]=__[_[2]]end
- if _____(______(_______,2,2),1)then _[3]=__[_[3]]end
- if _____(______(_______,3,3),1)then _[4]=__[_[4]]end
- __________[________]=_;end
- 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
- if(_>=____)then
- _______________[_-____]=_____________[_+1];else
- __[_]=_____________[_+1];end;end;local _=____________-____+1
- local _;local ____;while ___ do
- _=_______[______];____=_[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
- ____=0;for _=___,_________ do
- ____=____+1;__[_]=____________[____];end;________();_=_______[______];___=_[2]__[___]=__[___](__________(__,___+1,_________))________();_=_______[______];__[_[2]]();________();_=_______[______];do return end;else
- 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
- local _=_[2]__[_]=__[_](__________(__,_+1,_________))else do return end;end;elseif ____<=11 then
- local ___=_[2]local ____,_=______________(__[___](__________(__,___+1,_[3])))_________=_+___-1
- local _=0;for ___=___,_________ do
- _=_+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
- local ___=_[2]local ____,_=______________(__[___](__________(__,___+1,_[3])))_________=_+___-1
- local _=0;for ___=___,_________ do
- _=_+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