need some help with mousewhere

[darkdude749]

I'm making a simple program but I'm stuck on it!!! This is what i need:
- When the mouse is not in motion i need a filled oval to start from where the mouse is and keep growing outward
- When the mouse is in motion i want the oval to disappear and start over again from the beginning when the mouse stops moving

This is what I have so far... If someone could just tell me what i'm missing that would be great!!!

code:

View.Set ("offscreenonly") View.Set ("nocursor") colourback (255) buttonchoose ("singlebutton") var button : int var x : int var y : int loop     for z : 1 .. maxx         mousewhere (x, y, button)         drawfilloval (x, y, z, z, 31)         View.Update         delay (20)         cls     end for     cls end loop

CODE TAGS. HOLY SHIT CODE TAGS. GREEN TEXT? NO, USE CODE TAGS.

I MEAN COME ON.

The answer is probably going to be something that's going to make me go "oh my god i'm such an idiot"

[Nick]

have an oldx and oldy varible

code:

if x not = oldx or oldy not = y then exit else drawfilloval (yadda yadda) endif oldx:=x oldy:=y

[Zampano]

On a side note is there any way to waive the other results to mousewhere. Suppose I didn't want to have to use more variable than necessary, and thence didn't want anything to do with the mousewhere. What then?

[Clayton]

What exactly are you asking? Slow down for a second and try and explain your problem so we can understand it.

[Zampano]

Sorry.
The question I'm asking concerns the fact that mouse.where returns threee variable: x, y, and buttons. If I don't really need to know if the button clicks are entered, and just x and y, is there a way to waive that feature so that I don't need to occupy an extra integer variable with the butto clicks information? Last time I amateurishly created a new variable just so I wouldn't get the error message.

[Clayton]

Well.... no there isn't. You're going to have to create that extra variable to hold that "useless" value.

[darkdude749]

Thanks momop i got it working now
this is what it looks like now:

code:

View.Set ("offscreenonly") View.Set ("nocursor") colour (31) colourback (255) cls buttonchoose ("singlebutton") var button : int var x : int var y : int var oldx : int := 0 var oldy : int := 0 loop     for z : 1 .. 1000000         mousewhere (x, y, button)         if x = oldx and y = oldy then             put "Move your mouse around the screen."             drawfilloval (x, y, z, z, 31)             View.Update             delay (10)             cls         else             exit         end if     end for     oldx := x     oldy := y end loop