Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[
- .____ ________ ___. _____ __
- | | __ _______ \_____ \\_ |___/ ____\_ __ ______ ____ _____ _/ |_ ___________
- | | | | \__ \ / | \| __ \ __\ | \/ ___// ___\\__ \\ __\/ _ \_ __ \
- | |___| | // __ \_/ | \ \_\ \ | | | /\___ \\ \___ / __ \| | ( <_> ) | \/
- |_______ \____/(____ /\_______ /___ /__| |____//____ >\___ >____ /__| \____/|__|
- \/ \/ \/ \/ \/ \/ \/
- \_Welcome to LuaObfuscator.com (Alpha 0.10.8) ~ Much Love, Ferib
- ]]--
- local v0=tonumber;local v1=string.byte;local v2=string.char;local v3=string.sub;local v4=string.gsub;local v5=string.rep;local v6=table.concat;local v7=table.insert;local v8=math.ldexp;local v9=getfenv or function() return _ENV;end ;local v10=setmetatable;local v11=pcall;local v12=select;local v13=unpack or table.unpack ;local v14=tonumber;local function v15(v16,v17,...) local v18=1;local v19;v16=v4(v3(v16,5),"..",function(v30) if (v1(v30,2)==81) then local v87=0;while true do if (v87==0) then v19=v0(v3(v30,1,1));return "";end end else local v88=0;local v89;while true do if (v88==0) then v89=v2(v0(v30,16));if v19 then local v130=v5(v89,v19);v19=nil;return v130;else return v89;end break;end end end end);local function v20(v31,v32,v33) if v33 then local v90=(v31/((5 -3)^(v32-(2 -1))))%((1639 -(1523 + 114))^(((v33-(1 -(0 + 0))) -(v32-(1 -0))) + (2 -1))) ;return v90-(v90%1) ;else local v91=619 -(555 + 64) ;local v92;while true do if (v91==(931 -(857 + 74))) then v92=(570 -((1432 -(68 + 997)) + 201))^(v32-(928 -(214 + 713))) ;return (((v31%(v92 + v92))>=v92) and (1 + 0)) or (0 + (877 -(282 + 595))) ;end end end end local function v21() local v34=(282 + 988) -(226 + 1044) ;local v35;while true do if (v34==(4 -3)) then return v35;end if (v34==(117 -(32 + 85))) then v35=v1(v16,v18,v18);v18=v18 + 1 + 0 ;v34=1;end end end local function v22() local v36,v37=v1(v16,v18,v18 + 2 );v18=v18 + (959 -(892 + 65)) ;return (v37 * (610 -354)) + v36 ;end local function v23() local v38=0 -0 ;local v39;local v40;local v41;local v42;while true do if (v38==(1 -0)) then return (v42 * ((66682222 -49904656) -(87 + 263))) + (v41 * (65716 -(67 + 113))) + (v40 * (188 + 68)) + v39 ;end if (v38==0) then v39,v40,v41,v42=v1(v16,v18,v18 + (7 -4) );v18=v18 + 4 ;v38=1 + 0 ;end end end local function v24() local v43=952 -(802 + 150) ;local v44;local v45;local v46;local v47;local v48;local v49;while true do if (v43==2) then v48=v20(v45,56 -35 ,55 -24 );v49=((v20(v45,24 + 8 )==(1 + 0)) and -(1 + 0)) or (773 -(201 + 571)) ;v43=(2747 -(760 + 987)) -((2828 -(1789 + 124)) + 82) ;end if ((2 -(767 -(745 + 21)))==v43) then v46=1 + 0 ;v47=(v20(v45,1 -0 ,1207 -(1069 + 118) ) * ((4 -(1 + 1))^(69 -37))) + v44 ;v43=1 + (2 -1) ;end if (v43==(0 -0)) then v44=v23();v45=v23();v43=1 -0 ;end if (v43==(3 + 0)) then if (v48==(791 -(368 + 423))) then if (v47==(0 -0)) then return v49 * 0 ;else v48=886 -((1023 -762) + 624) ;v46=(0 + 0) -(0 + 0) ;end elseif (v48==(2065 -(10 + 8))) then return ((v47==(0 -0)) and (v49 * ((443 -(416 + (1081 -(87 + 968))))/(0 -0)))) or (v49 * NaN) ;end return v8(v49,v48-(440 + 583) ) * (v46 + (v47/((3 -1)^(490 -(145 + 293))))) ;end end end local function v25(v50) local v51=0 -0 ;local v52;local v53;while true do if (v51==(0 + 0)) then v52=nil;if not v50 then v50=v23();if (v50==(0 -0)) then return "";end end v51=1414 -(447 + 966) ;end if (v51==(8 -5)) then return v6(v53);end if (v51==(1819 -(1703 + 114))) then v53={};for v118=702 -(376 + 325) , #v52 do v53[v118]=v2(v1(v3(v52,v118,v118)));end v51=4 -1 ;end if (v51==(2 -1)) then v52=v3(v16,v18,(v18 + v50) -((15 -(9 + 5)) + 0) );v18=v18 + v50 ;v51=4 -2 ;end end end local v26=v23;local function v27(...) return {...},v12("#",...);end local function v28() local v54=(function() return function(v93,v94,v95,v96,v97,v98,v99,v100) local v93=(function() return 0;end)();local v94=(function() return;end)();local v96=(function() return;end)();while true do if (v93==(0 + 0)) then local v124=(function() return 0 + 0 ;end)();local v125=(function() return;end)();while true do if ((1690 -(209 + 1481))==v124) then v125=(function() return 0 -0 ;end)();while true do if (v125~=(1636 -(1373 + 263))) then else v94=(function() return v95();end)();v96=(function() return nil;end)();v125=(function() return 1001 -(451 + 549) ;end)();end if (v125~=(1 + 0)) then else v93=(function() return #":";end)();break;end end break;end end end if (v93~= #".") then else if (v94== #"!") then v96=(function() return v95()~=(1288 -(993 + 295)) ;end)();elseif (v94==(1 + 1)) then v96=(function() return v97();end)();elseif (v94== #"nil") then v96=(function() return v98();end)();end v99[v100]=(function() return v96;end)();break;end end return v93,v94,v95,v96,v97,v98,v99,v100;end;end)();local v55=(function() return function(v101,v102,v103,v104,v105,v106,v107,v108,v109) local v110=(function() return 0;end)();local v101=(function() return;end)();local v102=(function() return;end)();while true do if ((0 -0)==v110) then v101=(function() return 0 -0 ;end)();v102=(function() return nil;end)();v110=(function() return 1;end)();end if (v110==(1172 -(418 + 753))) then local v127=(function() return 1384 -(746 + 638) ;end)();while true do if (v127~=(0 + 0)) then else while true do if (v101~=(0 -0)) then else v102=(function() return v103();end)();if (v104(v102, #"\\", #".")==(341 -(218 + 123))) then local v186=(function() return 0 + 0 ;end)();local v187=(function() return;end)();local v188=(function() return;end)();local v189=(function() return;end)();local v190=(function() return;end)();while true do if (v186==(1582 -(1535 + 46))) then v189=(function() return nil;end)();v190=(function() return nil;end)();v186=(function() return 1771 -(1749 + 20) ;end)();end if (v186==(2 + 0)) then while true do if ( #"91("~=v187) then else if (v104(v189, #"-19", #"gha")== #"[") then v190[ #"xnxx"]=(function() return v105[v190[ #".com"]];end)();end v106[v107]=(function() return v190;end)();break;end if ( #"."==v187) then local v198=(function() return 0 + 0 ;end)();local v199=(function() return;end)();while true do if (v198==(0 + 0)) then v199=(function() return 560 -(306 + 254) ;end)();while true do if (v199~=(0 + 0)) then else v190=(function() return {v108(),v108(),nil,nil};end)();if (v188==(0 + 0)) then local v206=(function() return 1145 -(466 + 679) ;end)();local v207=(function() return;end)();while true do if (0==v206) then v207=(function() return 0;end)();while true do if (v207~=(1467 -(899 + 568))) then else v190[ #"gha"]=(function() return v108();end)();v190[ #".com"]=(function() return v108();end)();break;end end break;end end elseif (v188== #":") then v190[ #"91("]=(function() return v109();end)();elseif (v188==2) then v190[ #"nil"]=(function() return v109() -((2 + 0)^(38 -22)) ;end)();elseif (v188~= #"-19") then else local v212=(function() return 0 -0 ;end)();local v213=(function() return;end)();while true do if (v212~=0) then else v213=(function() return 0;end)();while true do if (v213==0) then v190[ #"-19"]=(function() return v109() -(2^(619 -(268 + 335))) ;end)();v190[ #"asd1"]=(function() return v108();end)();break;end end break;end end end v199=(function() return 291 -(60 + 230) ;end)();end if (v199~=(1 + 0)) then else v187=(function() return 574 -(426 + 146) ;end)();break;end end break;end end end if ((0 -0)==v187) then local v200=(function() return 0 -0 ;end)();local v201=(function() return;end)();while true do if (v200==(0 + 0)) then v201=(function() return 1456 -(282 + 1174) ;end)();while true do if (v201~=(114 -(4 + 110))) then else v188=(function() return v104(v102,813 -(569 + 242) , #"91(");end)();v189=(function() return v104(v102, #"0836",17 -11 );end)();v201=(function() return 1 + 0 ;end)();end if (v201~=1) then else v187=(function() return #"|";end)();break;end end break;end end end if ((2 + 0)~=v187) then else local v202=(function() return 0;end)();while true do if (v202==0) then if (v104(v189, #",", #"\\")== #"}") then v190[3 -1 ]=(function() return v105[v190[5 -3 ]];end)();end if (v104(v189,2,2)~= #"]") then else v190[ #"91("]=(function() return v105[v190[ #"nil"]];end)();end v202=(function() return 1025 -(706 + 318) ;end)();end if (v202==(167 -(122 + 44))) then v187=(function() return #"asd";end)();break;end end end end break;end if (v186==(0 -0)) then local v196=(function() return 1251 -(721 + 530) ;end)();while true do if (v196==(3 -2)) then v186=(function() return 1;end)();break;end if (v196~=(0 + 0)) then else v187=(function() return 1271 -(945 + 326) ;end)();v188=(function() return nil;end)();v196=(function() return 1 + 0 ;end)();end end end end end break;end end return v101,v102,v103,v104,v105,v106,v107,v108,v109;end end end end end;end)();local v56=(function() return function(v111,v112,v113) local v114=(function() return 0 -0 ;end)();while true do if (v114==0) then local v128=(function() return 0 -0 ;end)();local v129=(function() return;end)();while true do if (v128==(65 -(30 + 35))) then v129=(function() return 0;end)();while true do if ((0 + 0)==v129) then local v152=(function() return 0;end)();while true do if (v152==(700 -(271 + 429))) then v111[v112-#"{" ]=(function() return v113();end)();return v111,v112,v113;end end end end break;end end end end end;end)();local v57=(function() return {};end)();local v58=(function() return {};end)();local v59=(function() return {};end)();local v60=(function() return {v57,v58,nil,v59};end)();local v61=(function() return v23();end)();local v62=(function() return {};end)();for v70= #"/",v61 do FlatIdent_64E40,Type,v21,Cons,v24,v25,v62,v70=(function() return v54(FlatIdent_64E40,Type,v21,Cons,v24,v25,v62,v70);end)();end v60[ #"xnx"]=(function() return v21();end)();for v71= #"/",v23() do FlatIdent_207CC,Descriptor,v21,v20,v62,v57,v71,v22,v23=(function() return v55(FlatIdent_207CC,Descriptor,v21,v20,v62,v57,v71,v22,v23);end)();end for v72= #":",v23() do v58,v72,v28=(function() return v56(v58,v72,v28);end)();end return v60;end local function v29(v64,v65,v66) local v67=v64[3 -2 ];local v68=v64[1214 -((627 -(244 + 60)) + 684 + 205) ];local v69=v64[7 -4 ];return function(...) local v73=v67;local v74=v68;local v75=v69;local v76=v27;local v77=(1057 -(41 + 435)) -(361 + 219) ;local v78= -(321 -(53 + 267));local v79={};local v80={...};local v81=v12("#",...) -(414 -(15 + 398)) ;local v82={};local v83={};for v115=(756 + 226) -(18 + 964) ,v81 do if (v115>=v75) then v79[v115-v75 ]=v80[v115 + (3 -2) ];else v83[v115]=v80[v115 + 1 + 0 ];end end local v84=(v81-v75) + 1 + 0 ;local v85;local v86;while true do v85=v73[v77];v86=v85[851 -(20 + 830) ];if ((4930>148) and (v86<=(4 + 0))) then if ((v86<=((1252 -(936 + 189)) -(116 + 10))) or (920>4740)) then if ((4997>4516) and (v86>(0 + 0 + 0))) then local v131=(2351 -(1565 + 48)) -(542 + 196) ;local v132;local v133;local v134;local v135;local v136;while true do if ((3002<=3392) and (v131==(1 -0))) then v85=v73[v77];v83[v85[2]]=v66[v85[3]];v77=v77 + 1 + 0 ;v85=v73[v77];v83[v85[2 + 0 ]]=v66[v85[2 + 1 + 0 ]];v77=v77 + 1 ;v131=4 -2 ;end if ((1075==1075) and ((4 -2)==v131)) then v85=v73[v77];v136=v85[1553 -(1126 + 425) ];v135=v83[v85[(1546 -(782 + 356)) -(118 + 287) ]];v83[v136 + 1 ]=v135;v83[v136]=v135[v85[4]];v77=v77 + ((270 -(176 + 91)) -2) ;v131=3;end if (v131==(1124 -(118 + 1003))) then v85=v73[v77];v83[v85[(13 -8) -3 ]]=v85[(560 -180) -(142 + 235) ];v77=v77 + 1 ;v85=v73[v77];v83[v85[9 -7 ]]=v85[1 + 2 ]~=(977 -((1645 -(975 + 117)) + 424)) ;v77=v77 + (1 -0) ;v131=4 + (1875 -(157 + 1718)) ;end if (v131==(5 + 0 + 0)) then v77=v77 + 1 + 0 ;v85=v73[v77];v136=v85[2];v83[v136]=v83[v136](v13(v83,v136 + 1 + 0 ,v78));v77=v77 + 1 ;v85=v73[v77];v131=4 + 2 ;end if ((4432==4432) and (v131==(12 -(21 -15)))) then v83[v85[5 -3 ]]();v77=v77 + 1 ;v85=v73[v77];do return;end break;end if (v131==(8 -4)) then v85=v73[v77];v136=v85[1 + 1 ];v133,v134=v76(v83[v136](v13(v83,v136 + (4 -3) ,v85[756 -(239 + 514) ])));v78=(v134 + v136) -(1 + 0) ;v132=1329 -(797 + 532) ;for v184=v136,v78 do local v185=0 + 0 ;while true do if (v185==(0 + 0)) then v132=v132 + (2 -1) ;v83[v184]=v133[v132];break;end end end v131=5;end if (v131==(1202 -(373 + 829))) then v132=nil;v133,v134=nil;v135=nil;v136=nil;v83[v85[733 -(476 + 255) ]]={};v77=v77 + (1131 -((1261 -892) + 761)) ;v131=1 + 0 ;end end else local v137=0 -0 ;local v138;local v139;while true do if ((3358<=4012) and (v137==0)) then v138=v85[3 -1 ];v139=v83[v85[241 -(64 + 174) ]];v137=(1019 -(697 + 321)) + 0 ;end if (v137==(1 -0)) then v83[v138 + (337 -(144 + 192)) ]=v139;v83[v138]=v139[v85[220 -(42 + 174) ]];break;end end end elseif (v86<=((5 -3) + 0)) then v83[v85[2 + 0 ]]=v85[3]~=(0 + 0) ;elseif ((1494<=3005) and (v86==(1507 -(363 + 1141)))) then local v146=v85[(3351 -1769) -((2726 -1543) + 397) ];local v147,v148=v76(v83[v146](v13(v83,v146 + ((1 + 1) -1) ,v85[3 + 0 ])));v78=(v148 + v146) -(1 + 0) ;local v149=1975 -(1913 + (115 -53)) ;for v180=v146,v78 do local v181=0 + 0 ;while true do if ((v181==0) or (3111==2134)) then v149=v149 + 1 ;v83[v180]=v147[v149];break;end end end else do return;end end elseif ((2355==2355) and (v86<=(15 -9))) then if (v86>5) then v83[v85[1935 -(565 + 1368) ]]=v66[v85[11 -8 ]];else local v143=1661 -(1477 + 184) ;local v144;while true do if (v143==(0 -0)) then v144=v85[2 + 0 ];v83[v144]=v83[v144](v13(v83,v144 + 1 ,v78));break;end end end elseif (v86<=(863 -(564 + 292))) then v83[v85[2]]={};elseif ((v86>8) or (588<=432)) then v83[v85[2]]();else v83[v85[2]]=v85[(10 -6) -(1228 -(322 + 905)) ];end v77=v77 + (2 -1) ;end end;end return v29(v28(),{},v17)(...);end return v15("LOL!043Q00030A3Q006C6F6164737472696E6703043Q0067616D6503073Q00482Q747047657403213Q00682Q7470733A2Q2F706173746562696E2E636F6D2F7261772F6A65594473343046000A4Q00017Q00122Q000100013Q00122Q000200023Q00202Q00020002000300122Q000400046Q000500016Q000200056Q00013Q00024Q0001000100016Q00017Q00",v9(),...);
Add Comment
Please, Sign In to add comment
