-- Sweetie16
-- title: fire 2
-- author: potato imaginator
-- desc: Fire Ball 2
-- script: lua
n=math.random(20,30)
br=4
bx=math.random(br,240-br)
by=math.random(br,136-br)
bdx=3*(-1+2*math.random(0,1))/4
bdy=3*(-1+2*math.random(0,1))/4
f={}
for i=1,n do
f[i]=
{x=bx+math.random(-4,4),
y=by+math.random(-4,4),
r=math.random(2,5)}
end
function upd(x1,y1)
for i=1,#f do
f[i].r=f[i].r-1/10
if f[i].r<=0 then
f[i]={x=x1+math.random(-4,4),
y=y1+math.random(-4,4),
r=math.random(2,5)}
end
end
end
function draw(v)
for i=1,#f do
circ
(f[i].x,f[i].y,2*f[i].r,4-f[i].r//2+v)
circb
(f[i].x,f[i].y,2*f[i].r,3-f[i].r//2+v)
end
end
function TIC()
cls()
rectb(0,0,120,136,1)
rectb(120,0,120,136,8)
if bx
240-br then
bx=240-br
bdx=-bdx
end
if by
136-br then
by=136-br
bdy=-bdy
end
bx=bx+bdx
by=by+bdy
clip(0,0,120,136)
draw(0)
circ(bx,by,br,1)
clip(120,0,120,136)
draw(7)
circ(bx,by,br,8)
clip()
upd(bx,by)
end
>
0 2TvͫgE#2Tv2Tv0 ,]']>S}Wup8d%qy)6o;]AsVl3