mode(0)f={}u={143,143,129,144,144}
function p(i)f[i]={x=40-rnd(80),y=15-rnd(30),z=rnd(5)}end
for i=0,50 do p(i) end
function update()cls()for i=0,50 do 
f[i].z=f[i].z-0.05 y=f[i].z
m=40+f[i].x/y n=15+f[i].y/y
if m<0 or n<0 or m>79 or n>29 or y<=0 then p(i)end
print(chr(u[flr(f[i].z)+1]),m,n)end end