Base Raiders | Gun Mod

--[[
	Made by Megumu#8008
	<3
]]

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