'lo.
Hmmm...I've been struggling with a simple drag/drop feature. Pretty much, the program draws a circle, checks if user is clicking the mouse, and if s/he is, it goes to a loop repositioning the circle. [I know I havent incooperated mouse position yet, I don't want to do that till this works.]
I'm probably doing something horrendously wrong.
Thanks.
sync on
sync rate 30
check:
do
circle 320,240,5
ucm=mouseclick()
if ucm=1 then goto drag
loop
drag:
do
cls
circle mouseX(),mouseY(),5
if mouseclick()<1 then goto check
loop