Skip to main content

On Sale: GamesAssetsToolsTabletopComics
Indie game storeFree gamesFun gamesHorror games
Game developmentAssetsComics
SalesBundles
Jobs
TagsGame Engines

Love the shake effect!

I think you could make this even smaller. Hope you don't mind, but I fiddled around with the code a bit, and got the core drawing area to ~260-chars.

p=6060
i=0
f=rectfill
::r::
f(0,0,127,127,8)
f(6,15,121,101,5)
f(7,16,120,100,6)
::_::
if(btn(0))p-=1
if(btn(1))p+=1
if(btn(2))p-=114
if(btn(3))p+=114
if(btnp(5))i=15
i-=1
flip()
if (i>=0) camera(i/2-rnd(i),i/2-rnd(i)) goto r
i=0
camera(0,0)
pset(7+p%114,16+(p\114)%85,1)
goto _

I think with some bitmasking fun, the btn calls could be compressed even further, if you wanted to try to turn this into a Pico-1/4k demo :)

Absolutely, fiddle away! I don't mind at all. I'm sure it's possible to make this much smaller, and I'll learn more too. ☺️

(+1)

Was looking at some of the other entries, and saw the btn-parsing code in WeeblBull's1k-dailhex. Using that, and adding back in the label text, it still Shinko-8s into 264 characters, a tweetcart! 

x=56
y=42
i=0
f=rectfill
::r::
f(0,0,127,127,8)
f(6,15,121,111,5)
f(7,16,120,110,6)
?"\^wpic-o-sketch",17,4,10
?"⬅️➡️⬆️⬇️:draw 🅾️:clear",18,120,10
::_::
b=btn()
x+=b\2%2-b%2
y+=b\8%2-b\4%2
i|=b&16
i-=1
flip()
if (i>=0) camera(i/2-rnd(i),i/2-rnd(i)) goto r
i=0
pset(7+x%114,16+y%95,1)
goto _

Switched to the "o" button instead of the "x"  button for the clear input, since its place in the btn() bitfield is 16, just one off from the number of frames for the shake, so I didn't need a separate constant for that.

Other big difference between this and yours, is that I'm use modular arithmetic instead of mid to constrain things to the field. Saves a few characters.

That's fantastic! And shake animation is even better.