Post Reply 
MOUSE command problem (FW 2.1.14730)
08-08-2023, 07:58 PM (This post was last modified: 08-09-2023 04:25 PM by matalog.)
Post: #4
RE: MOUSE command problem (FW 2.1.14730)
Does this work as you wanted it to?

Code:
EXPORT pointer2()
BEGIN
LOCAL m,o;
 REPEAT
m:=MOUSE();
o:=m(1)+0;
IF size(o)>0 THEN
   RECT();
  TEXTOUT_P("x= "+o(1),0,30);
  TEXTOUT_P("y= "+o(2),0,60);
END;
WAIT(-1);
UNTIL ISKEYDOWN(4);
END;

edit: Oh, I see you didn't want a Wait(-1).
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
RE: MOUSE command problem (FW 2.1.14730) - matalog - 08-08-2023 07:58 PM



User(s) browsing this thread: 1 Guest(s)