Painter

A game inspired on the classic Slap Dab for the ZX Spectrum. Only 559 chars of code, so it fits in 2 tweets. Due to reaching 560 char limit, many features have been removed. But hey, there's still a room you have to paint, angry monsters that spawn close to you and chase you. Monsters can only move over painted tiles. Have fun!

::s::w=68
::w::s,x,y,m,n,z,t,k,j=0,7,7,16,16,{},0,btnp,mget
reload()pal(0,8)palt(0,false)w-=8
::_::cls(1)t+=1
if(s>255)goto w
if(t==2*w)add(z,{x=m,y=n})t=0
if(t==w)m,n=x,y
map()
if(k(0))x-=1
if(k(1))x+=1
if(k(2))y-=1
if(k(3))y+=1
x,y=mid(x,15),mid(y,15)
?"웃",8*x,8*y
for o in all(z) do
u,v=o.x,o.y
a,b=x-u,y-v
c,d=abs(a),abs(b)
if(c+d<1)goto s
if t%15<1 then
e,f=u+sgn(a),v+sgn(b)
if c<d then
if(j(e,v)>0)u=e
if(j(u,f)>0)v=f
else
if(j(u,f)>0)v=f
if(j(e,v)>0)u=e
end
end
o.x,o.y=u,v
?"🐱",8*u,8*v
end
if(j(x,y)<1)mset(x,y,1)s+=1
?"🅾️",8*m,8*n
?s,0,0
flip()goto _