return(function()local v,E,N,z,d,M,k,V,B,h,l,t,o=string.sub,tostring,string.char,pcall,string.byte,5,string.rep,{},unpack,string.pack,string.gsub,setmetatable,loadstring;for O=0,255 do V[O]=N(O);end;do V={52865,{0x1B,0x4C,0x75,0x61,0x50},E(o)};for O,T in V do local W={z(o,O%2==0 and N(B(T))or T,nil,nil)};if W[1]and z(W[2])~=not W[3]then M=5;end;end;end;V=function(O)O=v(O,M);O=l(O,"z","!!!!!");return l(O,".....",t({},{__index=function(v,M)local l,O,T,W,i=d(M,1,5);local y=(i-33)+(W-33)*85+(T-33)*7225+(O-33)*614125+(l-33)*52200625;i=h("<I4",y);v[M]=i;return i;end}));end;local v,M=V([=[LPH+DB1\:48u(FF.h:1Z[iuc=c5K1XFL&D>UhjB%J^"^2u])LRi-Pq(UY,:<3bOk2;sImZY+ISH"k9&OsnT#P5On[fJUQ;kl7:O!!(CG]=]),V([==[LPH+DB1\:48u(F-k>LaL+G><SJ5egmf.ce!!%O3]==]);local h={[0]=1,2,4,8,16,32,64,128,256,512,1024,2048,4096,8192,16384,32768,65536,131072,262144,524288,1048576,2097152,4194304,8388608,16777216,33554432,67108864,134217728,268435456,536870912,1073741824,2147483648,4294967296};V=type;local l,O=function(T)local W,i,y,a,g=0,{[0]=0,0,0,0,1,2,3,4,5,6,4,5},#T,0xFFFFFFFF,0;local G=function()W=W+1;return d(T,W,W);end;for d=1,5 do g=g*256+G();end;local d={[0]=0};local function T(q)local R=0;for D=q,1,-1.0 do a=a/2;a=a-a%1;R=R*2;if not(g<a)then g=g-a;R=R+1;end;if a<=0x00FFFFFF then a=a*256;g=g*256+G();end;end;return R;end;local function q(R,D)local S,j,_=a/2048,R[D];S=S-S%1;local n=S*j;if g<n then a=n;S=(2048-j)/32;S=S-S%1;j=j+S;_=0;else a=a-n;local S=j/32;g=g-n;S=S-S%1;j=j-S;_=1;end;R[D]=j;if a<=0x00FFFFFF then a=a*256;g=g*256+G();end;return _;end;local function a(g,G,R)local D=1;for S=1,g do D=D*2+q(R,D);end;return(D-G);end;local function g(G,R,D)local S,j=0,1;for _=0,G-1 do local G=q(D,R+j);j=j*2+G;S=S+G*h[_];end;return S;end;local function G(R,D)local S=1;for j=7,0,-1.0 do local _=(D/h[j])%2;_=_-_%1;j=q(R,S+(_*256)+256);S=S*2+j;if _~=j then while S<0x100 do S=S*2+q(R,S);end;break;end;end;return(S%256);end;local R=0;local function D(S,j)if q(S,1)==0 then return a(3,8,S[3][j]);elseif q(S,2)==0 then return 8+a(3,8,S[4][j]);end;return a(8,256,S[5])+16.0;end;local function S(j)local _={};for n=0,j-1 do _[n]=1024.0;end;return _;end;local j=0;local function _(n,w)local A={};for X=0,w-1 do local w={};A[X]=w;for X=0,n-1 do w[X]=1024.0;end;end;return A;end;local n="";local function w()return{1024.0,1024.0,_(8,1),_(8,1),S(256)};end;local function A()local X,Y,P,p,c,Z,s,H,u,r,m,F,e,U,Q,x=_(0x300,8),_(1,12),S(12),S(12),S(12),S(12),0,0,_(1,12),_(64,4),0,S(115.0),0,S(16),w(),w();while W<=y do local W=(j%1);if q(Y[R],W)==0 then local y=d[j];local S=y/h[5.0];S=S-S%1;y=X[S];j=j+1;d[j]=R<7 and a(8,256,y)or G(y,d[j-e-1]);R=i[R];else local i;if q(P,R)~=0 then if q(p,R)==0 then if q(u[R],W)==0 then R=R<7 and 9 or 11;i=1;end;else local y;if q(c,R)==0 then y=m;else if q(Z,R)==0 then y=s;else y=H;H=s;end;s=m;end;m=e;e=y;end;if not i then R=R<7 and 8 or 11;i=2+D(x,W);end;else H=s;s=m;m=e;i=2+D(Q,W);local W=i-2;if 4<=W then W=3.0;end;e=a(6,64,r[W]);if e>=4 then W=e;local y=W/2-1;y=y-y%1;e=(2+W%2)*h[y];if W<14 then e=e+g(y,e-W,F);else e=e+(T(y-4)*16)+g(4,0,U);if e==0xFFFFFFFF then return i==2;end;end;end;R=R<7 and 7 or 10;if e>=j then return false;end;end;local h=j+i;for T=j+1,h do d[T]=d[T-e-1];end;j=h;end;end;return false;end;A();z(o,t({},{__tostring=function()d=nil;end}),nil,nil);A=#d;for h=1,A,7997 do local t=h+7996.0;if t>A then t=A;end;n=n..N(B(d,h,t));end;return n;end,assert;local N=l(v);v=l(M);v=buffer.fromstring(v);M,l=z(o,N,"Luraph"..k(" ",3),nil);O(M and l and V(l)=='function',"Luraph decompression error: "..E(l).." (does your environment support load/loadstring?)");return l(v);end)()(...);