Mouse buffer?

[MysticVegeta]

I cant help but have this thing really **** me off.

code:

loop      mousewhere (x, y, z)      if z = 1 then            put "crap"      end if      if z = 1 then            put "crap2"      end if end loop

Hmm, it seems to output:

crap
crap2
crap
crap2
crap
crap2

But, I want to clear the mouse buffer asa it enters one of the if structures so that it doesnt enter the second one. I know Input.Flush clears the keyboard buffer, is there some sort of command for the mouse one, I cant seem to find it. or do I have to recreate it? Thanks for the hep guys

[Mazer]

Maybe you should look up the other mouse commands (mousebuttonmoved or something like that), and check for a click and release of the button instead of just checking if it's pressed.

[[Gandalf]]

I don't get your problem... If you don't want the second if structure to be entered, then why have the second if z = 1 then there in the first place?

[NikG]

With that code, your output will always be crap crap2 crap crap2...
Think about it, the z value only gets updated in the mousewhere proc (use Mouse.Where btw). So once it notices a click, the z will be 1 so both if statements will always be true until mousewhere turns it back to 0.

Now as far as a buffer, I believe there isn't one. As mazer suggested, look up Mouse.ButtonMoved and/or Mouse.ButtonWait

[NikG]

(sorry for the double post)

Another solution (although this doesn't help with your 2 ifs) is to add another variable which prevents holding the mouse button down:

code:

var x, y, z, z2 : int z := 0 loop     z2 := z     mousewhere (x, y, z)     if z = 1 and z2 = 0 then         put "crap"     end if     % if z = 1 then     %     put "crap2"     % end if     delay (100)     cls end loop

(Note: code untested)

[Windsurfer]

Or, you could make a function.

code:

function MouseClicked : boolean     var x, y, z : int     Mouse.Where (x, y, z)     if z = 1 then         result true     else         result false     end if end MouseClicked

You can use the above function by simply making an if statement, where it will procede to (essentially) clear the mouse buffer and find out if a button is being pressed.

[MysticVegeta]

Ok, Heres a better explanation of the problem, I know the first one was crappy.

Here is the mousewhere in the form of keyboard input.

code:

loop     if hasch then         put "crap"         %Input.Flush     end if     if hasch then         put "crap2"        %Input.Flush     end if end loop

same output, crap, crap2, crap, crap2.....

Uncommment Input.Flush. Even though both if's are same "if hasch then". It only enters one of them. Thats what I want for the mousewhere. But this problem is no concern to me now, I used booleans to do it instead.

[Mazer]

May I ask what this is for? Like, a game, maybe?

[MysticVegeta]

Yes thats correct. Its for chess. I needed that because once when you click a piece, it gets selected, the next time to click on the location it can move, it moves there, but it used to enter both of the statements at the same time. I didnt want to create one more loop inside the first if, so I wondered about mouse buffer, but I accomplished the task using booleans instead.

[[Gandalf]]

Which really is the right way of going about things...
A proper loop structure takes input from each source once per iteration, same as with View.Update, delays, and all those other things. The performance of your if hasch then... if hasch then... example would highly depend on the speed at which each section was executed. You should be looking for more control over your programs flow.

Chess? Aww shucks. I should spiff mine up and release it before it doesn't seem like anything special.

[Cervantes]

Guys, slow down a minute. Take a step back; look at the original question.

MysticVegeta wrote:

I cant help but have this thing really **** me off.

code:

loop      mousewhere (x, y, z)      if z = 1 then            put "crap"      end if      if z = 1 then            put "crap2"      end if end loop

Hmm, it seems to output:

crap
crap2
crap
crap2
crap
crap2

But, I want to clear the mouse buffer asa it enters one of the if structures so that it doesnt enter the second one. I know Input.Flush clears the keyboard buffer, is there some sort of command for the mouse one, I cant seem to find it. or do I have to recreate it? Thanks for the hep guys

We want to make it so that the button is no longer clicked, in essence. The button is not down when z = 0. So, set z to zero.

code:

var x, y, z : int loop     mousewhere (x, y, z)     if z = 1 then         put "crap"         z := 0     end if     if z = 1 then         put "crap2"     end if end loop

z is just a variable. We have complete control over it.

No need to use hope for fancy things like a mouse version of Input.Flush.

[Mazer]

I'm more concerned with the reason it's being used. Consider the following (/me does Bill Nye head shaking thing)

code:

loop     if hasch then         delay (1500)         put "asd"     end if end loop

If you press a key once, it will output "asd" every ~1.5 seconds. That's what Input.Flush is for. It will clear the buffer, so that next time you go through the loop, you aren't worrying about whether a key was pressed last time.

code:

loop      mousewhere (x, y, z)      if z = 1 then            put "crap"      end if      if z = 1 then            put "crap2"      end if end loop

To me, it doesn't really make sense to want to clear a buffer. You can't possibly expect somebody to press a mouse button only from the mousewhere line to the end of the first if statement. Of course, I don't know if MysticVegeta's program looked anything like that, it's just the example that, uh... it... Hey, Delos! I need a word for "bothered!"

But anyways, I guess the problem is already solved.

[Delos]

/me shakes head...

"irked", "inflamed", "jived", "beset", "annoyed", "badgered", ("badger badger badger badger badger badger badger badger badger badger badger badger mushroom mushroom"), "molested", "perturbed", "ingratiated", "pested", "follied", "upset", "ruffled", "flustered", "troubled", "mentally fondled"...

Take your pick.

[Mazer]

Y'know, I was thinking "irked" when I wrote the post, but I like "ruffled" better. Thanks!

PS: I'm fairly certain you've got an extra "badger" in there. I'll check again, but IIRC the ratio is eleven badgers to two mushrooms. (Can't remember the badger/mushroom to snake ratio, though).

[MysticVegeta]

Cervantes wrote:

Guys, slow down a minute. Take a step back; look at the original question.

MysticVegeta wrote:

I cant help but have this thing really **** me off.

code:

loop      mousewhere (x, y, z)      if z = 1 then            put "crap"      end if      if z = 1 then            put "crap2"      end if end loop

Hmm, it seems to output:

crap
crap2
crap
crap2
crap
crap2

But, I want to clear the mouse buffer asa it enters one of the if structures so that it doesnt enter the second one. I know Input.Flush clears the keyboard buffer, is there some sort of command for the mouse one, I cant seem to find it. or do I have to recreate it? Thanks for the hep guys

We want to make it so that the button is no longer clicked, in essence. The button is not down when z = 0. So, set z to zero.

code:

var x, y, z : int loop     mousewhere (x, y, z)     if z = 1 then         put "crap"         z := 0     end if     if z = 1 then         put "crap2"     end if end loop

z is just a variable. We have complete control over it.

No need to use hope for fancy things like a mouse version of Input.Flush.

You, my friend, are a genius! What the hell was I thinking? LOL, completely didnt look at the part where I could set it back to 0. I always thought of those variables as pointers and couldnt be changed (like the arguments of the functions, we cant change them once we are inside the fucntion, although in other langs we can) This gets me rid of a 4 line long if structure and a boolean! woot more memory free! Thanks a lot, I never thought of it that way, I am still shocked, O_O.