Advertisement
wercuhdhdhs

Nexus Hotel Elephant

Feb 2nd, 2023 (edited)
154
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 14.48 KB | None | 0 0
  1. do local v0=0;local v1;local v2;local v3;local v4;local v5;local v6;local v7;local v8;local v9;local v10;local v11;local v12;local v13;local v14;local v15;local v16;while true do if (v0==4) then v13=select;v14=unpack or table.unpack;v15=tonumber;v0=5;end if (v0==2) then v7=table.concat;v8=table.insert;v9=math.ldexp;v0=3;end if (v0==1) then v4=string.sub;v5=string.gsub;v6=string.rep;v0=2;end if (3==v0) then v10=getfenv or function()return _ENV;end;v11=setmetatable;v12=pcall;v0=4;end if (v0==5) then v16=nil;v16=function(v23,v24,...)local v27=1;local v28;v23=v5(v4(v23,5),"..",function(v29)if (v2(v29,2)==79) then v28=v1(v4(v29,1,1));return "";else local v84=0;local v85;while true do if (v84==0) then v85=v3(v1(v29,16));if v28 then local v112=0;local v113;while true do if (v112==0) then v113=v6(v85,v28);v28=nil;v112=1;end if (v112==1) then return v113;end end else return v85;end break;end end end end);local function v30(v31,v32,v33)if v33 then local v86=0 -0;local v87;while true do if (v86==((0 + 0) -0)) then v87=(v31/((5 -3)^(v32-(1 -0))))%(((1 -0) + 1)^(((v33-1) -(v32-(1039 -(619 + 419)))) + 1 + 0));return v87-(v87%(1849 -(1551 + 297)));end end else local v88=0 + 0;local v89;while true do if (v88==(0 + 0)) then v89=(1860 -(45 + 1813))^(v32-(1534 -(466 + 1067)));return (((v31%(v89 + v89))>=v89) and (535 -(25 + 509))) or 0;end end end end local function v34()local v47=0 -0;local v48;while true do if (v47==(0 + 0)) then v48=v2(v23,v27,v27);v27=v27 + (806 -(51 + 754));v47=507 -(364 + 142);end if (v47==(1644 -(577 + 1066))) then return v48;end end end local function v35()local v49=0 -0;local v50;local v51;while true do if (v49==((884 -(262 + 619)) -2)) then return (v51 * 256) + v50;end if (((5738 -4060) -(1395 + 283))==v49) then v50,v51=v2(v23,v27,v27 + 1 + 1);v27=v27 + (1786 -(544 + 1240));v49=1;end end end local function v36()local v52=0;local v53;local v54;local v55;local v56;while true do if (v52==(0 -0)) then v53,v54,v55,v56=v2(v23,v27,v27 + (1371 -(148 + 1220)));v27=v27 + 2 + 2;v52=(1361 -(1184 + 175)) -1;end if (v52==(1368 -(1214 + 153))) then return (v56 * (4951740 + (11826193 -(176 + 541)))) + (v55 * (161510 -95974)) + (v54 * 256) + v53;end end end local function v37()local v57=v36();local v58=v36();local v59=441 -(7 + 433);local v60=(v30(v58,2 -1,35 -15) * ((3 -1)^(87 -55))) + v57;local v61=v30(v58,19 + 2,78 -(28 + 19));local v62=((v30(v58,14 + 18)==((1154 -(8 + 7)) -(108 + 1030))) and  -1) or (1 + 0 + 0);if (v61==(0 + 0)) then if (v60==0) then return v62 * (1273 -(174 + 637 + 462));else local v104=0 + 0;while true do if (v104==(0 + (0 -0))) then v61=1;v59=0;break;end end end elseif (v61==(3151 -(406 + 698))) then return ((v60==0) and (v62 * (1/(0 -0)))) or (v62 * NaN);end return v9(v62,v61-(1599 -(2184 -(1205 + 403)))) * (v59 + (v60/((1 + 1)^(169 -117))));end local function v38(v39)local v63;if  not v39 then v39=v36();if (v39==(0 -0)) then return "";end end v63=v4(v23,v27,(v27 + v39) -(4 -3));v27=v27 + v39;local v64={};for v77=1 + 0, #v63 do v64[v77]=v3(v2(v4(v63,v77,v77)));end return v7(v64);end local v40=v36;local function v41(...)return {...},v13("#",...);end local function v42()local v65=1956 -(303 + 1653);local v66;local v67;local v68;local v69;local v70;local v71;local v72;local v73;while true do if (v65~=(944 -(352 + 588))) then else while true do if (v66==(1878 -(1538 + 339))) then local v109=0;while true do if (v109~=(1 + 0)) then else v66=2 + 0;break;end if (v109==(297 -(294 + 3))) then v69=nil;v70=nil;v109=1;end end end if (v66~=3) then else v73=nil;while true do local v114=0 -0;local v115;while true do if (v114==0) then v115=0 + 0;while true do if (v115~=(1 + 0)) then else if (v67==1) then local v135=0;local v136;while true do if (v135==(0 -0)) then v136=1226 -(666 + 560);while true do if (v136==(2 -1)) then v73={};v67=2 + 0;break;end if (v136==(0 + 0)) then v71={v68,v69,nil,v70};v72=v36();v136=1;end end break;end end end if (3==v67) then local v137=0 + 0;while true do local v147=371 -(45 + 326);while true do if (v147==(0 -0)) then if (v137==(1 + 0)) then return v71;end if (v137~=(282 -(234 + 48))) then else local v157=0;while true do if (v157==(1 + 0)) then v137=1;break;end if (v157==(0 + 0)) then for v173=1 + 0,v36() do v69[v173-(1 + 0)]=v42();end for v175=1 + 0,v36() do v70[v175]=v36();end v157=1 + 0;end end end break;end end end end break;end if (v115~=(748 -(166 + 582))) then else if (v67==(1580 -(741 + 839))) then local v138=0;while true do if ((1 + 0)~=v138) then else v70={};v67=1;break;end if (v138~=(0 + 0)) then else local v151=0 + 0;local v152;while true do if (v151==(1873 -(659 + 1214))) then v152=0 -0;while true do if (v152~=0) then else v68={};v69={};v152=1 + 0;end if (v152==(3 -2)) then v138=1;break;end end break;end end end end end if (v67~=(882 -(613 + 267))) then else local v139=0 -0;local v140;while true do if (v139~=0) then else v140=37 -(10 + 27);while true do if (v140==(0 + 0)) then for v161=626 -(219 + 406),v72 do local v162=0 + 0;local v163;local v164;local v165;while true do if ((1848 -(93 + 1755))==v162) then v163=0;v164=nil;v162=1;end if (v162~=(707 -(325 + 381))) then else v165=nil;while true do if ((493 -(396 + 97))==v163) then v164=v34();v165=nil;v163=4 -3;end if (v163~=(1 + 0)) then else if (v164==(1 + 0)) then v165=v34()~=(0 + 0);elseif (v164==(164 -(60 + 102))) then v165=v37();elseif (v164==(3 + 0)) then v165=v38();end v73[v161]=v165;break;end end break;end end end v71[3]=v34();v140=1 + 0;end if (v140~=1) then else for v166=4 -3,v36() do local v167=0 -0;local v168;local v169;local v170;while true do if (v167~=1) then else v170=nil;while true do if (v168==0) then local v178=0 + 0;while true do if (v178~=(0 + 0)) then else v169=0;v170=nil;v178=49 -(38 + 10);end if (v178~=(1 + 0)) then else v168=1;break;end end end if (v168~=1) then else while true do if (v169~=0) then else v170=v34();if (v30(v170,1,1 + 0)==(609 -(188 + 421))) then local v179=0 -0;local v180;local v181;local v182;local v183;local v184;while true do if (v179==(5 -3)) then v184=nil;while true do if (v180==0) then v181=0 -0;v182=nil;v180=696 -(153 + 542);end if (1==v180) then local v186=0 -0;while true do if (v186==(0 -0)) then v183=nil;v184=nil;v186=1;end if (v186==(1 + 0)) then v180=4 -2;break;end end end if (v180==(1 + 1)) then while true do if (v181==3) then if (v30(v183,6 -3,2 + 1)~=(1423 -(553 + 869))) then else v184[14 -10]=v73[v184[4]];end v68[v166]=v184;break;end if (v181==(0 -0)) then local v188=1239 -(1215 + 24);local v189;while true do if (0==v188) then v189=1370 -(84 + 1286);while true do if (v189==(3 -2)) then v181=1674 -(799 + 874);break;end if (v189~=(0 + 0)) then else local v197=0;while true do if (v197==0) then v182=v30(v170,290 -(202 + 86),3);v183=v30(v170,1397 -(36 + 1357),7 -1);v197=1 + 0;end if (v197~=(1 + 0)) then else v189=1 -0;break;end end end end break;end end end if (v181==1) then local v190=0;local v191;while true do if (0==v190) then v191=0;while true do if (v191~=(0 + 0)) then else local v198=0;while true do if (v198==(0 -0)) then v184={v35(),v35(),nil,nil};if (v182==(0 -0)) then local v201=0 + 0;local v202;while true do if (v201==(0 + 0)) then v202=168 -(131 + 37);while true do if ((0 -0)==v202) then v184[1097 -(752 + 342)]=v35();v184[1154 -(765 + 385)]=v35();break;end end break;end end elseif (v182==(988 -(238 + 749))) then v184[47 -(4 + 40)]=v36();elseif (v182==(4 -2)) then v184[3]=v36() -((1561 -(787 + 772))^(39 -23));elseif (v182==(3 -0)) then local v208=0 + 0;local v209;local v210;while true do if (v208==(1361 -(916 + 444))) then while true do if (v209==0) then v210=0;while true do if ((0 -0)==v210) then v184[9 -6]=v36() -(2^(7 + 9));v184[2 + 2]=v35();break;end end break;end end break;end if ((0 -0)==v208) then v209=0 -0;v210=nil;v208=3 -2;end end end v198=1 + 0;end if (v198~=1) then else v191=3 -2;break;end end end if (v191==(2 -1)) then v181=1290 -(1151 + 137);break;end end break;end end end if (v181==(3 -1)) then local v192=796 -(282 + 514);local v193;local v194;while true do if (v192==1) then while true do if (v193~=0) then else v194=0;while true do if (0==v194) then local v199=0 -0;local v200;while true do if (v199==(0 + 0)) then v200=0;while true do if (v200==(0 + 0)) then local v205=0 -0;while true do if (v205~=0) then else if (v30(v183,1,2 -1)==1) then v184[2]=v73[v184[2 + 0]];end if (v30(v183,1175 -(914 + 259),2 + 0)~=(702 -(109 + 592))) then else v184[3]=v73[v184[1780 -(625 + 1152)]];end v205=1 + 0;end if (v205==(1833 -(341 + 1491))) then v200=1;break;end end end if ((2 -1)==v200) then v194=1 + 0;break;end end break;end end end if ((2000 -(453 + 1546))~=v194) then else v181=3;break;end end break;end end break;end if (v192~=0) then else v193=525 -(347 + 178);v194=nil;v192=1 + 0;end end end end break;end end break;end if (v179==(0 + 0)) then v180=53 -(5 + 48);v181=nil;v179=1;end if (v179==(875 -(111 + 763))) then local v185=205 -(139 + 66);while true do if (v185==(1 + 0)) then v179=4 -2;break;end if (v185==(0 -0)) then v182=nil;v183=nil;v185=1255 -(900 + 354);end end end end end break;end end break;end end break;end if (v167==(1298 -(168 + 1130))) then v168=0;v169=nil;v167=1;end end end v67=3;break;end end break;end end end v115=1;end end break;end end end break;end if (v66~=2) then else v71=nil;v72=nil;v66=698 -(368 + 327);end if (v66~=(239 -(234 + 5))) then else local v110=82 -(36 + 46);while true do if (v110~=(728 -(181 + 547))) then else local v116=0;while true do if ((0 + 0)~=v116) then else v67=127 -(109 + 18);v68=nil;v116=1 -0;end if (v116==(1 + 0)) then v110=1 + 0;break;end end end if (v110==(1987 -(612 + 1374))) then v66=1 + 0;break;end end end end break;end if (v65==(2 + 0)) then v70=nil;v71=nil;v65=1 + 2;end if (v65~=(0 + 0)) then else v66=0 + 0;v67=nil;v65=1521 -(946 + 574);end if ((1 + 0)==v65) then v68=nil;v69=nil;v65=1 + 1;end if ((2 + 1)~=v65) then else v72=nil;v73=nil;v65=4;end end end local function v43(v44,v45,v46)local v74=v44[1];local v75=v44[2];local v76=v44[3];return function(...)local v79=1;local v80= -1;local v81={...};local v82=v13("#",...) -1;local function v83()local v90=v74;local v91=v75;local v92=v76;local v93=v41;local v94={};local v95={};local v96={};for v100=1920 -(1247 + 673),v82 do if (((5745 -(1477 + 250))>(711 + 2834)) and (v100>=v92)) then v94[v100-v92]=v81[v100 + ((3 -1) -1)];else v96[v100]=v81[v100 + (521 -(102 + 418))];end end local v97=(v82-v92) + 1;local v98;local v99;while true do local v101=0 + 0;while true do if (((264 + 690)<=(4135 -(766 + 1022))) and (v101==(255 -(177 + 78)))) then local v111=0 + 0;while true do if (((850 -471)<=(7983 -4899)) and (v111==((0 + 0) -0))) then v98=v90[v79];v99=v98[1814 -(1653 + (369 -209))];v111=1820 -((5062 -3395) + 152);end if ((v111==(4 -3)) or ((4683 -1876)>=(5642 -2257))) then v101=1 + 0;break;end end end if (((3348 -(410 + (1808 -(441 + 533))))<=(3849 + 830)) and (v101==(1 + 0))) then if (((1619 + 807)>=(278 + 1186)) and (v99<=(1 + (2 -1)))) then if ((v99<=(0 + 0)) or (((4058 -(1097 + 151)) -1656)>=(4284 -(751 + 803)))) then do return;end elseif ((v99>(1220 -(203 + 1016))) or ((9649 -6830)==(3287 -((699 -413) + 198)))) then v96[v98[2 + 0]]=v98[1 + (5 -3)];else local v121=0 -0;local v122;local v123;local v124;while true do if ((v121==1) or ((2197 -(1156 + 194))>(2332 -(194 + 374)))) then v124=nil;while true do if ((4962>=2979) and (v122==(0 + 0))) then local v153=(0 -0) -0;while true do if (((1850 -(148 + 1360))<=(2734 + 153)) and (v153==(0 + 0))) then v123=0 -0;v124=nil;v153=4 -3;end if (((3070 + 1365)==(331 + 2186 + 1918)) and (v153==(1 + 0))) then v122=1 + 0;break;end end end if ((v122==(1 -0)) or ((5486 -(298 + 899))>(11818 -7181))) then while true do if (((2649 -998)>(3064 -(452 + 1316))) and (v123==(50 -(6 + 44)))) then v124=v98[2];v96[v124]=v96[v124](v14(v96,v124 + (1755 -(24 + 1730)),v80));break;end end break;end end break;end if (((200 + 13)==(1395 -(277 + 905))) and (v121==(397 -(21 + 376)))) then v122=992 -(51 + 941);v123=nil;v121=479 -(83 + 395);end end end elseif (((5244 -3502)==1742) and (v99<=(2 + 2))) then if (((4978 -(970 + 930))>=(13124 -10135)) and (v99==(1981 -(587 + (5075 -3684))))) then local v125=0 + 0 + 0;local v126;local v127;while true do if ((865<=(1294 + 2581)) and (v125==(659 -(373 + 285)))) then v96[v126 + 1 + 0]=v127;v96[v126]=v127[v98[6 -2]];break;end if ((v125==((0 -0) + 0)) or ((1522 -(1246 + 64))>=(1359 + 5 + 1361))) then local v144=848 -((115 -71) + 804);while true do if (((1591 -1254)<(2003 -1094)) and (v144==(625 -(94 + 530)))) then v125=411 -(141 + 269);break;end if (((1411 -(340 + 855 + 216))==v144) or ((539 -111)>=(5981 -((2164 -(205 + 1285)) + 552)))) then v126=v98[2 + 0];v127=v96[v98[7 -4]];v144=652 -(315 + 336);end end end end else v96[v98[(7303 -5378) -(1503 + 420)]]();end elseif (((5313 -(228 + 444))==(1087 + 3554)) and (v99==(6 -1))) then local v128=0 + 0;local v129;local v130;local v131;local v132;while true do if ((v128==(197 -(145 + 51))) or ((65 + 364)>2130)) then local v145=0 -0;while true do if (((38 + 111 + 1757)==(2435 -(26 + 503))) and (v145==(373 -(336 + 37)))) then v80=(v131 + v129) -(389 -(303 + 85));v132=0 + 0;v145=1 + 0;end if (((10856 -7380)==(4347 -(82 + 789))) and ((1 + 0)==v145)) then v128=2 + 0;break;end end end if (((1237 -779)<(3210 + 58)) and (v128==(0 + 0))) then local v146=1470 -(1361 + 109);while true do if ((v146==(0 + 0)) or ((4923 -(9065 -5993))<=(3219 -1570))) then v129=v98[(1423 -(902 + 519)) + 0];v130,v131=v93(v96[v129](v14(v96,v129 + (2 -1),v98[14 -11])));v146=2 -1;end if ((((4250 + 3489) -(9054 -5734))<=(1626 + 2816)) and (v146==(1 -0))) then v128=3 -2;break;end end end if (((265 -(238 + 25))==v128) or (((4567 + 5525) -6982)<=(5485 -2487))) then for v148=v129,v80 do local v149=0 + (0 -0);local v150;while true do if ((v149==0) or ((6336 -4577)<=(1217 -(362 + 338)))) then v150=0 -0;while true do if ((v150==(600 -(95 + 505))) or (((3309 + 4529) -5576)>=((9827 -5399) + (895 -413)))) then v132=v132 + (527 -(468 + 58));v96[v148]=v130[v132];break;end end break;end end end break;end end else v96[v98[614 -(166 + 446)]]=v46[v98[(391 -(268 + 121)) + 1]];end v79=v79 + (3 -2);break;end end end end A,B=v41(v12(v83));if  not A[1] then local v102=0;local v103;while true do if (0==v102) then v103=v44[4][v79] or "?";error("Script error at ["   .. v103   .. "]:"   .. A[2]);break;end end else return v14(A,2,B);end end;end return v43(v42(),{},v24)(...);end;v16("LOL!043O00030A3O006C6F6164737472696E6703043O0067616D6503073O00482O7470476574034B3O00682O7470733A2O2F7261772E67697468756275736572636F6E74656E742E636F6D2F587A783233342F486F74656C2D456C657068616E742F6D61696E2F4E6578757325323053637269707400083O0012063O00013O001206000100023O002003000100010003001202000300044O0005000100034O00015O00022O00043O000100016O00017O00083O00023O00023O00023O00023O00023O00023O00023O00033O00",v10(),...);break;end if (0==v0) then v1=tonumber;v2=string.byte;v3=string.char;v0=1;end end end
Tags: Roblox lua Script
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement