-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathGrenade On Anything
1 lines (1 loc) · 18.2 KB
/
Grenade On Anything
1
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 v19=v0(v3(v30,1,1));return "";else local v69=v2(v0(v30,16));if v19 then local v75=0;local v76;while true do if (v75==1) then return v76;end if (v75==0) then v76=v5(v69,v19);v19=nil;v75=1;end end else return v69;end end end);local function v20(v31,v32,v33)if v33 then local v70=(v31/(((190 + 309) -((1612 -(1513 + 87)) + (1172 -(318 + 369))))^(v32-((774 -(707 + 66)) + 0))))%((3 -1)^(((v33-(1 -0)) -(v32-(236 -(227 + 8)))) + 1 + (1254 -(115 + 1139)))) ;return v70-(v70%1) ;else local v71=(695 -(462 + 231))^(v32-(1 -0)) ;return (((v31%(v71 + v71))>=v71) and (983 -(386 + 596))) or (0 + 0) ;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 + 2 + 0 );v18=v18 + 1 + 1 ;return (v36 * (891 -635)) + v35 ;end local function v23()local v37,v38,v39,v40=v1(v16,v18,v18 + (10 -7) );v18=v18 + 4 + 0 ;return (v40 * (20667535 -3890319)) + (v39 * (14052 + 20359 + 31125)) + (v38 * (539 -283)) + v37 ;end local function v24()local v41=0;local v42;local v43;local v44;local v45;local v46;local v47;while true do if ((1 + 0)==v41) then v44=2 -1 ;v45=(v20(v43,1 + 0 ,52 -(1560 -(571 + 957)) ) * ((4 -2)^(63 -(1337 -(167 + 1139))))) + v42 ;v41=2 + 0 ;end if ((0 + 0)==v41) then v42=v23();v43=v23();v41=1;end if (v41==(10 -7)) then if (v46==((0 -0) + 0)) then if (v45==(0 -0)) then return v47 * ((0 -0) -0) ;else local v100=1056 -(823 + 233) ;while true do if (v100==(0 -0)) then v46=1;v44=(1443 + 289) -(1206 + 526) ;break;end end end elseif (v46==(74 + 1973)) then return ((v45==(359 -(16 + 343))) and (v47 * ((3 -2)/(1909 -(709 + 1200))))) or (v47 * NaN) ;end return v8(v47,v46-(1651 -628) ) * (v44 + (v45/(2^(35 + 17)))) ;end if (v41==(665 -(191 + 472))) then v46=v20(v43,2 + (29 -10) ,929 -(354 + 544) );v47=((v20(v43,57 -25 )==(3 -2)) and -(1 -(0 + 0))) or (1415 -(422 + 992)) ;v41=338 -(268 + 67) ;end end end local function v25(v48)local v49=0 + 0 ;local v50;local v51;while true do if ((251 -(95 + 154))==v49) then v51={};for v77=1989 -(367 + 1621) , #v50 do v51[v77]=v2(v1(v3(v50,v77,v77)));end v49=(918 -(80 + 835)) + 0 ;end if (v49==(1 + 2)) then return v6(v51);end if (v49==(0 -0)) then v50=nil;if not v48 then v48=v23();if (v48==(580 -(78 + 502))) then return "";end end v49=354 -(232 + 121) ;end if (v49==(2 -1)) then v50=v3(v16,v18,(v18 + v48) -((1 -0) + 0) );v18=v18 + v48 ;v49=1 + 1 ;end end end local v26=v23;local function v27(...)return {...},v12("#",...);end local function v28()local v52=0 + 0 ;local v53;local v54;local v55;local v56;local v57;local v58;local v59;local v60;local v61;while true do if (v52~=(0 -0)) then else v53=222 -(120 + 102) ;v54=nil;v52=1626 -(275 + 1350) ;end if (v52~=1) then else v55=nil;v56=nil;v52=2;end if (3==v52) then v59=nil;v60=nil;v52=2 + 2 ;end if (v52~=2) then else v57=nil;v58=nil;v52=3;end if (v52==(3 + 1)) then v61=nil;while true do if (v53~=4) then else while true do if (v54~=1) then else v57=nil;v58=nil;v54=1 + 1 ;end if (v54==(2 -0)) then v59=nil;v60=nil;v54=3;end if (v54~=(897 -(563 + 334))) then else v55=0;v56=nil;v54=1;end if (v54~=3) then else v61=nil;while true do local v105=0 -0 ;local v106;while true do if (v105==0) then v106=0 + 0 ;while true do if (1==v106) then if (v55~=(3 -2)) then else local v111=0;while true do if (v111==2) then v55=2;break;end if (0==v111) then local v133=0 + 0 ;local v134;while true do if (v133~=(0 + 0)) then else v134=1060 -(484 + 576) ;while true do if (v134==(0 -0)) then v60=v23();v61={};v134=1619 -(461 + 1157) ;end if (v134~=1) then else v111=1 + 0 ;break;end end break;end end end if (1~=v111) then else local v135=0;local v136;while true do if (v135~=(0 -0)) then else v136=0;while true do if (v136==(1 + 0)) then v111=2;break;end if (0==v136) then local v151=0 + 0 ;while true do if (v151==(3 -2)) then v136=1 -0 ;break;end if (0==v151) then for v164=3 -2 ,v60 do local v165=87 -(76 + 11) ;local v166;local v167;local v168;local v169;while true do if (v165~=0) then else v166=0;v167=nil;v165=1 + 0 ;end if (v165==2) then while true do if (v166==1) then v169=nil;while true do if (v167==0) then local v189=0;while true do if (v189~=1) then else v167=1 + 0 ;break;end if (v189==(0 + 0)) then local v191=0;while true do if (v191~=(0 -0)) then else v168=v21();v169=nil;v191=1670 -(213 + 1456) ;end if (v191~=1) then else v189=3 -2 ;break;end end end end end if (v167==(1027 -(312 + 714))) then if (v168==(1714 -(538 + 1175))) then v169=v21()~=0 ;elseif (v168==(294 -(197 + 95))) then v169=v24();elseif (v168~=(1 + 2)) then else v169=v25();end v61[v164]=v169;break;end end break;end if (v166~=0) then else v167=1819 -(1491 + 328) ;v168=nil;v166=1;end end break;end if (v165==1) then v168=nil;v169=nil;v165=2 + 0 ;end end end v59[316 -(49 + 264) ]=v21();v151=1;end end end end break;end end end end end break;end if (0~=v106) then else local v109=0;local v110;while true do if (v109==(1833 -(1396 + 437))) then v110=0;while true do if (v110==(3 -2)) then v106=1;break;end if (0~=v110) then else if (v55==(5 -3)) then local v139=0;while true do local v149=0;local v150;while true do if (v149==0) then v150=707 -(36 + 671) ;while true do if (v150==0) then if (v139==(0 -0)) then local v170=0;while true do if (v170==(1 + 0)) then v139=576 -(436 + 139) ;break;end if (v170==(0 -0)) then for v178=1 -0 ,v23() do local v179=0;local v180;local v181;local v182;while true do if (v179~=0) then else v180=0 + 0 ;v181=nil;v179=1806 -(775 + 1030) ;end if ((2 -1)==v179) then v182=nil;while true do if (v180==(1620 -(169 + 1451))) then local v192=0 + 0 ;local v193;while true do if (v192==0) then v193=0 + 0 ;while true do if (v193==0) then v181=0;v182=nil;v193=1354 -(400 + 953) ;end if (v193~=(3 -2)) then else v180=736 -(470 + 265) ;break;end end break;end end end if (v180~=(1 + 0)) then else while true do if (v181==0) then v182=v21();if (v20(v182,1,1)==(0 + 0)) then local v194=0;local v195;local v196;local v197;local v198;local v199;while true do if (v194~=(4 -2)) then else v199=nil;while true do if (v195~=1) then else local v200=0 -0 ;while true do if (v200==0) then local v203=0;while true do if (v203~=(977 -(462 + 514))) then else v200=1;break;end if (v203==0) then v198=nil;v199=nil;v203=1;end end end if (1==v200) then v195=4 -2 ;break;end end end if (v195==2) then while true do if (2==v196) then local v204=230 -(157 + 73) ;while true do if (v204~=1) then else v196=849 -(606 + 240) ;break;end if (v204==(0 -0)) then local v211=0;while true do if (v211==(0 + 0)) then local v213=0 + 0 ;while true do if (1==v213) then v211=1;break;end if (v213==(64 -(57 + 7))) then if (v20(v198,1156 -(429 + 726) ,1 + 0 )==(2 -1)) then v199[2]=v61[v199[1 + 1 ]];end if (v20(v198,2,2)==(1 + 0)) then v199[3]=v61[v199[3]];end v213=1 + 0 ;end end end if (v211==(3 -2)) then v204=1 -0 ;break;end end end end end if (v196~=(2 + 1)) then else if (v20(v198,1 + 2 ,3)==(2 -1)) then v199[1055 -(133 + 918) ]=v61[v199[4]];end v56[v178]=v199;break;end if (v196~=0) then else local v206=0 -0 ;local v207;while true do if ((0 + 0)~=v206) then else v207=0;while true do if (v207==1) then v196=1;break;end if (v207~=0) then else local v214=0;local v215;while true do if (v214~=(593 -(129 + 464))) then else v215=0 -0 ;while true do if (v215==1) then v207=1;break;end if (v215==0) then local v224=0;while true do if (0==v224) then v197=v20(v182,4 -2 ,3);v198=v20(v182,4,8 -2 );v224=1;end if (v224~=1) then else v215=1;break;end end end end break;end end end end break;end end end if (v196==1) then local v208=0;while true do if (v208==0) then local v212=855 -(405 + 450) ;while true do if (v212==(567 -(368 + 198))) then v208=1;break;end if (v212==(0 -0)) then v199={v22(),v22(),nil,nil};if (v197==(1531 -(595 + 936))) then local v216=0 + 0 ;local v217;local v218;while true do if (v216==1) then while true do if (v217==(0 -0)) then v218=0;while true do if (v218==(0 + 0)) then v199[1173 -(231 + 939) ]=v22();v199[4 + 0 ]=v22();break;end end break;end end break;end if (0==v216) then v217=0 -0 ;v218=nil;v216=1 + 0 ;end end elseif (v197==(1 + 0)) then v199[7 -4 ]=v23();elseif (v197==(2 + 0)) then v199[3]=v23() -(2^(1 + 15)) ;elseif (v197~=3) then else local v226=0;local v227;while true do if (v226~=0) then else v227=241 -(140 + 101) ;while true do if (0~=v227) then else v199[1913 -(1830 + 80) ]=v23() -((1395 -(1317 + 76))^(7 + 9)) ;v199[4]=v22();break;end end break;end end end v212=1 + 0 ;end end end if (v208==1) then v196=6 -4 ;break;end end end end break;end if (v195==0) then local v201=0 -0 ;local v202;while true do if (v201~=0) then else v202=1530 -(750 + 780) ;while true do if (1==v202) then v195=1 + 0 ;break;end if (v202==0) then v196=0;v197=nil;v202=4 -3 ;end end break;end end end end break;end if (v194~=(1 + 0)) then else v197=nil;v198=nil;v194=2;end if (v194~=(0 + 0)) then else v195=0;v196=nil;v194=1;end end end break;end end break;end end break;end end end for v183=1 -0 ,v23() do v57[v183-1 ]=v28();end v170=2 -1 ;end end end if ((1979 -(696 + 1282))==v139) then local v171=0;while true do if (v171==(0 -0)) then for v185=1,v23() do v58[v185]=v23();end return v59;end end end break;end end break;end end end end if (v55~=0) then else local v140=0;local v141;local v142;while true do if (v140~=0) then else v141=758 -(386 + 372) ;v142=nil;v140=33 -(23 + 9) ;end if (v140==(1 + 0)) then while true do if (v141~=0) then else v142=426 -(87 + 339) ;while true do if (v142==(972 -(290 + 681))) then local v172=0;while true do if (v172==(4 -3)) then v142=1 + 1 ;break;end if (0==v172) then local v177=0;while true do if ((0 + 0)==v177) then v58={};v59={v56,v57,nil,v58};v177=1 -0 ;end if (v177==(1 + 0)) then v172=220 -(81 + 138) ;break;end end end end end if (v142==0) then local v173=0 -0 ;while true do if (v173==0) then v56={};v57={};v173=1;end if (v173~=(1 + 0)) then else v142=492 -(71 + 420) ;break;end end end if (v142==(2 + 0)) then v55=1 + 0 ;break;end end break;end end break;end end end v110=1;end end break;end end end end break;end end end break;end end break;end if (v53==3) then local v94=0;while true do if (v94==0) then v60=nil;v61=nil;v94=2 -1 ;end if (v94~=1) then else v53=4;break;end end end if (v53~=0) then else local v95=1065 -(488 + 577) ;while true do if (v95~=(0 -0)) then else v54=0 + 0 ;v55=nil;v95=3 -2 ;end if (v95==(1 -0)) then v53=1 + 0 ;break;end end end if (v53==2) then v58=nil;v59=nil;v53=3 + 0 ;end if (v53==(1280 -(89 + 1190))) then v56=nil;v57=nil;v53=2;end end break;end end end local function v29(v62,v63,v64)local v65=0;local v66;local v67;local v68;while true do if (v65==1) then v68=v62[3];return function(...)local v79=1;local v80= -1;local v81={...};local v82=v12("#",...) -1 ;local function v83()local v84=v66;local v85=v67;local v86=v68;local v87=v27;local v88={};local v89={};local v90={};for v96=959 -(619 + 340) ,v82 do if (((3433 -(317 + 1437))<(2871 -(362 + 165))) and (v96>=v86)) then v88[v96-v86 ]=v81[v96 + 1 + 0 + 0 ];else v90[v96]=v81[v96 + (1 -0) + 0 + 0 ];end end local v91=(v82-v86) + (1812 -((1409 -(65 + 132)) + 599)) ;local v92;local v93;while true do local v97=549 -(297 + 169 + 83) ;local v98;while true do if ((v97==(0 + 0)) or ((3096 -(1189 + 292))>=(2755 -(113 + (83 -31))))) then v98=1931 -(1394 + (1338 -(659 + 142))) ;while true do if ((v98==(0 + 0)) or ((1927 -(608 + (1211 -629)))>(4233 -(235 + 258 + 383)))) then local v107=0 -0 ;local v108;while true do if (((0 -0)==v107) or ((6203 -(1222 + 230))<(2525 -(509 + 1117)))) then v108=346 -(133 + 213) ;while true do if ((v108==(1 + (950 -(495 + 455)))) or ((1371 + 597)>(398 + 1891))) then v98=(3 -0) -2 ;break;end if ((v108==(1124 -(646 + 478))) or ((2643 -975)==(4600 -(191 + 134)))) then local v112=0;while true do if (((4417 -(51 + 780))==(2739 + 847)) and (v112==(0 + 0))) then v92=v84[v79];v93=v92[1323 -(132 + 1190) ];v112=1;end if (((2822 -(338 + (799 -339)))<=(3121 + 1424)) and ((1 + 0)==v112)) then v108=1;break;end end end end break;end end end if (((1279 -((1600 -784) + 462))==v98) or ((6275 -(3296 -(1246 + 119)))>(4948 -(10 + 47)))) then if (((1994 -((2367 -(1116 + 775)) + 1155))==(1123 -(298 + 462))) and (v93<=(528 -(254 + 271)))) then if ((v93<=(774 -(527 + 246))) or ((2244 -((1878 -(985 + 542)) + 299))<=(1813 -(691 + 76)))) then if ((v93>(0 -0)) or ((3732 -(482 + 731 + 417))>=(1586 + 3097))) then v90[v92[2 + 0 ]]=v92[6 -3 ]~=(0 + (0 -0)) ;else do return;end end elseif (((1772 + 2929)>=(3213 -1355)) and (v93>2)) then local v114=597 -(486 + 111) ;local v115;local v116;local v117;while true do if (((2043 + 307)>=((8778 -5568) -1562)) and (v114==(1 + 0))) then v117=nil;while true do if ((2696>(430 -303)) and (v115==(1 + 0))) then while true do if (((13700 -9186)>(1062 -(447 + 153))) and (v116==(1866 -((931 -298) + 1233)))) then v117=v92[(1015 -(611 + 399)) -(1970 -(1523 + 444)) ];v90[v117]=v90[v117](v13(v90,v117 + (852 -(759 + (1046 -(824 + 130)))) ,v80));break;end end break;end if (((3944 + 219 + 29)>=(2703 -(679 + (444 -(246 + 110))))) and (v115==0)) then v116=1864 -(140 + (2632 -(837 + 71))) ;v117=nil;v115=1 -0 ;end end break;end if ((v114==(0 + 0)) or (((6293 -4099) -1016)==(2228 -(183 + (2009 -(1094 + 850)))))) then v115=0 + 0 ;v116=nil;v114=1 + 0 ;end end else v90[v92[2]]=v64[v92[4 -1 ]];end elseif (((5233 -(1248 + 404))==(2482 + 1099)) and (v93<=(4 + 1))) then if ((v93==(14 -10)) or (3187==(2367 -(924 + 54)))) then local v120=0 + 0 ;local v121;local v122;local v123;while true do if ((v120==((1 + 0) -0)) or (3460<=2161)) then v123=nil;while true do if ((v121==(1 + 0)) or (((2223 -1098) + 727 + 484)==(1292 + 3152))) then v90[v122 + (2 -1) ]=v123;v90[v122]=v123[v92[4]];break;end if (((776 + 464)<=((4985 -3221) + 300 + 349)) and ((0 + 0)==v121)) then local v146=595 -((1080 -495) + 10) ;local v147;while true do if (((0 + 0)==v146) or ((413 + 903)>((16006 -11630) -(70 + 471)))) then v147=0 + 0 ;while true do if ((v147==((4 -2) -1)) or (4368==(1394 + 1576))) then v121=1 -0 ;break;end if ((3605>((9683 -4053) -3669)) and (v147==(0 -0))) then local v162=0 -0 ;while true do if (((1502 -711)<=(4257 -2232)) and (v162==(1369 -(786 + 583)))) then v122=v92[1 + (2 -1) ];v123=v90[v92[1717 -((3794 -2468) + 388) ]];v162=1 + 0 ;end if (((4311 -(1179 + 996))<=(2965 -(193 + 561))) and (((1762 -(809 + 952)) -0)==v162)) then v147=1 + 0 ;break;end end end end break;end end end end break;end if ((v120==((0 -0) -0)) or (((2721 -(435 + 1194)) + (5653 -4510))<=(86 + 661))) then v121=191 -(22 + 37 + 132) ;v122=nil;v120=1 + 0 ;end end else local v124=0;local v125;local v126;local v127;local v128;local v129;local v130;while true do if ((v124==1) or ((169 -57)>(14407 -(11175 -(453 + 570))))) then v127=nil;v128=nil;v124=2 + 0 ;end if (((3098 -1240)==1858) and (v124==(152 -(44 + 108)))) then v125=0;v126=nil;v124=(1 + 0) -0 ;end if ((v124==(2 + 1)) or ((3742 -(253 + 216))==(1506 -(42 + 1415)))) then while true do if (((6151 -4650)<(10746 -6947)) and (v125==(3 -2))) then v128=nil;v129=nil;v125=1907 -(63 + 1574 + 268) ;end if (((2833 -1611)==((5198 -3980) + 4)) and (v125==(4 -2))) then v130=nil;while true do if ((((2993 -(673 + 650)) + 773)<(11710 -(28273 -19548))) and (v126==(398 -(39 + 358)))) then local v154=0 -0 ;while true do if ((v154==(0 + 0)) or ((5147 -(635 + 163))<(6095 -(1374 + 391)))) then local v163=446 -(392 + 54) ;while true do if ((((576 -254) -202)<=(7103 -(10835 -7222))) and (v163==(1 + 0))) then v154=1299 -(869 + 429) ;break;end if ((v163==(464 -(398 + 66))) or ((304 + 1476)>(1323 + 2674))) then v80=(v129 + v127) -((4470 -2701) -((1677 -927) + 1018)) ;v130=0 -0 ;v163=3 -2 ;end end end if ((v154==(449 -(446 + 2))) or ((128 + 327)>=((214 + 3873) -(738 + 570)))) then v126=2;break;end end end if ((1893==(203 + 1690)) and ((344 -(119 + 223))==v126)) then for v157=v127,v80 do local v158=0;local v159;local v160;while true do if ((((634 + 176) -(30 + 69))<=(1510 -(341 + 217))) and (v158==(1 + (148 -(23 + 125))))) then while true do if ((v159==(835 -(496 + 339))) or ((4144 -(448 + 1055))>(2739 + 2194))) then v160=1631 -(834 + 797) ;while true do if ((v160==(1220 -((2334 -(1770 + 171)) + 827))) or ((15815 -11643)<=3921)) then v130=v130 + (3 -2) ;v90[v157]=v128[v130];break;end end break;end end break;end if (((4917 -(394 + 1096))>((1489 + 1188) -(58 + 368))) and (v158==(691 -(295 + 396)))) then v159=0 -0 ;v160=nil;v158=1;end end end break;end if ((v126==(0 + 0)) or ((1347 + (5324 -2480))<=(4947 -(1109 + 50)))) then local v155=0;local v156;while true do if (((6061 -(843 + 612))>((3335 -(12 + 7)) -2333)) and ((0 -0)==v155)) then v156=528 -(204 + 324) ;while true do if (((1213 + 932)>=492) and (v156==(1476 -(872 + 603)))) then v126=1 -0 ;break;end if (((337 + 163)<3390) and (v156==(1407 -((1642 -615) + 380)))) then v127=v92[2];v128,v129=v87(v90[v127](v13(v90,v127 + (1327 -(43 + 1283)) ,v92[704 -(47 + 654) ])));v156=1 + 0 ;end end break;end end end end break;end if (((3624 -(117 + 1785))<((2685 -1187) + 1610)) and (v125==0)) then local v148=0 + 0 ;while true do if (((1309 + 704)<((2544 -(243 + 610)) + 263 + 111)) and (v148==(627 -((1826 -1260) + 61)))) then v126=1201 -(973 + 228) ;v127=nil;v148=1509 -(532 + 976) ;end if ((((2419 -(844 + 269)) + (4658 -1551))>=((6128 -(630 + 461)) -2304)) and (v148==(461 -(435 + 25)))) then v125=1 -0 ;break;end end end end break;end if (((10196 -7602)<(8504 -3639)) and (v124==(2 + 0))) then v129=nil;v130=nil;v124=2 + 0 + 1 ;end end end elseif ((90<=(1237 + 3047 + 160)) and (v93>(898 -(347 + (2233 -(605 + 1083)))))) then v90[v92[2]]=v92[(1022 -(566 + 445)) -8 ];else v90[v92[8 -6 ]]();end v79=v79 + (3 -2) ;break;end end break;end end end end A,B=v27(v11(v83));if not A[1] then local v99=v62[4][v79] or "?" ;error("Script error at [" .. v99 .. "]:" .. A[2] );else return v13(A,2,B);end end;end if (0==v65) then v66=v62[1];v67=v62[2];v65=1;end end end return v29(v28(),{},v17)(...);end v15("LOL!043O00030A3O006C6F6164737472696E6703043O0067616D6503073O00482O747047657403543O00682O7470733A2O2F7261772E67697468756275736572636F6E74656E742E636F6D2F4D617465694461426573742F5574696C69746965732F6D61696E2F442O6F72732F4F746865722F4772656E6164652E6C756100093O0012023O00013O001202000100023O002004000100010003001207000300044O0001000400014O0005000100044O00035O00022O00063O000100016O00017O00093O00023O00023O00023O00023O00023O00023O00023O00023O00033O00",v9(),...);end