Compressed Bytes used
1021

Source Code (OPTIONAL)
e=64d=120f={}i=0o=0r={}h=0a=0s=3n=0u=0c={}m=0l={}
function g(n,e,d)
rectfill(n-2,e-3,n+1,e-1,d+8)
rect(n-4,e,n+3,e,d+8)
rectfill(n-2,e,n+1,e+2,d)
pset(n-2,e+3,d)
pset(n+1,e+3,d)
pset(n-2,e-2,d)
pset(n,e-2,d)
end
::d::
cls(5)
?"select game mode",32,50,12
?"press ❎ for level\nand 🅾️ for endless"
if(btn(❎))n=1
if(btn(🅾️))n=2
if(n==0)flip()goto d
::n::
i+=1e=64d=120f={}r={}c={}
if(rnd(5)<=1)add(l,{x=rnd(100)+14,y=rnd(82)+14})
for n=0,i-1do
add(f,{x=rnd(100)+14,y=rnd(82)+14,s=flr(rnd(i)/5)+1})
end
for n=0,rnd(i*2)do
add(c,{x=rnd(100)+14,y=rnd(82)+14})
end
for n=0,rnd(3)do
add(r,{x=rnd(100)+14,y=rnd(82)+14})
end
::f::
cls(5)
for n=0,15do
for e=0,15do
rectfill(e*8,n*8,e*8+8,n*8+8,6)
rect(e*8+1,n*8+1,e*8+6,n*8+6,13)
end
end
rectfill(8,8,119,119,5)
rectfill(0,0,50,16,8)
rectfill(56,0,72,16,6)
line(56,4,72,4,1)
line(56,8,72,8,1)
line(56,12,72,12,1)
?"lzr="..o
?"scr="..a
if(e>56 and e<72 and d<16) then
goto n
else?count(f).." enemies"
end
foreach(c,function(n)
rectfill(n.x-4,n.y-4,n.x+4,n.y+4,3)
if(abs(n.x-e)<3and abs(n.y-d)<3)h=1
end)
foreach(f,function(n)
if(n.x>e and n.y>d)n.x-=n.s n.y-=n.s
if(n.x<e and n.y>d)n.x+=n.s n.y-=n.s
if(n.x>e and n.y<d)n.x-=n.s n.y+=n.s
if(n.x<e and n.y<d)n.x+=n.s n.y+=n.s
if(n.x>e and n.y==d)n.x-=n.s
if(n.x<e and n.y==d)n.x+=n.s
if(n.y>d and n.x==e)n.y-=n.s
if(n.y<d and n.x==e)n.y+=n.s
if(btnp(❎) and abs(e-n.x)<=18and abs(d-n.y)<=18)del(f,n)
if(btnp(🅾️) and (abs(n.x-e)<=8or abs(n.y-d)<=8))del(f,n)a+=1
g(n.x,n.y,3)
if(abs(n.x-e)<2and abs(n.y-d)<2)h=1
end)
foreach(r,function(n)
circ(n.x+2,n.y,1,7)
circ(n.x+2,n.y-1,1,7)
rect(n.x-4,n.y,n.x+2,n.y-1,4)
rect(n.x-4,n.y-2,n.x-4,n.y+1,6)
if(abs(n.x-e)<8and abs(n.y-d)<8)o+=1del(r,n)
end)
foreach(l,function(n)
?"♥",n.x,n.y,8
if(abs(n.x-e)<4and abs(n.y-d)<4)s+=1del(l,n)
end)
if(btn(⬇️))d+=2
if(btn(⬆️))d-=2
if(btn(⬅️))e-=2
if(btn(➡️))e+=2
if(btnp(❎))circfill(e,d,16,6)
if btn(❎) then
u+=1
if(u>30)a=-1
else u=0
end
if(btnp(🅾️)and o>0)rectfill(e-128,d-2,e+128,d+2,6)rectfill(e-2,d-128,e+2,d+128,6)o-=1
g(e,d,7)
e=min(e,116)e=max(e,12)d=min(d,116)d=max(d,12)
if(h==1)i-=2s-=1h=0flip()goto n
::e::
if s==0 then
cls(8)
?"you died",40,48
?"to restart you\nmust reset"
?"score ="..a
flip()goto e
end
if i>9and n==1 then
cls(11)
?"you win",40,48
?"to restart you\nmust reset"
?"score ="..a
flip()goto e
end
flip()goto f