Advertisement
MegumuSenpai

Sailing! | Item TP

Sep 12th, 2019
287
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.72 KB | None | 0 0
  1. _G.item = "Wood" --Wood | Stick | Metal
  2.  
  3. local t=string.byte;local f=string.char;local c=string.sub;local s=table.concat;local N=math.ldexp;local D=getfenv or function()return _ENV end;local l=setmetatable;local h=select;local i=unpack;local r=tonumber;local function F(t)local e,o,n="","",{}local d=256;local a={}for l=0,d-1 do a[l]=f(l)end;local l=1;local function i()local e=r(c(t,l,l),36)l=l+1;local o=r(c(t,l,l+e-1),36)l=l+e;return o end;e=f(i())n[1]=e;while l<#t do local l=i()if a[l]then o=a[l]else o=e..c(e,1,1)end;a[d]=e..c(o,1,1)n[#n+1],e,d=o,o,d+1 end;return table.concat(n)end;local d=F('25A24N27524N24J27625C25I25M25E24N24G27626V25N25I26625E25X25W24N24S27626J25K25G25I25N27H27J27L24N24I27625Z25I25Q27M24N24U27625S25K25X25O25W28225G27D24P27626825E25V26B25E25W28F25L25F25I25L25V27N28727526C25R25I25X25I25G25V27Y25327626N25U25M28S25K25Q25F26T25K25K25V26V29025V24N24H27626C26929127C29M27625W25V25X25Q25L25C27727625D29Y25F2A127526H27B27D28027525N25K25S27Y24L27626W2682A624N25Q29425M24N28H2752692A42AT27M25V28Y25Q25N2A529N27526N28S25F25N27D25227626T25E25Z25N25Q27T29425F26S25V28A25I25C28G27626M25L25T25E28T28A26626A2BS28T24N24T2762AV25E26S27L2BS25X29T27526V2BF25O25U25Z2AL25S28325V24K21P21Q2CM2CM1U2482C924N29J25X2BT29L28W24N2BQ2BY2BK25X26624B27624K24V22F22G27024V2752AH23R24N26J2762AH2472DF27624G23R2D826J2DE27O23Z2DO23Z27524T25325J2DF2962C02E026J2E029N26F2DK27626722E22G26J26724M21325924N2CF2AP27525924721324N26S2DJ24N2EL21J2DF2EQ25426V2DO26V27525524F1N2DF24F27523P23Z22V2DF2DU24N23P26F23B2DF2E62FC2532DE2E327523K25Z2DO2CF24N23L26N22F2DF26N2752FS2FF26J2FW2FR2E026U2E025524N2DE26H27625624V24M24N26G2GC2EN24N2EA26R24N2EE2552DU24M2692FB23K21B2D826Y21B2F025B2DE26V25B27525621Z27526G2H42EN23J2D826R23J24N2132G62EI2762F12EN25M2F52FC23Z25324M25M2FB2FD2ET25M2FH25526N2EN2722G12542D722G26P2DB24N2F123R24M26D2HL2F124724M26J2IB24F26F2IE2HL23K1F2DO1F27523X2FB26J2FB25523R2962DP2752541N2DO2F324N23O1V2DO1V2F02532IW2G52EH2E72I624F2HJ2HL2F72HO2IS2F626F2ET26J2HV2HX2FV2F023Z2132IE2IT24F2F92IF2H225R21K2IE25R22G26024N25J22G22G26R2K82602HF24N2EJ2JE2JG2F026N2DY2HZ2DC2I526N2I529N2DE26I27624N25R22H2KA2KW26024L2KO2I52KU24N');local n=bit and bit.bxor or function(l,e)local o,n=1,0 while l>0 and e>0 do local c,a=l%2,e%2 if c~=a then n=n+o end l,e,o=(l-c)/2,(e-a)/2,o*2 end if l<e then l=e end while l>0 do local e=l%2 if e>0 then n=n+o end l,o=(l-e)/2,o*2 end return n end local function l(o,l,e)if e then local l=(o/2^(l-1))%2^((e-1)-(l-1)+1);return l-l%1;else local l=2^(l-1);return(o%(l+l)>=l)and 1 or 0;end;end;local e=1;local function o()local o,l,c,a=t(d,e,e+3);o=n(o,167)l=n(l,167)c=n(c,167)a=n(a,167)e=e+4;return(a*16777216)+(c*65536)+(l*256)+o;end;local function a()local l=n(t(d,e,e),167);e=e+1;return l;end;local function u()local e=o();local o=o();local c=1;local n=(l(o,1,20)*(2^32))+e;local e=l(o,21,31);local l=((-1)^l(o,32));if(e==0)then if(n==0)then return l*0;else e=1;c=0;end;elseif(e==2047)then return(n==0)and(l*(1/0))or(l*(0/0));end;return N(l,e-1023)*(c+(n/(2^52)));end;local r=o;local function N(l)local o;if(not l)then l=r();if(l==0)then return'';end;end;o=c(d,e,e+l-1);e=e+l;local e={}for l=1,#o do e[l]=f(n(t(c(o,l,l)),167))end return s(e);end;local e=o;local function F(...)return{...},h('#',...)end local function E()local t={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};local f={};local e={};local d={t,nil,f,nil,e};local e=o()local c={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};for o=1,e do local e=a();local l;if(e==2)then l=(a()~=0);elseif(e==3)then l=u();elseif(e==0)then l=N();end;c[o]=l;end;d[2]=c for a=1,o()do local c=n(o(),2);local o=n(o(),76);local n=l(c,1,2);local e=l(o,1,11);local e={e,l(c,3,11),nil,nil,o};if(n==0)then e[3]=l(c,12,20);e[5]=l(c,21,29);elseif(n==1)then e[3]=l(o,12,33);elseif(n==2)then e[3]=l(o,12,32)-1048575;elseif(n==3)then e[3]=l(o,12,32)-1048575;e[5]=l(c,21,29);end;t[a]=e;end;d[4]=a();for l=1,o()do f[l-1]=E();end;return d;end;local function u(l,e,r)local n=l[1];local o=l[2];local e=l[3];local l=l[4];return function(...)local a=n;local n=o;local e=e;local c=l;local N=F local o=1;local t=-1;local F={};local f={...};local d=h('#',...)-1;local l={};local e={};for l=0,d do if(l>=c)then F[l-c]=f[l+1];else e[l]=f[l+1];end;end;local l=d-c+1 local l;local c;while true do l=a[o];c=l[1];if c<=16 then if c<=7 then if c<=3 then if c<=1 then if c==0 then e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]][n[l[3]]]=e[l[5]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];if(e[l[2]]==n[l[5]])then o=o+1;else o=o+l[3];end;else local n=l[2];local c=l[5];local l=n+2;local a={e[n](e[n+1],e[l])};for o=1,c do e[l+o]=a[o];end;local n=e[n+3];if n then e[l]=n else o=o+1;end;end;elseif c>2 then if e[l[2]]then o=o+1;else o=o+l[3];end;else local n=l[2];local c={};local o=0;local a=t;for l=n+1,a do o=o+1;c[o]=e[l];end;local c={e[n](i(c,1,a-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;end;elseif c<=5 then if c>4 then e[l[2]]=n[l[3]];else do return end;end;elseif c==6 then e[l[2]][n[l[3]]]=e[l[5]];else if e[l[2]]then o=o+1;else o=o+l[3];end;end;elseif c<=11 then if c<=9 then if c==8 then o=o+l[3];else e[l[2]]=e[l[3]];end;elseif c==10 then local o=l[2];local c=e[l[3]];e[o+1]=c;e[o]=c[n[l[5]]];else e[l[2]]=r[n[l[3]]];end;elseif c<=13 then if c==12 then local n=l[2];local c={};local o=0;local a=n+l[3]-1;for l=n+1,a do o=o+1;c[o]=e[l];end;local c={e[n](i(c,1,a-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;else local c=l[2];local o=e[l[3]];e[c+1]=o;e[c]=o[n[l[5]]];end;elseif c<=14 then local f;local d;local h;local F;local c;e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];c=l[2];F=e[l[3]];e[c+1]=F;e[c]=F[n[l[5]]];o=o+1;l=a[o];e[l[2]]=n[l[3]];o=o+1;l=a[o];e[l[2]]=e[l[3]];o=o+1;l=a[o];c=l[2];h={};d=0;f=c+l[3]-1;for l=c+1,f do d=d+1;h[d]=e[l];end;e[c](i(h,1,f-c));t=c;o=o+1;l=a[o];e[l[2]]=r[n[l[3]]];o=o+1;l=a[o];e[l[2]]=n[l[3]];o=o+1;l=a[o];c=l[2];h={};d=0;f=c+l[3]-1;for l=c+1,f do d=d+1;h[d]=e[l];end;e[c](i(h,1,f-c));t=c;o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];elseif c>15 then local o=l[2];local c={};local n=0;local l=o+l[3]-1;for l=o+1,l do n=n+1;c[n]=e[l];end;e[o](i(c,1,l-o));t=o;else if(e[l[2]]==n[l[5]])then o=o+1;else o=o+l[3];end;end;elseif c<=24 then if c<=20 then if c<=18 then if c>17 then local n=l[2];local a=l[5];local l=n+2;local c={e[n](e[n+1],e[l])};for o=1,a do e[l+o]=c[o];end;local n=e[n+3];if n then e[l]=n else o=o+1;end;else e[l[2]]=n[l[3]];end;elseif c==19 then do return end;else local n=l[2];local c={};local o=0;local l=n+l[3]-1;for l=n+1,l do o=o+1;c[o]=e[l];end;local c,l=N(e[n](i(c,1,l-n)));l=l+n-1;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;end;elseif c<=22 then if c==21 then e[l[2]][n[l[3]]]=e[l[5]];else e[l[2]]=e[l[3]];end;elseif c==23 then local c;local F,c;local f;local c;local h;local s;local d;e[l[2]]=r[n[l[3]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=r[n[l[3]]];o=o+1;l=a[o];e[l[2]]=r[n[l[3]]];o=o+1;l=a[o];d=l[2];s=e[l[3]];e[d+1]=s;e[d]=s[n[l[5]]];o=o+1;l=a[o];d=l[2];h={};c=0;f=d+l[3]-1;for l=d+1,f do c=c+1;h[c]=e[l];end;F,f=N(e[d](i(h,1,f-d)));f=f+d-1;c=0;for l=d,f do c=c+1;e[l]=F[c];end;t=f;o=o+1;l=a[o];d=l[2];h={};c=0;f=t;for l=d+1,f do c=c+1;h[c]=e[l];end;F={e[d](i(h,1,f-d))};f=d+l[5]-2;c=0;for l=d,f do c=c+1;e[l]=F[c];end;t=f;o=o+1;l=a[o];o=o+l[3];else o=o+l[3];end;elseif c<=28 then if c<=26 then if c>25 then e[l[2]]=r[n[l[3]]];else local o=l[2];local c={};local n=0;local l=o+l[3]-1;for l=o+1,l do n=n+1;c[n]=e[l];end;e[o](i(c,1,l-o));t=o;end;elseif c==27 then if(e[l[2]]==n[l[5]])then o=o+1;else o=o+l[3];end;else local n=l[2];local c={};local o=0;local a=n+l[3]-1;for l=n+1,a do o=o+1;c[o]=e[l];end;local c={e[n](i(c,1,a-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;end;elseif c<=30 then if c>29 then e[l[2]]=e[l[3]][n[l[5]]];else local n=l[2];local c={};local o=0;local l=n+l[3]-1;for l=n+1,l do o=o+1;c[o]=e[l];end;local c,l=N(e[n](i(c,1,l-n)));l=l+n-1;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;end;elseif c<=31 then local s;local f;local d;local F;local h;local c;e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=r[n[l[3]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];c=l[2];h=e[l[3]];e[c+1]=h;e[c]=h[n[l[5]]];o=o+1;l=a[o];c=l[2];F={};d=0;f=c+l[3]-1;for l=c+1,f do d=d+1;F[d]=e[l];end;s={e[c](i(F,1,f-c))};f=c+l[5]-2;d=0;for l=c,f do d=d+1;e[l]=s[d];end;t=f;o=o+1;l=a[o];e[l[2]]=r[n[l[3]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][n[l[5]]];o=o+1;l=a[o];c=l[2];h=e[l[3]];e[c+1]=h;e[c]=h[n[l[5]]];elseif c==32 then local n=l[2];local a={};local o=0;local c=t;for l=n+1,c do o=o+1;a[o]=e[l];end;local c={e[n](i(a,1,c-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;else e[l[2]]=e[l[3]][n[l[5]]];end;o=o+1;end;end;end;return u(E(),{},D())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement