MOUSE command CLICK type

[Giancarlo]

Hello Carlos,
thanks for your feedback. In reality i tried to work with MOUSE since i tried to work with the WAIT(-1) command with no luck as well.
With WAIT i am able to detect the menu Keys, the CLICK, but i am not able to detect the MOVE (the direction of MOVE) since i'd like to understand where the user is moving the finger...

Another code snippet...

Code:



EXPORT SoftMenu_TOUCH_2_TEST()
BEGIN
 //STARTVIEW(−1);
 DRAWMENU("ONE","TWO","THREE","FOUR","FIVE","SIX");
 LOCAL inp, ret:=1;

 WHILE ret≠0 DO
   inp:=WAIT(-1);
   IF TYPE(inp)≠6 
     THEN RETURN inp; //RETURN KEY CODE
     ret:=0;
   ELSE  //TOUCH SECTION
     CASE
       IF inp(1)==1 THEN RETURN B→R(inp); ret:=0; END;
       IF inp(1)==3 THEN //CLICK
         IF inp(3)>#220d THEN 
            RETURN (1+IP(inp(2)*6/320));
            ret:=0;
         ELSE
           RETURN "CLICK UPPER AREA"; 
           ret:=0;
         END;
       END;
     DEFAULT
     END;  // END OF CASE (TOUCH)
   END;    // END OF IF TYPE
 END;      // END OF WHILE
END;

Thanks

Giancarlo