For fewer Ufo-bombs try this:
In the source code change (For j=0 To 399) to (For j=0 to 199)
Sub MakeUfoBomb()
iF Rand(1,40) =5
For j=0 To 399
iF Ufo(j).x >0 and Ufo(j).y >0
oBuffer Ufo(j).x,Ufo(j).y+8
End iF
Next
End iF
End Sub
further, try once SetFps 60 this is for babies.
Thanks Peter...
finaly get something to tweak...
BUT i ask again ( if is no problem) ...for me( and probably for same other to) is not easy
to know where i can add when i finish one level and next start to change
(load another) bitmap and have different types of uffos...
on this way ithink that game would be much more fun to play...
do you agree....?
you know like in old Phoenix game...
when you kill small birds then on next level you have big birds..ok?