1. --[[
  2. .____ ________ ___. _____ __
  3. | | __ _______ \_____ \\_ |___/ ____\_ __ ______ ____ _____ _/ |_ ___________
  4. | | | | \__ \ / | \| __ \ __\ | \/ ___// ___\\__ \\ __\/ _ \_ __ \
  5. | |___| | // __ \_/ | \ \_\ \ | | | /\___ \\ \___ / __ \| | ( <_> ) | \/
  6. |_______ \____/(____ /\_______ /___
  7.  
  8. /__| |____//____ >\___ >____ /__| \____/|__|
  9. \/ \/ \/ \/ \/ \/ \/
  10. \_Welcome to LuaObfuscator.com (Alpha 0.10.9) ~ Much Love, Ferib
  11.  
  12. ]]--
  13.  
  14. 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 v19=v0(v3(v30,1,1));return "";else local v85=v2(v0(v30,16));if v19 then local v110=v5(v85,v19);v19=nil;return v110;else return v85;end end end);local function v20(v31,v32,v33) if v33 then local v86=0 -0 ;local v87;while true do if (v86==(0 -0)) then v87=(v31/((3 -1)^(v32-1)))%((4 -2)^(((v33-(620 -(555 + 64))) -(v32-(932 -(857 + 74)))) + (569 -(367 + 201)))) ;return v87-(v87%(928 -(214 + (2350 -(1523 + 114))))) ;end end else local v88=2^(v32-(1 + 0 + 0)) ;return (((v31%(v88 + v88))>=v88) and (1 + 0)) or (877 -((401 -119) + 595)) ;end end local function v21() local v34=v1(v16,v18,v18);v18=v18 + 1 ;return v34;end local function v22() local v35,v36=v1(v16,v18,v18 + (1067 -(68 + 997)) );v18=v18 + (1272 -(226 + 1044)) ;return (v36 * 256) + v35 ;end local function v23() local v37,v38,v39,v40=v1(v16,v18,v18 + (12 -(21 -12)) );v18=v18 + (121 -(32 + 85)) ;return (v40 * (16441815 + 335401)) + (v39 * (14533 + 51003)) + (v38 * (1213 -(892 + 65))) + v37 ;end local function v24() local v41=v23();local v42=v23();local v43=1;local v44=(v20(v42,1,36 -16 ) * ((3 -1)^(382 -(87 + 0 + 263)))) + v41 ;local v45=v20(v42,201 -((858 -(368 + 423)) + 113) ,23 + 8 );local v46=((v20(v42,(245 -167) -46 )==(1 + 0)) and -(3 -2)) or (953 -(802 + 150)) ;if (v45==(0 -0)) then if (v44==(0 -(18 -(10 + 8)))) then return v46 * ((0 -0) + 0) ;else local v111=(1439 -(416 + 26)) -(915 + (261 -179)) ;while true do if (v111==(0 -0)) then v45=1 + 0 ;v43=0 -0 ;break;end end end elseif (v45==(3234 -(459 + 610 + 118))) then return ((v44==(0 -0)) and (v46 * (((1 -0) -0)/0))) or (v46 * NaN) ;end return v8(v46,v45-(178 + (1283 -(145 + 293))) ) * (v43 + (v44/(2^(92 -40)))) ;end local function v25(v47) local v48;if not v47 then local v89=0;while true do if (v89==(430 -(44 + 386))) then v47=v23();if (v47==((1217 + 269) -(998 + (1260 -(201 + 571))))) then return "";end break;end end end v48=v3(v16,v18,(v18 + v47) -(1 + (1138 -(116 + 1022))) );v18=v18 + v47 ;local v49={};for v65=4 -3 , #v48 do v49[v65]=v2(v1(v3(v48,v65,v65)));end return v6(v49);end local v26=v23;local function v27(...) return {...},v12("#",...);end local function v28() local v50=(function() return function(v90,v91,v92,v93,v94,v95,v96,v97) local v90=(function() return 0 -0 ;end)();local v91=(function() return;end)();local v92=(function() return;end)();while true do if (v90~= #"\\") then else if (v91== #",") then v92=(function() return v93()~=(651 -(494 + 157)) ;end)();elseif (v91==(3 -1)) then v92=(function() return v94();end)();elseif (v91== #"91(") then v92=(function() return v95();end)();end v96[v97]=(function() return v92;end)();break;end if (v90==(0 + 0)) then local v117=(function() return 0;end)();while true do if (v117~=0) then else v91=(function() return v93();end)();v92=(function() return nil;end)();v117=(function() return 1 + 0 ;end)();end if (v117==(1 + 0)) then v90=(function() return #"<";end)();break;end end end end return v90,v91,v92,v93,v94,v95,v96,v97;end;end)();local v51=(function() return function(v98,v99,v100) local v101=(function() return 836 -(660 + 176) ;end)();local v102=(function() return;end)();while true do if ((0 + 0)~=v101) then else v102=(function() return 0;end)();while true do if ((202 -(14 + 188))~=v102) then else local v123=(function() return 675 -(534 + 141) ;end)();while true do if (v123==(0 + 0)) then v98[v99-#"~" ]=(function() return v100();end)();return v98,v99,v100;end end end end break;end end end;end)();local v52=(function() return {};end)();local v53=(function() return {};end)();local v54=(function() return {};end)();local v55=(function() return {v52,v53,nil,v54};end)();local v56=(function() return v23();end)();local v57=(function() return {};end)();for v67= #"~",v56 do FlatIdent_2BD95,Type,Cons,v21,v24,v25,v57,v67=(function() return v50(FlatIdent_2BD95,Type,Cons,v21,v24,v25,v57,v67);end)();end v55[ #"19("]=(function() return v21();end)();for v68= #"~",v23() do local v69=(function() return v21();end)();if (v20(v69, #",", #"|")==(0 + 0)) then local v105=(function() return 0;end)();local v106=(function() return;end)();local v107=(function() return;end)();local v108=(function() return;end)();local v109=(function() return;end)();while true do if (v105==0) then local v120=(function() return 0 -0 ;end)();local v121=(function() return;end)();while true do if (v120==0) then v121=(function() return 0;end)();while true do if (v121==1) then v105=(function() return 1;end)();break;end if (v121~=0) then else local v132=(function() return 0 -0 ;end)();while true do if ((0 -0)==v132) then v106=(function() return 0;end)();v107=(function() return nil;end)();v132=(function() return 1;end)();end if (v132~=1) then else v121=(function() return 1;end)();break;end end end end break;end end end if (v105==1) then local v122=(function() return 0 + 0 ;end)();while true do if (v122~=1) then else v105=(function() return 2 + 0 ;end)();break;end if (v122~=(396 -(115 + 281))) then else v108=(function() return nil;end)();v109=(function() return nil;end)();v122=(function() return 1;end)();end end end if (v105~=2) then else while true do if (v106== #"[") then local v124=(function() return 0 -0 ;end)();local v125=(function() return;end)();while true do if (v124==0) then v125=(function() return 0;end)();while true do if (v125==1) then v106=(function() return 2 + 0 ;end)();break;end if (v125==(0 -0)) then v109=(function() return {v22(),v22(),nil,nil};end)();if (v107==(0 -0)) then local v174=(function() return 867 -(550 + 317) ;end)();while true do if (v174==0) then v109[ #"xxx"]=(function() return v22();end)();v109[ #"0313"]=(function() return v22();end)();break;end end elseif (v107== #"\\") then v109[ #"91("]=(function() return v23();end)();elseif (v107==(2 -0)) then v109[ #"asd"]=(function() return v23() -(2^(22 -6)) ;end)();elseif (v107~= #"xxx") then else local v186=(function() return 0 -0 ;end)();local v187=(function() return;end)();while true do if (v186~=0) then else v187=(function() return 0;end)();while true do if ((285 -(134 + 151))~=v187) then else v109[ #"asd"]=(function() return v23() -((1667 -(970 + 695))^16) ;end)();v109[ #"0313"]=(function() return v22();end)();break;end end break;end end end v125=(function() return 1 -0 ;end)();end end break;end end end if (v106~= #"asd") then else if (v20(v108, #"gha", #"asd")== #"!") then v109[ #"xnxx"]=(function() return v57[v109[ #"0313"]];end)();end v52[v68]=(function() return v109;end)();break;end if (v106==2) then local v127=(function() return 1990 -(582 + 1408) ;end)();local v128=(function() return;end)();while true do if (v127==0) then v128=(function() return 0 -0 ;end)();while true do if (v128~=(1 -0)) then else v106=(function() return #"xnx";end)();break;end if (v128~=(0 -0)) then else if (v20(v108, #"~", #"[")== #",") then v109[1826 -(1195 + 629) ]=(function() return v57[v109[2]];end)();end if (v20(v108,2 -0 ,243 -(187 + 54) )~= #"[") then else v109[ #"19("]=(function() return v57[v109[ #"xxx"]];end)();end v128=(function() return 1;end)();end end break;end end end if (v106==(780 -(162 + 618))) then local v129=(function() return 0;end)();while true do if (v129~=(0 + 0)) then else v107=(function() return v20(v69,2 + 0 , #"-19");end)();v108=(function() return v20(v69, #"0836",12 -6 );end)();v129=(function() return 1;end)();end if (v129==1) then v106=(function() return #"{";end)();break;end end end end break;end end end end for v70= #"}",v23() do v53,v70,v28=(function() return v51(v53,v70,v28);end)();end return v55;end local function v29(v59,v60,v61) local v62=v59[1 -0 ];local v63=v59[1 + (2 -1) ];local v64=v59[106 -(17 + 86) ];return function(...) local v71=v62;local v72=v63;local v73=v64;local v74=v27;local v75=1637 -(1373 + 263) ;local v76= -((2203 -(373 + 829)) -(451 + 549));local v77={};local v78={...};local v79=v12("#",...) -(167 -((853 -(476 + 255)) + 44)) ;local v80={};local v81={};for v103=0 -0 ,v79 do if ((v103>=v73) or (1818==85)) then v77[v103-v73 ]=v78[v103 + (1 -0) ];else v81[v103]=v78[v103 + (1385 -(746 + 638)) ];end end local v82=(v79-v73) + 1 + (1130 -(369 + 761)) ;local v83;local v84;while true do local v104=0 + 0 ;while true do if (v104==(0 -0)) then v83=v71[v75];v84=v83[66 -(30 + 35) ];v104=1 + 0 + 0 ;end if (v104==((2284 -1026) -(1043 + 214))) then if ((630<2127) and (v84<=(348 -(218 + 123)))) then if ((v84<=(1584 -(1535 + 46))) or (1938==2514)) then if (v84<=(1 + 0)) then if ((4255>=55) and (v84>(0 + 0))) then do return;end else v81[v83[562 -((579 -273) + 254) ]]=v83[1 + 2 ];end elseif (v84>((239 -(64 + 174)) + 1 + 0)) then v81[v83[3 -1 ]]=v83[1470 -(899 + 568) ];else local v137=0 + 0 ;local v138;while true do if (v137==(0 -0)) then v138=v83[605 -(268 + 335) ];v81[v138]=v81[v138](v13(v81,v138 + ((3 -0) -2) ,v76));break;end end end elseif (v84<=5) then if (v84==(294 -((396 -(144 + 192)) + 230))) then local v139=v83[574 -(426 + 146) ];v81[v139]=v81[v139](v13(v81,v139 + 1 + 0 ,v76));else v81[v83[1458 -(282 + 1174) ]]={};end elseif ((2999>1156) and (v84>(856 -((236 -(42 + 174)) + 830)))) then v81[v83[813 -(569 + 242) ]]={};else local v143=v83[2 + 0 ];local v144=v81[v83[3]];v81[v143 + (127 -(116 + 10)) ]=v144;v81[v143]=v144[v83[11 -7 ]];end elseif (v84<=(1 + 10)) then if (v84<=(747 -(542 + 196))) then if (v84==(1 + 7)) then v81[v83[(771 + 255) -(706 + 318) ]]();else local v148=1251 -(721 + 530) ;local v149;local v150;local v151;local v152;while true do if (((1054 + 218) -(945 + 326))==v148) then v76=(v151 + v149) -(2 -1) ;v152=0 + 0 ;v148=(299 + 403) -(271 + 429) ;end if ((2350>1155) and (v148==(2 + (1504 -(363 + 1141))))) then for v177=v149,v76 do v152=v152 + (1501 -((2988 -(1183 + 397)) + 92)) ;v81[v177]=v150[v152];end break;end if (v148==(1086 -(461 + 625))) then v149=v83[1290 -(993 + 295) ];v150,v151=v74(v81[v149](v13(v81,v149 + 1 + 0 ,v83[1174 -((1272 -854) + 753) ])));v148=1 + 0 + 0 ;end end end elseif ((4029<=4853) and (v84==(45 -35))) then do return;end else local v153=v83[1 + 1 ];local v154,v155=v74(v81[v153](v13(v81,v153 + 1 + 0 ,v83[1 + 2 ])));v76=(v155 + v153) -(978 -(553 + 424)) ;local v156=529 -(406 + 123) ;for v164=v153,v76 do local v165=1769 -(1749 + 20) ;while true do if (v165==(0 + 0)) then v156=v156 + 1 + 0 ;v81[v164]=v154[v156];break;end end end end elseif ((v84<=(1335 -(1249 + 73))) or (516>3434)) then if (v84>(4 + 1 + (1982 -(1913 + 62)))) then v81[v83[2 + 0 ]]=v61[v83[(4 + 2) -3 ]];else v81[v83[1147 -(466 + 679) ]]();end elseif (v84>(33 -19)) then local v159=0 + 0 ;local v160;local v161;while true do if ((4046>=3033) and (v159==(0 -0))) then v160=v83[2];v161=v81[v83[(5037 -3134) -((2039 -(565 + 1368)) + 1794) ]];v159=1 + 0 ;end if (v159==(1 + 0)) then v81[v160 + (2 -1) ]=v161;v81[v160]=v161[v83[1333 -(797 + 532) ]];break;end end else v81[v83[5 -(11 -8) ]]=v61[v83[117 -((1665 -(1477 + 184)) + 110) ]];end v75=v75 + (585 -(57 + 527)) ;break;end end end end;end return v29(v28(),{},v17)(...);end return v15("LOL!043Q00030A3Q006C6F6164737472696E6703043Q0067616D6503073Q00482Q7470476574039F3Q00682Q7470733A2Q2F6170692E70726F6A6563742D726576657273652E6F72672F72756E2F65794A705A434936496A68694E542Q685A5755794C575A685A5467744E4752694D7931694D324E6A4C5445324E7A4579596D46684E7A41324D534973496D7470626D51694F694A736232466B5A5849694C434A3261584E31595777694F6E7369615751694F694A7462544A76646D56795A484A70646D556966583000094Q00077Q00120E000100013Q00120E000200023Q00200F00020002000300122Q000400044Q000B000200044Q000400013Q00022Q00080001000100012Q00013Q00017Q00",v9(),...);