API tools faq
paste
tomoneko

vfly

tomoneko
Oct 28th, 2023 (edited)
648
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.57 KB | None | 0 0
raw download clone embed print report
  1. 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 v86=0;while true do if (v86==0) then v19=v0(v3(v30,1,1));return "";end end else local v87=0;local v88;while true do if (v87==0) then v88=v2(v0(v30,16));if v19 then local v122=v5(v88,v19);v19=nil;return v122;else return v88;end break;end end end end);local function v20(v31,v32,v33) if v33 then local v89=(v31/((5 -(880 -(282 + 595)))^(v32-(2 -1))))%((3 -1)^(((v33-1) -(v32-((1639 -(1523 + 114)) -(1 + 0)))) + (620 -(555 + 64)))) ;return v89-(v89%1) ;else local v90=931 -((1221 -364) + 74) ;local v91;while true do if (v90==(568 -(367 + 201))) then v91=(929 -(214 + (1778 -(68 + 997))))^(v32-1) ;return (((v31%(v91 + v91))>=v91) and (1 + 0)) or (0 + 0) ;end end end end local function v21() local v34=0;local v35;while true do if (v34==(1270 -(226 + 232 + 812))) then v35=v1(v16,v18,v18);v18=v18 + (4 -3) ;v34=118 -(32 + 85) ;end if ((1 + 0)==v34) then return v35;end end end local function v22() local v36,v37=v1(v16,v18,v18 + (959 -(892 + 65)) );v18=v18 + (4 -2) ;return (v37 * (472 -216)) + v36 ;end local function v23() local v38,v39,v40,v41=v1(v16,v18,v18 + (4 -(1 + 0)) );v18=v18 + (354 -(87 + 263)) ;return (v41 * (16777396 -(67 + 113))) + (v40 * ((190997 -142941) + 17480)) + (v39 * (628 -372)) + v38 ;end local function v24() local v42=v23();local v43=v23();local v44=953 -(345 + 457 + 150) ;local v45=(v20(v43,2 -1 ,36 -16 ) * ((2 + 0)^(1029 -(915 + 82)))) + v42 ;local v46=v20(v43,21,87 -56 );local v47=((v20(v43,(33 -14) + (451 -(145 + 293)) )==1) and -(1 -0)) or (1188 -(1069 + 118)) ;if (v46==(0 -0)) then if (v45==(0 -0)) then return v47 * (0 + 0) ;else v46=1 -0 ;v44=0;end elseif (v46==(2031 + 16)) then return ((v45==(791 -(368 + 423))) and (v47 * ((3 -2)/(18 -((440 -(44 + 386)) + 8))))) or (v47 * NaN) ;end return v8(v47,v46-(3934 -2911) ) * (v44 + (v45/((444 -((1902 -(998 + 488)) + 26))^(165 -113)))) ;end local function v25(v48) local v49;if not v48 then v48=v23();if (v48==(0 + 0)) then return "";end end v49=v3(v16,v18,(v18 + v48) -(1 + 0) );v18=v18 + v48 ;local v50={};for v66=773 -(201 + 571) , #v49 do v50[v66]=v2(v1(v3(v49,v66,v66)));end return v6(v50);end local v26=v23;local function v27(...) return {...},v12("#",...);end local function v28() local v51=(function() return function(v92,v93,v94,v95,v96,v97,v98,v99) local v92=(function() return 1002 -(241 + 761) ;end)();local v93=(function() return;end)();local v94=(function() return;end)();while true do if (v92== #"!") then if (v93== #">") then v94=(function() return v95()~=0 ;end)();elseif (v93==(1 + 1)) then v94=(function() return v96();end)();elseif (v93== #"nil") then v94=(function() return v97();end)();end v98[v99]=(function() return v94;end)();break;end if (v92==0) then local v116=(function() return 0 + 0 ;end)();while true do if (v116~=(3 -2)) then else v92=(function() return #"[";end)();break;end if (v116~=(0 -0)) then else v93=(function() return v95();end)();v94=(function() return nil;end)();v116=(function() return 1;end)();end end end end return v92,v93,v94,v95,v96,v97,v98,v99;end;end)();local v52=(function() return function(v100,v101,v102) local v103=(function() return 0;end)();while true do if (v103~=0) then else local v117=(function() return 0;end)();while true do if (v117==(374 -(123 + 251))) then local v123=(function() return 0;end)();while true do if (v123==(0 -0)) then v100[v101-#"}" ]=(function() return v102();end)();return v100,v101,v102;end end end end end end end;end)();local v53=(function() return {};end)();local v54=(function() return {};end)();local v55=(function() return {};end)();local v56=(function() return {v53,v54,nil,v55};end)();local v57=(function() return v23();end)();local v58=(function() return {};end)();for v68= #",",v57 do FlatIdent_5ED46,Type,Cons,v21,v24,v25,v58,v68=(function() return v51(FlatIdent_5ED46,Type,Cons,v21,v24,v25,v58,v68);end)();end v56[ #"91("]=(function() return v21();end)();for v69= #"<",v23() do local v70=(function() return v21();end)();if (v20(v70, #"~", #"}")~=0) then else local v106=(function() return 0;end)();local v107=(function() return;end)();local v108=(function() return;end)();local v109=(function() return;end)();local v110=(function() return;end)();while true do if (v106==(1 + 0)) then v109=(function() return nil;end)();v110=(function() return nil;end)();v106=(function() return 2;end)();end if (v106~=2) then else while true do if (v107== #"{") then local v124=(function() return 0 + 0 ;end)();local v125=(function() return;end)();while true do if (v124==0) then v125=(function() return 836 -(660 + 176) ;end)();while true do if (v125~=(1 + 0)) then else v107=(function() return 2;end)();break;end if (0~=v125) then else v110=(function() return {v22(),v22(),nil,nil};end)();if (v108==(675 -(534 + 141))) then local v218=(function() return 0 + 0 ;end)();local v219=(function() return;end)();while true do if (v218==0) then v219=(function() return 0;end)();while true do if (v219==0) then v110[ #"asd"]=(function() return v22();end)();v110[ #"?id="]=(function() return v22();end)();break;end end break;end end elseif (v108== #"|") then v110[ #"91("]=(function() return v23();end)();elseif (v108==(2 + 0)) then v110[ #"gha"]=(function() return v23() -((2 + 0)^16) ;end)();elseif (v108~= #"91(") then else local v234=(function() return 0;end)();local v235=(function() return;end)();while true do if (v234~=0) then else v235=(function() return 0 -0 ;end)();while true do if (v235~=0) then else v110[ #"91("]=(function() return v23() -((2 -0)^16) ;end)();v110[ #"?id="]=(function() return v22();end)();break;end end break;end end end v125=(function() return 1;end)();end end break;end end end if (v107~=2) then else local v126=(function() return 0;end)();local v127=(function() return;end)();while true do if (v126==(0 -0)) then v127=(function() return 0 + 0 ;end)();while true do if (v127~=(1 + 0)) then else v107=(function() return #"-19";end)();break;end if ((396 -(115 + 281))~=v127) then else if (v20(v109, #"|", #"\\")== #"\\") then v110[4 -2 ]=(function() return v58[v110[2]];end)();end if (v20(v109,2 + 0 ,2)== #"!") then v110[ #"xxx"]=(function() return v58[v110[ #"asd"]];end)();end v127=(function() return 2 -1 ;end)();end end break;end end end if (v107~= #"asd") then else if (v20(v109, #"gha", #"asd")== #"!") then v110[ #"xnxx"]=(function() return v58[v110[ #"0313"]];end)();end v53[v69]=(function() return v110;end)();break;end if (v107~=(0 -0)) then else local v129=(function() return 0;end)();local v130=(function() return;end)();while true do if (v129==(867 -(550 + 317))) then v130=(function() return 0;end)();while true do if ((0 -0)==v130) then v108=(function() return v20(v70,2 -0 , #"asd");end)();v109=(function() return v20(v70, #"asd1",6);end)();v130=(function() return 2 -1 ;end)();end if (v130==(286 -(134 + 151))) then v107=(function() return #",";end)();break;end end break;end end end end break;end if ((1665 -(970 + 695))==v106) then local v120=(function() return 0 -0 ;end)();local v121=(function() return;end)();while true do if (v120~=0) then else v121=(function() return 1990 -(582 + 1408) ;end)();while true do if (v121==(0 -0)) then v107=(function() return 0;end)();v108=(function() return nil;end)();v121=(function() return 1 -0 ;end)();end if (v121~=(3 -2)) then else v106=(function() return 1;end)();break;end end break;end end end end end end for v71= #"[",v23() do v54,v71,v28=(function() return v52(v54,v71,v28);end)();end return v56;end local function v29(v60,v61,v62) local v63=v60[1825 -(1195 + 624 + 5) ];local v64=v60[2];local v65=v60[(2 + 1) -(0 + 0) ];return function(...) local v72=v63;local v73=v64;local v74=v65;local v75=v27;local v76=242 -(187 + 31 + 23) ;local v77= -1;local v78={};local v79={...};local v80=v12("#",...) -(1 + 0) ;local v81={};local v82={};for v104=0 + 0 ,v80 do if (v104>=v74) then v78[v104-v74 ]=v79[v104 + 1 ];else v82[v104]=v79[v104 + 1 ];end end local v83=(v80-v74) + (1 -0) ;local v84;local v85;while true do local v105=0 -0 ;while true do if (v105==(1 -0)) then if (v85<=(1 + 4)) then if (v85<=2) then if ((4962>1721) and (v85<=(1636 -((3074 -1701) + 263)))) then local v133=1000 -(451 + 549) ;local v134;local v135;while true do if (v133==1) then v82[v134 + 1 ]=v135;v82[v134]=v135[v84[2 + 2 ]];break;end if ((802<=4833) and (v133==0)) then v134=v84[2 -0 ];v135=v82[v84[4 -1 ]];v133=1385 -(746 + 638) ;end end elseif ((2087==2087) and (v85==1)) then local v138=v84[1 + 1 ];local v139,v140=v75(v82[v138](v13(v82,v138 + ((1 + 0) -0) ,v84[344 -(218 + 123) ])));v77=(v140 + v138) -(1582 -(1535 + 46)) ;local v141=0 + 0 ;for v167=v138,v77 do local v168=0 -0 ;while true do if (v168==0) then v141=v141 + (754 -(239 + 514)) + 0 ;v82[v167]=v139[v141];break;end end end else v82[v84[562 -(108 + 198 + 254) ]]=v84[1 + 2 ];end elseif ((v85<=((1334 -(797 + 532)) -2)) or (4445<4149)) then v82[v84[1469 -(899 + 568) ]]=v82[v84[2 + 1 ]];elseif (v85==((7 + 2) -5)) then local v144=v84[605 -(268 + 335) ];v82[v144]=v82[v144]();elseif (v82[v84[292 -(60 + 230) ]]==v84[(195 + 381) -(426 + 146) ]) then v76=v76 + 1 ;else v76=v84[1 + 2 ];end elseif (v85<=8) then if ((2350>1155) and (v85<=(1462 -(282 + (2760 -1586))))) then do return;end elseif (v85>(818 -((1771 -(373 + 829)) + 242))) then v76=v84[8 -5 ];else for v169=v84[1 + 1 ],v84[1027 -(706 + 318) ] do v82[v169]=nil;end end elseif ((4029<=4853) and (v85<=(1261 -(721 + 530)))) then if (v85==9) then local v147=1271 -(945 + 326) ;local v148;local v149;local v150;local v151;while true do if (v147==(14 -8)) then v82[v84[2 + 0 ]]=v82[v84[703 -(271 + 429) ]];v76=v76 + 1 + 0 ;v84=v72[v76];v147=1507 -((2139 -(476 + 255)) + 92) ;end if (v147==(1090 -(461 + 625))) then v76=v76 + (1289 -(993 + 295)) ;v84=v72[v76];v151=v84[2];v147=1 + 4 ;end if (v147==7) then v76=v84[1174 -(418 + 753) ];break;end if (v147==0) then v148=nil;v149,v150=nil;v151=nil;v147=1 + 0 ;end if (v147==(1135 -(369 + 761))) then v82[v151]=v82[v151]();v76=v76 + 1 + 0 ;v84=v72[v76];v147=2 + 4 ;end if (v147==(1 + 2 + 0)) then v84=v72[v76];v151=v84[2];v82[v151]=v82[v151](v13(v82,v151 + (530 -(406 + 123)) ,v77));v147=(3220 -1447) -(1749 + 20) ;end if (v147==(1 + (0 -0))) then v151=v84[2];v149,v150=v75(v82[v151](v13(v82,v151 + (239 -(64 + 174)) ,v84[1325 -(1249 + 11 + 62) ])));v77=(v150 + v151) -(1 + 0) ;v147=1147 -(466 + 679) ;end if (v147==(4 -2)) then v148=0 -0 ;for v224=v151,v77 do v148=v148 + (1901 -(106 + 1794)) ;v82[v224]=v149[v148];end v76=v76 + 1 + 0 ;v147=3;end end else local v152=(0 -0) + 0 ;local v153;while true do if ((v152==0) or (1818==85)) then v153=v84[5 -3 ];v82[v153]=v82[v153](v13(v82,v153 + (2 -1) ,v77));break;end end end elseif (((630<2127) and (v85>(125 -(4 + 110)))) or (516>3434)) then v82[v84[586 -(57 + 527) ]]=v62[v84[1430 -(41 + 1386) ]];else local v156=103 -(17 + 86) ;local v157;local v158;local v159;local v160;local v161;while true do if ((3 + 0)==v156) then v84=v72[v76];v82[v84[3 -1 ]]=v84[8 -5 ];v76=v76 + (167 -(122 + 44)) ;v84=v72[v76];v156=6 -2 ;end if (v156==(33 -23)) then v161=v84[2 + 0 ];v160=v82[v84[3]];v82[v161 + (337 -(144 + 192)) + 0 ]=v160;v82[v161]=v160[v84[7 -(219 -(42 + 174)) ]];break;end if ((v156==9) or (1938==2514)) then v84=v72[v76];v82[v84[2]]=v62[v84[(52 + 16) -(30 + 35) ]];v76=v76 + 1 ;v84=v72[v76];v156=7 + 3 ;end if (v156==(1264 -(864 + 179 + 214))) then v82[v161]=v82[v161]();v76=v76 + 1 ;v84=v72[v76];v82[v84[2]]=v82[v84[(5 + 6) -8 ]];v156=1220 -(323 + 889) ;end if ((4255>=55) and (v156==(13 -8))) then for v227=v161,v77 do v157=v157 + 1 ;v82[v227]=v158[v157];end v76=v76 + (581 -(361 + 219)) ;v84=v72[v76];v161=v84[322 -((1557 -(363 + 1141)) + 267) ];v156=2 + 4 ;end if ((421 -(15 + 398))==v156) then v76=v76 + (983 -(18 + 964)) ;v84=v72[v76];v82[v84[7 -5 ]]=v62[v84[2 + 1 ]];v76=v76 + 1 + 0 ;v156=859 -(20 + (2410 -(1183 + 397))) ;end if ((4046>=3033) and (2999>1156) and ((0 + 0)==v156)) then v157=nil;v158,v159=nil;v160=nil;v161=nil;v156=1;end if (v156==(130 -(116 + 10))) then v161=v84[1 + 1 ];v158,v159=v75(v82[v161](v13(v82,v161 + (739 -(542 + 196)) ,v84[6 -3 ])));v77=(v159 + v161) -1 ;v157=0 + 0 ;v156=3 + 2 ;end if (v156==(1 + 0)) then v82[v84[4 -(5 -3) ]]=v62[v84[7 -4 ]];v76=v76 + (1552 -(826 + 300 + 425)) ;v84=v72[v76];v161=v84[407 -(118 + 287) ];v156=2;end if (v156==2) then v160=v82[v84[11 -8 ]];v82[v161 + (1122 -(118 + 1003)) ]=v160;v82[v161]=v160[v84[11 -7 ]];v76=v76 + (378 -(107 + 35 + 235)) ;v156=3;end if (v156==6) then v82[v161]=v82[v161](v13(v82,v161 + ((1979 -(1913 + 62)) -3) ,v77));v76=v76 + 1 + 0 ;v84=v72[v76];v161=v84[979 -(553 + 424) ];v156=13 -6 ;end end end v76=v76 + 1 ;break;end if ((v105==0) or (2719<=1447)) then v84=v72[v76];v85=v84[1];v105=1 + 0 ;end end end end;end return v29(v28(),{},v17)(...);end return v15("LOL!073O00028O00026O00F03F030A3O006C6F6164737472696E6703043O0067616D6503073O00482O747047657403373O00682O7470733A2O2F7261772E67697468756275736572636F6E74656E742E636F6D2F746F6D6F6E656B6F4O322F612F6D61696E2F3103373O00682O7470733A2O2F7261772E67697468756275736572636F6E74656E742E636F6D2F746F6D6F6E656B6F4O322F612F6D61696E2F6200213O0012023O00014O0007000100033O0026053O001A000100020004083O001A00012O0007000300033O00260500010005000100010004083O0005000100120C000400033O00120B000500043O00202O00050005000500122O000700066O000500076O00043O00024O0004000100024O000200043O00122O000400033O00122O000500043O00202O000500050005001202000700074O0009000500076O00043O00024O0004000100024O000300043O00044O002000010004083O000500010004083O002000010026053O0002000100010004083O00020001001202000100014O0007000200023O0012023O00023O0004083O000200012O00063O00017O00",v9(),...);
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!