local h=string.byte;local k=string.char;local e=string.sub;local m=table.concat;local a=table.insert;local l=math.ldexp;local p=getfenv or function()return _ENV end;local a=setmetatable;local n=select;local g=unpack or table.unpack;local j=tonumber;local function o(h)local b,c,d="","",{}local g=256;local f={}for a=0,g-1 do f[a]=k(a)end;local a=1;local function i()local b=j(e(h,a,a),36)a=a+1;local c=j(e(h,a,a+b-1),36)a=a+b;return c end;b=k(i())d[1]=b;while a<#h do local a=i()if f[a]then c=f[a]else c=b..e(b,1,1)end;f[g]=b..e(c,1,1)d[#d+1],b,g=c,c,g+1 end;return table.concat(d)end;local j=o('23J22Q27522R22O27522Q21P21122R22T2792131C13101E171622R22Z2791L1D1G191H1I13111722R22U27921B1D101H22R22X279211171M1X1A1B1E161G171C27Z2791C171Q1M28K2751L131B28P22Y27921D28A1M1B1C1528522S27921I131G1528A28Q22Q218131F27Y2362792161N1F131C1D1B1621C1D1D1M21E2981M22O2862791F1D1N1H1722B111E1B111929C21D1B1O27Y27E27521G17111M27R22922R22P28L171L2AR27927522E1Y29C1529F2AH27921E1E131R171G28528727521A1D11131E2B52B72B927N27928C29827W1M2BL280275216171327M28W2751Z1C111A27R27L2762952751X2101G2B222R22R27921M2CE27921N2AV2AW2362AZ2CF27521K1Y27923423D2792CP22Q21U2302AW22Q27822S21U27922L22Q2CX22U2372D62D822Q2CU2792CL21U2CX2752802D52D122V2D12D22DQ23427622Q2C82AW2782DP22Q2AR2CL2BT27522G2DD2DF2952AI2752332DU2DD2D32D52952E42D92DB2E32E52CV2952CX2CZ2EB29528W2EO29529527O2EO27E2DO22W2DU21W2EB2322DD27E2DA2792F32CF2ES22Q2DO28721W2EZ2952F822Q2F32F62752FH2E622Q2EA27928W2EM2DD2DM2952FC2DE27527E2312792DM27E27E29I2DS22Q28W2EI2FX22Q27O2G92G62EZ2G927927E2EZ27829I2EB2D027E2G62GO2G12GN22Q27E2352CY2F32G322Q23A2CY2FY2GT22Q23B2H12H327E23822Q22A2H223922Q23E2GA2GQ2752G22H32GV2HJ27E2H02HM2H42H62GY2872G628W23F2GR2G72HY29I21U27427O2952HW2DM27O27O23C2H62FF22Q2I52752EZ2EZ2CV2DM2IF22Q23I2H62872I42IM22Q2872742FQ2IQ2DQ2GL27E2HW28W2E22FI2DD22S2222DD2FH2782FK2J12CF2DF2CF2E822Q2232DD2CF2CF2J82DT2D12DJ2AW2CS2JK2DD2JP2CX2DX2DQ2752JT2JT2CL2JY2DG2792E22K22K12792DO2752K62FB2K52KA2K72792DV2KE2GH2KG2752BZ2GB27927O2752KM2KK2KN2KL2KR2IE2792EZ2KT2KW22Q2KV2KY2792BC2IU2752L22L52L12L72L42L82L32LB2L62L92LE2LB2FP2DZ2792D02752G92LM2CT279');local a=bit32 or require('bit');local d=a and a.bxor or function(a,b)local c,d=1,0 while a>0 and b>0 do local f,e=a%2,b%2 if f~=e then d=d+c end a,b,c=(a-f)/2,(b-e)/2,c*2 end if a<b then a=b end while a>0 do local b=a%2 if b>0 then d=d+c end a,c=(a-b)/2,c*2 end return d end local function c(c,a,b)if b then local a=(c/2^(a-1))%2^((b-1)-(a-1)+1);return a-a%1;else local a=2^(a-1);return(c%(a+a)>=a)and 1 or 0;end;end;local a=1;local function b()local e,c,f,b=h(j,a,a+3);e=d(e,98)c=d(c,98)f=d(f,98)b=d(b,98)a=a+4;return(b*16777216)+(f*65536)+(c*256)+e;end;local function i()local b=d(h(j,a,a),98);a=a+1;return b;end;local function f()local c,b=h(j,a,a+2);c=d(c,98)b=d(b,98)a=a+2;return(b*256)+c;end;local function o()local d=b();local a=b();local e=1;local d=(c(a,1,20)*(2^32))+d;local b=c(a,21,31);local a=((-1)^c(a,32));if(b==0)then if(d==0)then return a*0;else b=1;e=0;end;elseif(b==2047)then return(d==0)and(a*(1/0))or(a*(0/0));end;return l(a,b-1023)*(e+(d/(2^52)));end;local l=b;local function q(b)local c;if(not b)then b=l();if(b==0)then return'';end;end;c=e(j,a,a+b-1);a=a+b;local b={}for a=1,#c do b[a]=k(d(h(e(c,a,a)),98))end return m(b);end;local a=b;local function l(...)return{...},n('#',...)end local function k()local j={};local h={};local l={};local m={j,h,nil,l};local a=b()local e={}for c=1,a do local b=i();local a;if(b==0)then a=(i()~=0);elseif(b==3)then a=o();elseif(b==1)then a=q();end;e[c]=a;end;for h=1,b()do local a=i();if(c(a,1,1)==0)then local d=c(a,2,3);local g=c(a,4,6);local a={f(),f(),nil,nil};if(d==0)then a[3]=f();a[4]=f();elseif(d==1)then a[3]=b();elseif(d==2)then a[3]=b()-(2^16)elseif(d==3)then a[3]=b()-(2^16)a[4]=f();end;if(c(g,1,1)==1)then a[2]=e[a[2]]end if(c(g,2,2)==1)then a[3]=e[a[3]]end if(c(g,3,3)==1)then a[4]=e[a[4]]end j[h]=a;end end;m[3]=i();for a=1,b()do h[a-1]=k();end;for a=1,b()do l[a]=b();end;return m;end;local o=pcall local function m(h,a,f)local a=h[1];local c=h[2];local d=h[3];return function(...)local b=1;local e=-1;local i={...};local j=n('#',...)-1;local function k()local e=a;local a=Const;local a=c;local d=d;local a=l local h={};local a={};local c={};for a=0,j do if(a>=d)then h[a-d]=i[a+1];else c[a]=i[a+1];end;end;local a=j-d+1 local a;local d;while true do a=e[b];d=a[1];if d<=20 then if d<=9 then if d<=4 then if d<=1 then if d==0 then do return end;else local g;local d;c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];d=a[2];g=c[a[3]];c[d+1]=g;c[d]=g[a[4]];b=b+1;a=e[b];d=a[2]c[d]=c[d](c[d+1])b=b+1;a=e[b];c[a[2]]=f[a[3]];b=b+1;a=e[b];c[a[2]]=c[a[3]];b=b+1;a=e[b];for a=a[2],a[3]do c[a]=nil;end;b=b+1;a=e[b];b=a[3];end;elseif d<=2 then c[a[2]]=a[3];elseif d>3 then c[a[2]][a[3]]=c[a[4]];else local a=a[2]c[a]=c[a](c[a+1])end;elseif d<=6 then if d>5 then c[a[2]][a[3]]=a[4];else if(c[a[2]]~=a[4])then b=b+1;else b=a[3];end;end;elseif d<=7 then local d=a[2];local b=c[a[3]];c[d+1]=b;c[d]=b[a[4]];elseif d>8 then local a=a[2]c[a]=c[a](c[a+1])else local d;c[a[2]]();b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=f[a[3]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=a[3];b=b+1;a=e[b];c[a[2]]=a[3];b=b+1;a=e[b];c[a[2]]=a[3];b=b+1;a=e[b];d=a[2]c[d]=c[d](g(c,d+1,a[3]))b=b+1;a=e[b];c[a[2]][a[3]]=c[a[4]];b=b+1;a=e[b];c[a[2]]=f[a[3]];end;elseif d<=14 then if d<=11 then if d==10 then if(c[a[2]]~=a[4])then b=b+1;else b=a[3];end;else c[a[2]]();end;elseif d<=12 then c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]][a[3]]=a[4];b=b+1;a=e[b];c[a[2]]=f[a[3]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=f[a[3]];elseif d==13 then local a=a[2]c[a]=c[a]()else c[a[2]]=c[a[3]][a[4]];end;elseif d<=17 then if d<=15 then for a=a[2],a[3]do c[a]=nil;end;elseif d==16 then if(c[a[2]]==c[a[4]])then b=b+1;else b=a[3];end;else b=a[3];end;elseif d<=18 then if c[a[2]]then b=b+1;else b=a[3];end;elseif d>19 then local b=a[2]c[b]=c[b](g(c,b+1,a[3]))else c[a[2]]=c[a[3]]+a[4];end;elseif d<=30 then if d<=25 then if d<=22 then if d==21 then for a=a[2],a[3]do c[a]=nil;end;else local b=a[2];local d=c[a[3]];c[b+1]=d;c[b]=d[a[4]];end;elseif d<=23 then c[a[2]]=a[3];elseif d>24 then c[a[2]][a[3]]=c[a[4]];else c[a[2]]=f[a[3]];end;elseif d<=27 then if d>26 then c[a[2]]=f[a[3]];else b=a[3];end;elseif d<=28 then do return end;elseif d>29 then local b=a[2]c[b]=c[b](g(c,b+1,a[3]))else local d;c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]]+a[4];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];c[a[2]]=c[a[3]][a[4]];b=b+1;a=e[b];d=a[2]c[d]=c[d](g(c,d+1,a[3]))b=b+1;a=e[b];c[a[2]][a[3]]=c[a[4]];b=b+1;a=e[b];b=a[3];end;elseif d<=35 then if d<=32 then if d==31 then c[a[2]]=c[a[3]]+a[4];else if c[a[2]]then b=b+1;else b=a[3];end;end;elseif d<=33 then c[a[2]]=c[a[3]];elseif d==34 then c[a[2]]=c[a[3]][a[4]];else local a=a[2]c[a]=c[a]()end;elseif d<=38 then if d<=36 then c[a[2]]=c[a[3]];elseif d==37 then local e=a[2];local f=a[4];local d=e+2 local e={c[e](c[e+1],c[d])};for a=1,f do c[d+a]=e[a];end;local e=e[1]if e then c[d]=e b=a[3];else b=b+1;end;else if(c[a[2]]==c[a[4]])then b=b+1;else b=a[3];end;end;elseif d<=39 then c[a[2]][a[3]]=a[4];elseif d>40 then c[a[2]]();else local e=a[2];local f=a[4];local d=e+2 local e={c[e](c[e+1],c[d])};for a=1,f do c[d+a]=e[a];end;local e=e[1]if e then c[d]=e b=a[3];else b=b+1;end;end;b=b+1;end;end;A,B=l(o(k))if not A[1]then local a=h[7][b]or'?'error('ERROR IN IRONBREW SCRIPT [LINE '..a..']:'..A[2])else return g(A,2,B)end;end;end;return m(k(),{},p())();