I need a bit of scary maths stuff here. Have a look at this image:
 What I want to do is decrease the speed quicker the lower it gets. Currently, what I have is a gradual drop-off speed as shown by the RED in the image. Code example:
' speed drop-off
Const sw=640,sh=480
Graphics sw,sh,0
SetColor $fc,$30,$20
Local speed#=460.0
Local x%
Repeat
speed:/1.009
x:+1
DrawLine x,sh-speed,x,sh
Until speed<1
Flip
WaitKey
End
What I want to achieve is something like the BLUE indicates. That is, the slower the speed is, the quicker the decelleration. Think of a snooker ball and how its slows down quicker because of the friction of the felt. My example feels too linear. Any ideas?
|