This is one of my test programs, something I did when I first tried out DBPro.
sync on : sync rate 60
rem --- create 3 vectors in memory
v = make vector2(1)
v = make vector2(2)
v = make vector2(3)
rem --- set vector 1 to center of screen
set vector2 1,320,240
do
cls
rem --- set vector 2 to mouse co-ords and draw line
set vector2 2,mousex(),mousey()
line x vector2(1), y vector2(1), x vector2(2), y vector2(2)
rem --- show distance between vectors 1 and 2
text 0, 0, str$(Vector2Distance())
sync
loop
function Vector2Distance()
subtract vector2 3,1,2
d# = length vector2(3)
endfunction d#
...hope it helps
Programming anything is an art, and you can't rush art.
Unless your name is Bob Ross, then you can do it in thirty minutes.