bad fireworks alt

Z and X launch more bad fireworks! alt fireworks are 'drippier' then the original

-- bad fireworks alt -- alexthescott -- 8/24/21

p={137,142,143,135,141,13} pal(p,1)

-- contrived oop function add_splash() local b={}

b.c=2+(rnd(3)\1)*2
b.sr=0
b.br=1
b.bv=0.25
b.bm=(1+rnd(4)\1)*3
b.x=rnd(128)
b.y=rnd(128)

b.update=function(s)
	s.sr+=1
	if s.br>s.bm then
		s.bv=-0.25
	elseif s.br<=0 then
		s.bv=0
	end
	s.br+=s.bv
end

b.draw=function(s)
	circ(s.x,s.y,s.sr,b.c)
	if s.bv!=0 then
		circfill(s.x,s.y,s.br,b.c)
	end
end

b.destroy=function(s)
	if s.bv==0 and s.sr>181 then
		del(splash,s)
	end
end

add(splash,b)

end

-- set btn delay poke(0x5f5d, 30)

splash={} add_splash()

cls() ::♥:: -- burn pixels for p=0,2048 do px=rnd(128) py=rnd(128) pc=pget(px,py) if pc!=0 and pc%2==0 then if rnd(2)\1==0 then pset(px,py+1,pc) pset(px,py+2,pc) end pset(px,py,pc-1) else pset(px,py,0) end end

if t()<2 then print("bad fireworks alt",30,64,1) else

-- little boom
if t()%3==0 then
	add_splash()
end

-- 40 sec 'big' boom
if t()%40==0 then
	for i=1,10 do
		add_splash()
	end
end

-- diy boom
if btnp(4) or btnp(5) then
	add_splash()
end

-- object loop
for s in all(splash) do
	s:draw()
	s:update()
	s:destroy()
end

end flip() goto ♥