1 line
58 KiB
Lua
1 line
58 KiB
Lua
|
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)==81) then v19=v0(v3(v30,1,1));return "";else local v89=v2(v0(v30,16));if v19 then local v110=0;local v111;while true do if (v110==1) then return v111;end if (v110==0) then v111=v5(v89,v19);v19=nil;v110=1;end end else return v89;end end end);local function v20(v31,v32,v33) if v33 then local v90=(v31/((5 -3)^(v32-((879 -(282 + 595)) -1))))%(2^(((v33-(1 -0)) -(v32-(2 -1))) + (620 -(555 + 64)))) ;return v90-(v90%(932 -(857 + 74))) ;else local v91=0;local v92;while true do if (v91==(568 -((2004 -(1523 + 114)) + 181 + 20))) then v92=(929 -(214 + 713))^(v32-1) ;return (((v31%(v92 + v92))>=v92) and (1 + 0)) or (0 + 0) ;end end end end local function v21() local v34=0 -0 ;local v35;while true do if (v34==(117 -(32 + 85))) then v35=v1(v16,v18,v18);v18=v18 + (1066 -(68 + 997)) ;v34=1271 -(226 + 1044) ;end if (v34==(4 -3)) then return v35;end end end local function v22() local v36,v37=v1(v16,v18,v18 + 2 + 0 );v18=v18 + 1 + 1 ;return (v37 * 256) + v36 ;end local function v23() local v38,v39,v40,v41=v1(v16,v18,v18 + (960 -(892 + 65)) );v18=v18 + (9 -(355 -(87 + 263))) ;return (v41 * (31011612 -14234396)) + (v40 * (120312 -54776)) + (v39 * (436 -(67 + 113))) + v38 ;end local function v24() local v42=0;local v43;local v44;local v45;local v46;local v47;local v48;while true do if (v42==(1 + 0)) then v45=2 -1 ;v46=(v20(v44,443 -(416 + 26) ,15 + 5 ) * (((12 -5) -5)^((2064 -(1020 + 60)) -(802 + 150)))) + v43 ;v42=5 -(1426 -(630 + 793)) ;end if (v42==(441 -(145 + 293))) then if (v47==(0 -0)) then if (v46==(0 + 0)) then return v48 * 0 ;else v47=(3 -2) + 0 ;v45=997 -(915 + 82) ;end elseif (v47==(5796 -3749)) then return ((v46==(0 + 0)) and (v48 * ((1 -0)/(1138 -(116 + 1022))))) or (v48 * NaN) ;end return v8(v48,v47-1023 ) * (v45 + (v46/((1189 -(1069 + 118))^(31 + 21)))) ;end if ((0 -0)==v42) then v43=v23();v44=v23();v42=(4 -3) -0 ;end if (v42==(861 -(814 + 45))) then v47=v20(v44,21,6 + 25 );v48=((v20(v44,56 -24 )==(1 + 0)) and -1) or (792 -(368 + 423)) ;v42=9 -6 ;end end end local function v25(v49) local v50=0 + 0 ;local v51;local v52;while true do if (v50==(3 -2)) then v51=v3(v16,v18,(v18 + v49) -(1748 -(760 + 987)) );v18=v18 + v49 ;v50=1915 -(1789 + 124) ;end if (v50==(768 -(745 + 21))) then v52={};for v112=1, #v51 do v52[v112]=v2(v1(v3(v51,v112,v112)));end v50=2 + 0 + 1 ;end if (3==v50) then return v6(v52);end if (v50==(0 -(1055 -(87 + 968)))) then v51=nil;if not v49 then v49=v23();if (v49==(0 -0)) then return "";end end v50=1 + 0 ;end end end local v26=v23;local function v27(...) return {...},v12("#",...);end local function v28() local v53=(function() return function(v93,v94,v95,v96,v97,v98,v99,v100,v101) local v102=(function() return 0 + 0 ;end)();local v93=(function() return;end)();local v94=(function() return;end)();while true do if (v102==(0 -0)) then local v118=(function() return 0 -0 ;end)();local v119=(function() return;end)();while true do if (v118==0) then v119=(function() return 0 -0 ;end)();while true do if (v119~=(285 -(134 + 151))) then else v93=(function() return 1665 -(970 + 695) ;end)();v94=(function() return nil;end)();v119=(function() return 1 -0 ;end)();end if (v119==(1991 -(582 + 1408))) then v102=(function() return 1;end)();break;end end break;end end end if (v102==1) then local v120=(function() return 0;end)();while true do if (v120==0) then while true do if (v93~=(0 -0)) then else v94=(function() return v95();end)();if (v96(v94, #"]", #"[")~=0) then else local v126=(function() return 0 -0 ;end)();local v127=(function() return;end)();local v128=(function() return;end)();local v129=(function() return;end)();local v130=(function() return;end)();while true do if (v126==(0 -0)) then
|