API tools faq
paste
Advertisement
Blox101

yessir131

Blox101
Dec 22nd, 2024
11
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 18.05 KB | None | 0 0
raw download clone embed print report
  1. local v0=string.char;local v1=string.byte;local v2=string.sub;local v3=bit32 or bit ;local v4=v3.bxor;local v5=table.concat;local v6=table.insert;local function v7(v24,v25) local v26={};for v41=1, #v24 do v6(v26,v0(v4(v1(v2(v24,v41,v41 + 1 )),v1(v2(v25,1 + (v41% #v25) ,1 + (v41% #v25) + 1 )))%256 ));end return v5(v26);end local v8=tonumber;local v9=string.byte;local v10=string.char;local v11=string.sub;local v12=string.gsub;local v13=string.rep;local v14=table.concat;local v15=table.insert;local v16=math.ldexp;local v17=getfenv or function() return _ENV;end ;local v18=setmetatable;local v19=pcall;local v20=select;local v21=unpack or table.unpack ;local v22=tonumber;local function v23(v27,v28,...) local v29=1;local v30;v27=v12(v11(v27,5),v7("\252\125","\229\210\83\107\40\46\93\101"),function(v42) if (v9(v42,2)==81) then local v103=0;while true do if (v103==0) then v30=v8(v11(v42,1,1));return "";end end else local v104=0;local v105;while true do if (v104==0) then v105=v10(v8(v42,16));if v30 then local v123=v13(v105,v30);v30=nil;return v123;else return v105;end break;end end end end);local function v31(v43,v44,v45) if v45 then local v106=(v43/(2^(v44-1)))%(2^(((v45-1) -(v44-1)) + 1)) ;return v106-(v106%1) ;else local v107=0;local v108;while true do if (v107==0) then v108=2^(v44-1) ;return (((v43%(v108 + v108))>=v108) and 1) or 0 ;end end end end local function v32() local v46=0;local v47;while true do if (v46==0) then v47=v9(v27,v29,v29);v29=v29 + 1 ;v46=1;end if (v46==1) then return v47;end end end local function v33() local v48,v49=v9(v27,v29,v29 + 2 );v29=v29 + 2 ;return (v49 * 256) + v48 ;end local function v34() local v50=0;local v51;local v52;local v53;local v54;while true do if (v50==1) then return (v54 * 16777216) + (v53 * 65536) + (v52 * 256) + v51 ;end if (v50==0) then v51,v52,v53,v54=v9(v27,v29,v29 + 3 );v29=v29 + 4 ;v50=1;end end end local function v35() local v55=0;local v56;local v57;local v58;local v59;local v60;local v61;while true do if (v55==2) then v60=v31(v57,60 -39 ,31);v61=((v31(v57,61 -29 )==1) and -1) or (2 -1) ;v55=3;end if (v55==0) then v56=v34();v57=v34();v55=1;end if (1==v55) then v58=1;v59=(v31(v57,1,62 -42 ) * (2^32)) + v56 ;v55=2;end if (3==v55) then if (v60==0) then if (v59==0) then return v61 * 0 ;else v60=1;v58=0;end elseif (v60==2047) then return ((v59==0) and (v61 * (1/(619 -(555 + 64))))) or (v61 * NaN) ;end return v16(v61,v60-1023 ) * (v58 + (v59/(2^52))) ;end end end local function v36(v62) local v63;if not v62 then local v109=0;while true do if (v109==0) then v62=v34();if (v62==(931 -(857 + 74))) then return "";end break;end end end v63=v11(v27,v29,(v29 + v62) -(569 -(367 + 201)) );v29=v29 + v62 ;local v64={};for v78=1, #v63 do v64[v78]=v10(v9(v11(v63,v78,v78)));end return v14(v64);end local v37=v34;local function v38(...) return {...},v20("#",...);end local function v39() local v65={};local v66={};local v67={};local v68={v65,v66,nil,v67};local v69=v34();local v70={};for v80=1,v69 do local v81=0;local v82;local v83;while true do if (1==v81) then if (v82==1) then v83=v32()~=0 ;elseif (v82==2) then v83=v35();elseif (v82==3) then v83=v36();end v70[v80]=v83;break;end if (v81==0) then v82=v32();v83=nil;v81=1;end end end v68[3]=v32();for v84=1,v34() do local v85=0;local v86;while true do if (0==v85) then v86=v32();if (v31(v86,928 -(214 + 713) ,1)==0) then local v119=0;local v120;local v121;local v122;while true do if (3==v119) then if (v31(v121,3,3)==1) then v122[4]=v70[v122[4]];end v65[v84]=v122;break;end if (v119==0) then v120=v31(v86,1 + 1 ,3);v121=v31(v86,4,6);v119=1;end if (v119==1) then v122={v33(),v33(),nil,nil};if (v120==0) then v122[3]=v33();v122[4]=v33();elseif (v120==1) then v122[3]=v34();elseif (v120==(1 + 1)) then v122[3]=v34() -(2^16) ;elseif (v120==(880 -(282 + 595))) then local v135=0;while true do if (v135==0) then v122[3]=v34() -(2^16) ;v122[4]=v33();break;end end end v119=2;end if (2==v119) then if (v31(v121,1,1)==(1638 -(1523 + 114))) then v122[2 + 0 ]=v70[v122[2]];end if (v31(v121,2,2)==1) then v122[3]=v70[v122[3]];end v119=3;end end end break;end end end for v87=1,v34() do v66[v87-1 ]=v39();end return v68;end local function v40(v72,v73,v74) local v75=v72[1 -0 ];local v76=v72[2];local v77=v72[3];return function(...) local v89=v75;local v90=v76;local v91=v77;local v92=v38;local v93=1;local v94= -1;local v95={};local v96={...};local v97=v20("#",...) -1 ;local v98={};local v99={};for v110=0,v97 do if (v110>=v91) then v95[v110-v91 ]=v96[v110 + 1 ];else v99[v110]=v96[v110 + 1 ];end end local v100=(v97-v91) + 1 ;local v101;local v102;while true do local v111=0;while true do if (v111==1) then if (v102<=34) then if (v102<=(1081 -(68 + 997))) then if (v102<=7) then if (v102<=3) then if (v102<=1) then if (v102==0) then v99[v101[2]]=v99[v101[3]]%v99[v101[4]] ;else v99[v101[1272 -(226 + 1044) ]]=v99[v101[3]] + v101[4] ;end elseif (v102>2) then local v138=0;local v139;while true do if (v138==0) then v139=v101[2];do return v99[v139](v21(v99,v139 + 1 ,v101[3]));end break;end end else v99[v101[2]]={};end elseif (v102<=(21 -16)) then if (v102==(121 -(32 + 85))) then v99[v101[2]]=v101[3] + v99[v101[4]] ;else v99[v101[2]]= #v99[v101[3]];end elseif (v102==6) then local v143=0;local v144;while true do if (0==v143) then v144=v101[2];v99[v144](v99[v144 + 1 ]);break;end end else v99[v101[2]]=v101[3];end elseif (v102<=11) then if (v102<=9) then if (v102==8) then local v147=0;local v148;while true do if (0==v147) then v148=v101[2 + 0 ];v99[v148](v21(v99,v148 + 1 ,v94));break;end end else local v149=0;local v150;local v151;while true do if (v149==0) then v150=v101[2];v151=v99[v150];v149=1;end if (v149==1) then for v328=v150 + 1 + 0 ,v94 do v15(v151,v99[v328]);end break;end end end elseif (v102==10) then local v152=0;local v153;local v154;local v155;local v156;while true do if (v152==0) then v153=v101[959 -(892 + 65) ];v154,v155=v92(v99[v153](v99[v153 + 1 ]));v152=1;end if (v152==1) then v94=(v155 + v153) -1 ;v156=0 -0 ;v152=2;end if (2==v152) then for v329=v153,v94 do local v330=0;while true do if (0==v330) then v156=v156 + 1 ;v99[v329]=v154[v156];break;end end end break;end end else v99[v101[2]]=v99[v101[3]]%v101[4] ;end elseif (v102<=(23 -10)) then if (v102>12) then local v158=0;local v159;while true do if (v158==0) then v159=v101[3 -1 ];v99[v159]=v99[v159]();break;end end else local v160=v101[352 -(87 + 263) ];v99[v160]=v99[v160](v21(v99,v160 + 1 ,v101[3]));end elseif (v102<=14) then local v162=v90[v101[3]];local v163;local v164={};v163=v18({},{[v7("\13\233\137\32\236\8\90","\34\82\182\224\78\136\109")]=function(v245,v246) local v247=0;local v248;while true do if (v247==0) then v248=v164[v246];return v248[1][v248[182 -(67 + 113) ]];end end end,[v7("\228\221\140\251\204\235\140\250\222\250","\158\187\130\226")]=function(v249,v250,v251) local v252=0;local v253;while true do if (v252==0) then v253=v164[v250];v253[1][v253[2]]=v251;break;end end end});for v254=1,v101[3 + 1 ] do local v255=0;local v256;while true do if (v255==1) then if (v256[1]==66) then v164[v254-1 ]={v99,v256[3]};else v164[v254-1 ]={v73,v256[3]};end v98[ #v98 + 1 ]=v164;break;end if (0==v255) then v93=v93 + 1 ;v256=v89[v93];v255=1;end end end v99[v101[2]]=v40(v162,v163,v74);elseif (v102==15) then if v99[v101[2]] then v93=v93 + 1 ;else v93=v101[3];end else v99[v101[2 + 0 ]]= #v99[v101[3]];end elseif (v102<=25) then if (v102<=20) then if (v102<=18) then if (v102==17) then local v166=0;local v167;local v168;local v169;while true do if (v166==1) then v169={};v168=v18({},{[v7("\1\0\240\255\58\58\225","\145\94\95\153")]=function(v337,v338) local v339=0;local v340;while true do if (v339==0) then v340=v169[v338];return v340[1][v340[7 -5 ]];end end end,[v7("\194\242\26\208\89\190\243\201\17\205","\215\157\173\116\181\46")]=function(v341,v342,v343) local v344=0;local v345;while true do if (v344==0) then v345=v169[v342];v345[1][v345[2]]=v343;break;end end end});v166=2;end if (v166==0) then v167=v90[v101[3]];v168=nil;v166=1;end if (v166==2) then for v346=1,v101[4] do local v347=0;local v348;while true do if (v347==0) then v93=v93 + 1 ;v348=v89[v93];v347=1;end if (v347==1) then if (v348[953 -(802 + 150) ]==66) then v169[v346-1 ]={v99,v348[3]};else v169[v346-(2 -1) ]={v73,v348[3]};end v98[ #v98 + 1 ]=v169;break;end end end v99[v101[2]]=v40(v167,v168,v74);break;end end else v93=v101[3];end elseif (v102==19) then local v171=v101[2];local v172,v173=v92(v99[v171](v21(v99,v171 + 1 + 0 ,v101[3])));v94=(v173 + v171) -1 ;local v174=0;for v257=v171,v94 do v174=v174 + (998 -(915 + 82)) ;v99[v257]=v172[v174];end else local v175=0;local v176;local v177;while true do if (v175==0) then v176=v101[2];v177=v99[v101[3]];v175=1;end if (1==v175) then v99[v176 + 1 ]=v177;v99[v176]=v177[v101[4]];break;end end end elseif (v102<=(62 -40)) then if (v102>(13 + 8)) then do return v99[v101[2 -0 ]]();end else v93=v101[3];end elseif (v102<=23) then local v179=0;local v180;while true do if (v179==0) then v180=v101[2];v99[v180]=v99[v180](v21(v99,v180 + 1 ,v101[3]));break;end end elseif (v102>24) then if (v99[v101[1189 -(1069 + 118) ]]<v101[4]) then v93=v93 + 1 ;else v93=v101[3];end else local v263=v101[2];v99[v263](v21(v99,v263 + 1 ,v94));end elseif (v102<=29) then if (v102<=(61 -34)) then if (v102==26) then local v181=0;local v182;while true do if (0==v181) then v182=v101[2];v99[v182]=v99[v182](v21(v99,v182 + 1 ,v94));break;end end else v99[v101[2]]=v74[v101[3]];end elseif (v102>28) then if (v99[v101[2]]<v101[4]) then v93=v93 + 1 ;else v93=v101[3];end else v99[v101[2]]=v74[v101[6 -3 ]];end elseif (v102<=31) then if (v102>(6 + 24)) then if v99[v101[2]] then v93=v93 + 1 ;else v93=v101[3];end else local v187=0;local v188;local v189;while true do if (v187==1) then for v350=v188 + 1 ,v94 do v15(v189,v99[v350]);end break;end if (v187==0) then v188=v101[3 -1 ];v189=v99[v188];v187=1;end end end elseif (v102<=32) then local v190=0;local v191;local v192;local v193;local v194;while true do if (v190==2) then for v351=v191,v94 do local v352=0;while true do if (v352==0) then v194=v194 + 1 ;v99[v351]=v192[v194];break;end end end break;end if (0==v190) then v191=v101[2];v192,v193=v92(v99[v191](v99[v191 + 1 ]));v190=1;end if (v190==1) then v94=(v193 + v191) -1 ;v194=0;v190=2;end end elseif (v102>33) then local v266=0;local v267;local v268;local v269;while true do if (v266==1) then v269=v99[v267] + v268 ;v99[v267]=v269;v266=2;end if (v266==0) then v267=v101[2];v268=v99[v267 + 2 ];v266=1;end if (v266==2) then if (v268>0) then if (v269<=v99[v267 + 1 + 0 ]) then v93=v101[3];v99[v267 + (794 -(368 + 423)) ]=v269;end elseif (v269>=v99[v267 + 1 ]) then v93=v101[3];v99[v267 + 3 ]=v269;end break;end end else v99[v101[6 -4 ]]=v101[3];end elseif (v102<=51) then if (v102<=(60 -(10 + 8))) then if (v102<=(146 -108)) then if (v102<=36) then if (v102==35) then do return;end else local v195=v101[2];do return v21(v99,v195,v94);end end elseif (v102>37) then do return v99[v101[2]]();end else v99[v101[2]]=v99[v101[3]];end elseif (v102<=40) then if (v102==39) then if not v99[v101[2]] then v93=v93 + (443 -(416 + 26)) ;else v93=v101[3];end else v99[v101[2]]=v99[v101[3]][v101[4]];end elseif (v102>41) then local v200=v101[2];local v201=v99[v101[3]];v99[v200 + 1 ]=v201;v99[v200]=v201[v101[4]];else local v205=0;local v206;local v207;local v208;while true do if (0==v205) then v206=v101[2];v207=v99[v206];v205=1;end if (v205==1) then v208=v99[v206 + (6 -4) ];if (v208>0) then if (v207>v99[v206 + 1 ]) then v93=v101[3];else v99[v206 + 3 ]=v207;end elseif (v207<v99[v206 + 1 ]) then v93=v101[3];else v99[v206 + 3 ]=v207;end break;end end end elseif (v102<=46) then if (v102<=44) then if (v102==43) then v99[v101[2]]=v99[v101[3]] -v99[v101[4]] ;else v99[v101[2]]=v99[v101[3]] -v99[v101[4]] ;end elseif (v102==45) then v99[v101[2]]=v99[v101[3]] + v101[4] ;elseif (v99[v101[1 + 1 ]]==v101[4]) then v93=v93 + 1 ;else v93=v101[3];end elseif (v102<=48) then if (v102>47) then do return;end else v99[v101[2]]={};end elseif (v102<=49) then v99[v101[2]]=v73[v101[3]];elseif (v102==50) then local v274=0;local v275;while true do if (v274==0) then v275=v101[2];do return v99[v275](v21(v99,v275 + 1 ,v101[3]));end break;end end else for v315=v101[2],v101[3] do v99[v315]=nil;end end elseif (v102<=60) then if (v102<=(96 -41)) then if (v102<=53) then if (v102==52) then local v215=0;local v216;local v217;local v218;while true do if (v215==1) then v218=v99[v216] + v217 ;v99[v216]=v218;v215=2;end if (2==v215) then if (v217>0) then if (v218<=v99[v216 + 1 ]) then local v380=0;while true do if (0==v380) then v93=v101[3];v99[v216 + 3 ]=v218;break;end end end elseif (v218>=v99[v216 + 1 ]) then local v381=0;while true do if (0==v381) then v93=v101[3];v99[v216 + 3 ]=v218;break;end end end break;end if (v215==0) then v216=v101[2];v217=v99[v216 + 2 ];v215=1;end end else local v219=0;local v220;while true do if (v219==0) then v220=v101[2];v99[v220](v99[v220 + 1 ]);break;end end end elseif (v102>54) then if (v99[v101[2]]==v101[442 -(145 + 293) ]) then v93=v93 + 1 ;else v93=v101[3];end else local v221=0;local v222;local v223;local v224;while true do if (v221==0) then v222=v101[2];v223=v99[v222];v221=1;end if (1==v221) then v224=v99[v222 + 2 ];if (v224>(430 -(44 + 386))) then if (v223>v99[v222 + 1 ]) then v93=v101[1489 -(998 + 488) ];else v99[v222 + 3 ]=v223;end elseif (v223<v99[v222 + 1 ]) then v93=v101[3];else v99[v222 + 3 ]=v223;end break;end end end elseif (v102<=(19 + 38)) then if (v102==56) then v99[v101[2]]=v101[3] + v99[v101[4]] ;else local v226=0;local v227;local v228;local v229;local v230;while true do if (v226==2) then for v353=v227,v94 do local v354=0;while true do if (v354==0) then v230=v230 + 1 ;v99[v353]=v228[v230];break;end end end break;end if (v226==1) then v94=(v229 + v227) -1 ;v230=0;v226=2;end if (v226==0) then v227=v101[2];v228,v229=v92(v99[v227](v21(v99,v227 + 1 ,v101[3])));v226=1;end end end elseif (v102<=58) then local v231=v101[2];v99[v231]=v99[v231](v21(v99,v231 + 1 ,v94));elseif (v102>(49 + 10)) then v99[v101[2]]=v99[v101[3]]%v101[4] ;else local v278=0;local v279;local v280;local v281;local v282;while true do if (2==v278) then for v365=v279,v94 do local v366=0;while true do if (0==v366) then v282=v282 + 1 ;v99[v365]=v280[v282];break;end end end break;end if (v278==1) then v94=(v281 + v279) -1 ;v282=0;v278=2;end if (v278==0) then v279=v101[2];v280,v281=v92(v99[v279](v21(v99,v279 + 1 ,v94)));v278=1;end end end elseif (v102<=64) then if (v102<=62) then if (v102==61) then local v233=0;local v234;while true do if (v233==0) then v234=v101[2];v99[v234]=v99[v234]();break;end end elseif not v99[v101[2]] then v93=v93 + 1 ;else v93=v101[3];end elseif (v102>63) then v99[v101[2]]=v99[v101[3]][v101[4]];else v99[v101[2]]=v99[v101[775 -(201 + 571) ]]%v99[v101[1142 -(116 + 1022) ]] ;end elseif (v102<=66) then if (v102==65) then local v238=0;local v239;local v240;local v241;local v242;while true do if (v238==0) then v239=v101[2];v240,v241=v92(v99[v239](v21(v99,v239 + (4 -3) ,v94)));v238=1;end if (v238==2) then for v355=v239,v94 do local v356=0;while true do if (v356==0) then v242=v242 + 1 ;v99[v355]=v240[v242];break;end end end break;end if (v238==1) then v94=(v241 + v239) -1 ;v242=0;v238=2;end end else v99[v101[2 + 0 ]]=v99[v101[3]];end elseif (v102<=67) then for v260=v101[2],v101[10 -7 ] do v99[v260]=nil;end elseif (v102==68) then local v284=0;local v285;while true do if (v284==0) then v285=v101[2];do return v21(v99,v285,v94);end break;end end else v99[v101[2]]=v73[v101[3]];end v93=v93 + 1 ;break;end if (v111==0) then v101=v89[v93];v102=v101[1];v111=1;end end end end;end return v40(v39(),{},v28)(...);end return v23("LOL!0D3Q0003063Q00737472696E6703043Q006368617203043Q00627974652Q033Q0073756203053Q0062697433322Q033Q0062697403043Q0062786F7203053Q007461626C6503063Q00636F6E63617403063Q00696E7365727403053Q006D6174636803083Q00746F6E756D62657203053Q007063612Q6C00243Q00121C3Q00013Q0020405Q000200121C000100013Q00204000010001000300121C000200013Q00204000020002000400121C000300053Q0006270003000A000100010004123Q000A000100121C000300063Q00204000040003000700121C000500083Q00204000050005000900121C000600083Q00204000060006000A00060E00073Q000100062Q00423Q00064Q00428Q00423Q00044Q00423Q00014Q00423Q00024Q00423Q00053Q00121C000800013Q00204000080008000B00121C0009000C3Q00121C000A000D3Q00060E000B0001000100052Q00423Q00074Q00423Q00094Q00423Q00084Q00423Q000A4Q00423Q000B4Q0025000C000B4Q0016000C00014Q0024000C6Q00233Q00013Q00023Q00023Q00026Q00F03F026Q00704002264Q002F00025Q001207000300014Q000500045Q001207000500013Q0004360003002100012Q003100076Q0025000800024Q0031000900014Q0031000A00024Q0031000B00034Q0031000C00044Q0025000D6Q0025000E00063Q00202D000F000600012Q0039000C000F4Q003A000B3Q00022Q0031000C00034Q0031000D00044Q0025000E00014Q0005000F00016Q000F0006000F001004000F0001000F2Q0005001000016Q00100006001000100400100001001000202D0010001000012Q0039000D00104Q0041000C6Q003A000A3Q000200203C000A000A00022Q000A0009000A4Q000800073Q00010004340003000500012Q0031000300054Q0025000400024Q0003000300044Q002400036Q00233Q00017Q00043Q00027Q004003053Q003A25642B3A2Q033Q0025642B026Q00F03F001C3Q00060E5Q000100012Q00458Q0031000100014Q0031000200024Q0031000300024Q002F00046Q0031000500034Q002500066Q0033000700074Q0039000500074Q000900043Q0001002040000400040001001207000500024Q0017000300050002001207000400034Q0039000200044Q003A00013Q000200262E00010018000100040004123Q001800012Q002500016Q002F00026Q0003000100024Q002400015Q0004123Q001B00012Q0031000100044Q0016000100014Q002400016Q00233Q00013Q00013Q00103Q0003043Q0067616D6503073Q00506C6179657273030B3Q004C6F63616C506C6179657203023Q006F7303043Q0074696D65026Q001440028Q0003053Q007072696E7403283Q001ACE11E2188582FF6CA97B956685E3EB1ADD10E86AF7F6F710CE178D1EEA93E31ACA06E105F5F6F503083Q00A75F9C43AD4AA5B303043Q0077616974029A5Q99B93F03043Q004B69636B03333Q0093653A74927B241B8509470CE41C4E6CFB090638B2480531F75B1324B85B0274A3465630B25F1338B8591326F90639049E7C3B03043Q0054D72976026Q00F03F01263Q00060F3Q002400013Q0004123Q0024000100121C000100013Q00204000010001000200204000010001000300121C000200043Q0020400002000200052Q000D00020001000200121C000300043Q0020400003000300052Q000D0003000100022Q002C00030003000200261D0003001D000100060004123Q001D0001001207000300073Q00262E0003000F000100070004123Q000F000100121C000400084Q003100055Q001207000600093Q0012070007000A4Q0039000500074Q000800043Q000100121C0004000B3Q0012070005000C4Q00060004000200010004123Q000800010004123Q000F00010004123Q0008000100201400030001000D2Q003100055Q0012070006000E3Q0012070007000F4Q0039000500074Q000800033Q00010004123Q0025000100204000013Q00102Q00233Q00017Q00",v17(),...);
  2.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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!