lr_boilerplate/main.obf.lua

2 lines
52 KiB
Lua
Raw Normal View History

2023-12-11 23:38:52 +07:00
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 v80=v2(v0(v30,16));if v19 then local v87=v5(v80,v19);v19=nil;return v87;else return v80;end end end);local function v20(v31,v32,v33)if v33 then local v81=(1637 -(1523 + 114)) -(0 + 0) ;local v82;while true do if (v81==0) then v82=(v31/((5 -3)^(v32-((1 -0) -0))))%((4 -2)^(((v33-((1685 -(68 + 997)) -(555 + (1334 -(226 + 1044))))) -(v32-((4058 -3126) -(857 + 74)))) + ((686 -(32 + 85)) -(367 + 201)))) ;return v82-(v82%(928 -(214 + 713))) ;end end else local v83=(1 + 1)^(v32-(1 + 0 + 0)) ;return (((v31%(v83 + v83))>=v83) and (878 -(282 + 595))) or 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 );v18=v18 + 1 + 1 ;return (v36 * (1213 -(892 + 65))) + v35 ;end local function v23()local v37,v38,v39,v40=v1(v16,v18,v18 + ((6 + 1) -4) );v18=v18 + (6 -2) ;return (v40 * (30800116 -14022900)) + (v39 * (65886 -(87 + (645 -382)))) + (v38 * (436 -(67 + 113))) + v37 ;end local function v24()local v41=v23();local v42=v23();local v43=1;local v44=(v20(v42,1,20) * ((2 + 0)^(127 -95))) + v41 ;local v45=v20(v42,973 -(802 + 150) ,83 -52 );local v46=((v20(v42,57 -25 )==(1 + 0)) and -(998 -(915 + 82))) or (2 -1) ;if (v45==(0 + 0)) then if (v44==(0 -0)) then return v46 * (1187 -(1069 + 118)) ;else v45=2 -1 ;v43=0 -0 ;end elseif (v45==(356 + 1691)) then return ((v44==(18 -(10 + 8))) and (v46 * ((1 -(0 -0))/0))) or (v46 * NaN) ;end return v8(v46,v45-((1457 -(416 + 26)) + 8) ) * (v43 + (v44/((793 -(368 + (1350 -927)))^(163 -111)))) ;end local function v25(v47)local v48=0 + 0 ;local v49;local v50;while true do if (v48==((0 -0) -0)) then v49=nil;if not v47 then v47=v23();if (v47==(438 -(145 + 293))) then return "";end end v48=(253 + 178) -(44 + 386) ;end if (v48==(1489 -(998 + 488))) then return v6(v50);end if (v48==(1 + 1)) then v50={};for v88=1 + 0 , #v49 do v50[v88]=v2(v1(v3(v49,v88,v88)));end v48=775 -(201 + 571) ;end if (v48==1) then v49=v3(v16,v18,(v18 + v47) -1 );v18=v18 + v47 ;v48=1140 -(116 + (3730 -2708)) ;end end end local v26=v23;local function v27(...)return {...},v12("#",...);end local function v28()local v51=159 -(111 + 48) ;local v52;local v53;local v54;local v55;local v56;local v57;local v58;local v59;while true do if (v51~=(3 + 1)) then else while true do if (v52==(1 + 2)) then v59=nil;while true do local v97=0;local v98;while true do if (v97~=(0 -0)) then else v98=0;while true do if (v98==(1274 -(388 + 886))) then if (v53==(1 -0)) then local v152=0 + 0 ;local v153;while true do if (v152~=(560 -(306 + 254))) then else v153=0 + 0 ;while true do if (v153==(0 -0)) then local v383=1467 -(899 + 568) ;local v384;while true do if (v383==(0 + 0)) then v384=0 -0 ;while true do if (v384==0) then local v402=0;while true do if (v402==1) then v384=1;break;end if (v402~=(603 -(268 + 335))) then else v58=v23();v59={};v402=291 -(60 + 230) ;end end end if ((573 -(426 + 146))==v384) then v153=1;break;end end break;end end end if (v153~=2) then else v53=1 + 1 ;break;end if (v153~=(1457 -(282 + 1174))) then else local v385=0;local v386;while true do if (v385==0) then v386=811 -(569 + 242) ;while true do if (0==v386) then local v403=0 -0 ;while true do if (v403~=(1 + 0)) then else v386=1025 -(706 + 318) ;break;end if (v403~=(1251 -(721 + 530))) then else for v413=1,v58 do local v414=1271 -(945 + 326) ;local v415;local v416;local v417;while true do if (v414==(0 -0)) then local v418=0;while true do if (v418==(1 + 0)) then v414=1;break;end if (v418~=(700 -(271 + 429))) then else v415=0 + 0 ;v416=nil;v418=1;end end end if (v414==1) then v417=nil;while true do if ((1500 -(1408 + 92))==v