White Arrow

White Arrow

An endless asteroids clone where the screen progressively fills with more and more rocks!

Your weapon upgrades every 4th level, and more asteroids spawn in when your level increases (1 extra rock with each new level).

The ship's hitbox is 1x1 (shown by the pixel in the middle of the ship) and there's no momentum so you can do some dodging.

Left and Right
Rotate shipUp
Move ship forwardX
Fire

In 1024 compressed bytes for the PICO-1K Jam 2022 https://itch.io/jam/pico-1k-2022

pl={0,4,8,8,6,4,8,0,0,4} rk={1,1,4,0,7,2,8,4,7,6,4,8,1,7,0,4,1,1} function rks(s,n,x,y) if #r<200 then for i=1,n do if x==nil then a=rnd(160) b=(rnd(2)\2)*160 o=rnd{{a,b},{b,a}} x=o[1] y=o[2] end add(r,{x=x,y=y,t=r, s=s,a=rnd(),d=rk, h=1,v=.3+rnd()}) end end end function draw(m,c) for a in all(m) do o=a.d t=a.a if (a.t==r) t+=ra sa,ca=sin(t),cos(t) for i=1,#o,2 do x=(o[i]-4)*a.s y=(o[i+1]-4)*a.s m=x*sa-y*ca+a.x n=x*ca+y*sa+a.y if (i>1) line(k,l,m,n,c) k,l=m,n end end end function move(m) for a in all(m) do a.x=(a.x-sin(a.a)*a.v+8)%160-8 a.y=(a.y-cos(a.a)*a.v+8)%160-8 if (a.t==f or a.t==g) a.h-=1 end end function kill(m) for a in all(m) do if (a.h==0) del(m,a) end end function coll(m,n) for a in all(m) do for b in all(n) do if a.h and b.h>0 then x=a.x-b.x y=a.y-b.y if x*x+y*y<a.s*a.s*8 then a.h=0 b.h=0 if a.t==r then ?"\a1dad" sco+=1 add(g,{x=a.x,y=a.y,t=g,s=a.s*.5,v=1.5,h=5,d=rk,a=-a.a}) add(g,{x=a.x,y=a.y,t=g,s=a.s*.5,v=1.5,h=5,d=rk,a=a.a}) if (a.s>1) rks(a.s-1,5-a.s,a.x,a.y) end end end end end end function _init() r={} f={} g={} p={x=64,y=64,a=0,s=1.5,v=1.5,h=1,d=pl} sco=0 lsco=10 sta=1 lev=1 tic=0 cd=0 ra=0 rks(3,4) sfx(-1,-2) ?"\a2shl08d0..d..c#." ?"\a3syl0wf1efad.fefad.c#.e.fefad.fefaa#agfec#" end function _update() if sta==1 then if (btn(0)) p.a-=.025 if (btn(1)) p.a+=.025 if (btn(2)) move({p}) if btn(5) and tic>=cd then cd=tic+8 ?"\a0d2ad" l=lev\4/2 for i=-l,l do add(f,{x=p.x,y=p.y,t=f,s=.3,v=4,h=20,d=pl,a=p.a+i*.1}) end end move(r) move(f) move(g) coll(r,f) coll(r,{p}) kill(r) kill(f) kill(g) if (p.h==0) then sta=2 ?"\a3sfl08bfd" end if sco>lsco then lev+=1 lsco+=lev*6 rks(3,lev) end ra+=.025 end if sta==2 then p.s-=.025 p.a+=.025 if (p.s<.025) sta=3 end if (sta==3 and btn(5)) _init() tic+=1 end function _draw() cls(1) draw(g,2) draw(r,12) draw(f,9) pset(p.x,p.y) draw({p},8-sta%2) if (sta==3) ?"game over!\npush x\n",48,48 ?"score:"..sco ?"lev:"..lev end