Containment

you. must. contain. It.

Left and Right cursor to move

Z to fire

you win if the It can no long spread

you gain points for each blue pixel.

you lose if the It touches you.

d={{-1,0},{1,0},{0,-1},{0,1}}cls(1)
r=rnd
v=pset
g=pget
for i=0,7 do
v(r(127),r(63),2)end
b,n=63,127::_::m=1j=16129
for y=0,127 do
for x=0,127 do
local p=g(x,y)
if p!=1then
j-=1
if p==2then
f=r(d)if g(x+f[1],y+f[2])==1then
if r()>.9 then
v(x+f[1],y+f[2],3)end
m=e
end
elseif p==3then
v(x,y,2)
elseif p==9then
v(x,y,1)
if g(x,y-1)==2then
circfill(x,y,4,7)else
v(x,y-1,9)end   
end
end
end
end
if (m or g(b,n)==2)goto a
v(b,n,1)
if (btn(0))b-=1
if (btn(1))b+=1
v(b,n,7)
if (btnp(4))v(b,n,9)
flip()goto _
::a::
cls()
if m then
?"score "..j
else
?"game over"
end