MOUSE returns Invalid Input

[Jacob Wall]

Hi, I have just started playing with PPL myself and very much still learning the basics, however I think the alternative below should work for you?

EXPORT FOURSQUARE()
BEGIN
LOCAL mx, my, L0;
mx=-1; my:=-1;

REPEAT
RECT();
RECT_P(0,0,318,200);
RECT_P(0,201,318,218,0);
TEXTOUT_P("EXIT",130,218,3,RGB(255,255,255));
L0:=WAIT(-1);

IF SIZE(L0)>1 THEN
mx:=L0(2);
my:=L0(3);

// draw boxes here

END;

UNTIL my≥201;
RETURN "DONE";
END;

Jacob