Problem.....for Drop the ball.

[spen]

I am making game I got some problem that Drop the ball.

the player should avoid ball when the ball hit the ground.



1. So how can I drop the ball per seconds??

( The numbers of balls will be increased by time going)
1 sec = 1ball
2 sec =2 2 ball
3sec= 3 ball.......

The position of ball is from y= maxy, x = random


2. I asked this question before..but..I coludn't find the way....

How can I make movement smoothly for my character??
(same way as below program, Draw. command)

I hope u guys answer thank you~~



* the ball is an image file (bmp)
* When I use Delay command, the game is jammmed..too slow
* The character is made by Draw. Command

[Cervantes]

here's how I would do it.

code:

setscreen ("offscreenonly") var ball_time := 0 var counter := 1 var x, y, vy : array 1 .. 15 of real var draw : array 1 .. 15 of boolean for i : 1 .. 15     x (i) := Rand.Int (0, maxx)     y (i) := maxy     vy (i) := 0     draw (i) := false end for const gravity := 0.015 loop     cls     if Time.Elapsed - ball_time >= 1000 then         ball_time := Time.Elapsed         if counter >= 15 then             counter := 1         else             counter += 1         end if         draw (counter) := true     end if     for b : 1 .. 15         if draw (b) then             vy (b) -= gravity             y (b) += vy (b)             drawfilloval (round (x (b)), round (y (b)), 10, 10, black)             if y (b) < 0 then                 y (b) := maxy                 vy (b) := 0                 draw (b) := false             end if         end if     end for     View.Update     delay (10) end loop

note that it would look a bit better if you were to make the balls spawn just a little above maxy, so that the user can't actually see them materialize like they do

[spen]

Thank u so much~

It's cool~