Compressed Bytes used
781

Source Code (OPTIONAL)
-- jelly 1k
-- by holo
local n,d,e={e=60,d=60,o=0,f=0,i=0,t=0},{},{5,10,15,20}function _init()pal(1,129,1)pal(2,131,1)pal(4,141,1)l()f(1,2)i(1,2)f(2,3)i(2,3)f(3,4)i(3,4)f(4,5)i(4,5)for n=1,150do d[n]={c=rnd{2,2,2,2,4,4,4,6,6,8},e=rnd(255)-64,d=rnd(255)-64,t=rnd(e)}end end function _update60()if(n.i>0)f(0,14)i(0,0)r(14)else f(0,12)r(0)i(0,12)
n.i-=1n.o=abs(n.o)>.03and n.o*.98or 0n.f=abs(n.f)>.03and n.f*.98or 0if(btn(⬅️))n.o=c(n.o,-1)
if(btn(➡️))n.o=c(n.o,1)
if(btn(⬆️))n.f=c(n.f,-1)
if(btn(⬇️))n.f=c(n.f,1)
if(n.o+n.f>5)n.o*=5/(n.o+n.f)n.f*=5/(n.o+n.f)
if(n.t>0)n.t-=1else n.t=rnd(e)n.e+=u(8)n.d+=u(6)
n.e+=n.o n.d+=n.f if(n.e<-2or n.e>115)n.i=15n.e=min(max(n.e-n.o,0),115)n.o=-n.o
if(n.d<-1or n.d>115)n.i=15n.d=min(max(n.d-n.f,0),115)n.f=-n.f
end function _draw()rectfill(0,0,127,127,1)for n=1,150do local n=d[n]if(n.t>0)n.t-=1else n.t=rnd(e)n.e+=u(8)n.d+=u(6)
spr(0+n.c,n.e,n.d)spr(1+n.c,n.e+8,n.d)spr(16+n.c,n.e,n.d+8)spr(17+n.c,n.e+8,n.d+8)end if(t()<5)?"⁶o1ffpress ⬅️➡️⬆️⬇️ to swim",20,110,9
spr(0,n.e,n.d)spr(1,n.e+8,n.d)spr(16,n.e,n.d+8)spr(17,n.e+8,n.d+8)end function c(n,e)return n*e<0and n+.15*e or min(n+.075*e,5)end function u(n)return rnd()-.5+sin(t()/n)end function l()sset(2,2,0)sset(3,4,0)sset(4,3,0)sset(4,4,0)sset(5,5,0)end function o(n,e,d)sset(n*16+e,d)sset(n*16+8+(7-e),d)end function f(n,e)color(e)o(n,7,1)o(n,6,1)o(n,5,2)o(n,4,2)o(n,3,3)o(n,2,4)o(n,2,5)o(n,2,6)o(n,2,7)o(n,3,8)o(n,4,9)o(n,5,9)o(n,6,9)o(n,7,9)end function i(n,e)color(e)o(n,4,10)o(n,4,11)o(n,3,12)o(n,3,13)o(n,6,10)o(n,6,11)o(n,6,12)o(n,6,13)o(n,5,14)end function r(n)color(n)o(0,4,10)o(0,3,11)o(0,2,11)o(0,3,13)o(0,6,10)o(0,6,11)o(0,5,12)o(0,4,13)end