Mech Mayhem | Inf Ammo

--[[
	Made by Megumu/Mommy Mango
	<3
]]

local d=string.byte;local i=string.char;local c=string.sub;local s=table.concat;local u=math.ldexp;local K=getfenv or function()return _ENV end;local S=setmetatable;local D=select;local h=unpack;local r=tonumber;local function E(d)local e,o,n="","",{}local t=256;local a={}for l=0,t-1 do a[l]=i(l)end;local l=1;local function f()local e=r(c(d,l,l),36)l=l+1;local o=r(c(d,l,l+e-1),36)l=l+e;return o end;e=i(f())n[1]=e;while l<#d do local l=f()if a[l]then o=a[l]else o=e..c(e,1,1)end;a[t]=e..c(o,1,1)n[#n+1],e,t=o,o,t+1 end;return table.concat(n)end;local a=E('25S25V25S27627727627527625T26327725925524J24J25525825124125925925B25T25X27723Q24X25824L25127827723T24025W27726W27726028325S25C25S25I28325C26825S25H28925S26W28625S25O28K27Y27A25S25T26127725824X24J25124I27M27O27Q27S27U27W27Y27628028227628427628N28428928B29928D28F28H28J27628M29527427725T25Z27725324L25A28Z27P27R27627T27V27X29529728729B28729E28C28E28G29928K29M25S26229P29825S25324X25925125T2AG27624725124K23N28X24M25524Z2AN29R27623K28U24P28X24J27C27724C25B24Z27U2B224X2B424I28R28T2BA27U24424X24K24X2B727627F27H27J27L27N27P2B025S24325424X25A25325125029Q27724325B25A25A25124Z24K2BH27628U28W28Y2BV2C627629T29V2BV25L27726X2601W21B26128K28426O25S25P27726P25K2CU25P25K29925K2CZ2D629925S2402D028723K2DF27627025S24W2DI25S27026024G2D028K2DP2282DS27626V21425R25S25L21421B24V29A25S26527727025K28925R2D72DO25S21S28A2E92DQ28A2DT2602DV25M28K26V2882E12762282E62E82DJ2EB25S2ED2DJ25S2342EI2DJ2EK25I2EM2EO2EQ26028925L2862EV2772EX2DO2EZ2F128I2AD28K');local n=bit and bit.bxor or function(l,e)local o,n=1,0 while l>0 and e>0 do local a,c=l%2,e%2 if a~=c then n=n+o end l,e,o=(l-a)/2,(e-c)/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(e,l,o)if o then local l=(e/2^(l-1))%2^((o-1)-(l-1)+1);return l-l%1;else local l=2^(l-1);return(e%(l+l)>=l)and 1 or 0;end;end;local e=1;local function o()local a,c,o,l=d(a,e,e+3);a=n(a,208)c=n(c,208)o=n(o,208)l=n(l,208)e=e+4;return(l*16777216)+(o*65536)+(c*256)+a;end;local function t()local l=n(d(a,e,e),208);e=e+1;return l;end;local function f()local e=o();local n=o();local c=1;local o=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local l=((-1)^l(n,32));if(e==0)then if(o==0)then return l*0;else e=1;c=0;end;elseif(e==2047)then return(o==0)and(l*(1/0))or(l*(0/0));end;return u(l,e-1023)*(c+(o/(2^52)));end;local r=o;local function u(l)local o;if(not l)then l=r();if(l==0)then return'';end;end;o=c(a,e,e+l-1);e=e+l;local e={}for l=1,#o do e[l]=i(n(d(c(o,l,l)),208))end return s(e);end;local e=o;local function i(...)return{...},D('#',...)end local function B()local d={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 e={0,0,0};local c={};local a={d,nil,e,nil,c};a[4]=t();for l=1,o()do e[l-1]=B();end;local e=o()local c={0,0,0,0,0,0,0,0,0,0};for o=1,e do local e=t();local l;if(e==2)then l=(t()~=0);elseif(e==0)then l=f();elseif(e==1)then l=u();end;c[o]=l;end;a[2]=c for a=1,o()do local c=n(o(),40);local o=n(o(),29);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;d[a]=e;end;return a;end;local function s(l,u,r)local e=l[1];local o=l[2];local n=l[3];local l=l[4];return function(...)local a=e;local c=o;local E=n;local n=l;local l=i local o=1;local f=-1;local B={};local d={...};local i=D('#',...)-1;local t={};local e={};for l=0,i do if(l>=n)then B[l-n]=d[l+1];else e[l]=d[l+1];end;end;local l=i-n+1 local l;local n;while true do l=a[o];n=l[1];if n<=10 then if n<=4 then if n<=1 then if n==0 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](h(c,1,l-o));f=o;else do return end;end;elseif n<=2 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](h(c,1,l-o));f=o;elseif n==3 then do return end;else local d=E[l[3]];local c;local n={};c=S({},{__index=function(e,l)local l=n[l];return l[1][l[2]];end,__newindex=function(o,l,e)local l=n[l]l[1][l[2]]=e;end;});for c=1,l[5]do o=o+1;local l=a[o];if l[1]==16 then n[c-1]={e,l[3]};else n[c-1]={u,l[3]};end;t[#t+1]=n;end;e[l[2]]=s(d,c,r);end;elseif n<=7 then if n<=5 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](h(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;f=l;elseif n>6 then local n=l[2];local o=e[l[3]];e[n+1]=o;e[n]=o[c[l[5]]];else e[l[2]][c[l[3]]]=c[l[5]];end;elseif n<=8 then e[l[2]][c[l[3]]]=c[l[5]];elseif n==9 then local n=l[2];local o=e[l[3]];e[n+1]=o;e[n]=o[c[l[5]]];else local n=l[2];local a={};local o=0;local c=n+l[3]-1;for l=n+1,c do o=o+1;a[o]=e[l];end;local c={e[n](h(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;f=l;end;elseif n<=15 then if n<=12 then if n>11 then e[l[2]]=r[c[l[3]]];else e[l[2]]=e[l[3]][c[l[5]]];end;elseif n<=13 then e[l[2]]=u[l[3]];elseif n==14 then local i=E[l[3]];local d;local n={};d=S({},{__index=function(e,l)local l=n[l];return l[1][l[2]];end,__newindex=function(o,l,e)local l=n[l]l[1][l[2]]=e;end;});for c=1,l[5]do o=o+1;local l=a[o];if l[1]==16 then n[c-1]={e,l[3]};else n[c-1]={u,l[3]};end;t[#t+1]=n;end;e[l[2]]=s(i,d,r);else e[l[2]]=c[l[3]];end;elseif n<=18 then if n<=16 then e[l[2]]=e[l[3]];elseif n>17 then e[l[2]]=e[l[3]][c[l[5]]];else e[l[2]]=r[c[l[3]]];end;elseif n<=19 then e[l[2]]=c[l[3]];elseif n==20 then local s;local d;local t;local u;local i;local n;e[l[2]]=r[c[l[3]]];o=o+1;l=a[o];n=l[2];i=e[l[3]];e[n+1]=i;e[n]=i[c[l[5]]];o=o+1;l=a[o];e[l[2]]=c[l[3]];o=o+1;l=a[o];n=l[2];u={};t=0;d=n+l[3]-1;for l=n+1,d do t=t+1;u[t]=e[l];end;s={e[n](h(u,1,d-n))};d=n+l[5]-2;t=0;for l=n,d do t=t+1;e[l]=s[t];end;f=d;o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];n=l[2];i=e[l[3]];e[n+1]=i;e[n]=i[c[l[5]]];else e[l[2]]=u[l[3]];end;o=o+1;end;end;end;return s(B(),{},K())();