GETKEY

[matalog]

Am I using GETKEY wrong here? Why does each keypress not get registered?

Code:

EXPORT Keytest
BEGIN
  LOCAL K:=0;
  LOCAL X:=0;
  LOCAL Y:=0;
  RECT_P();
REPEAT
  K:=GETKEY;
  IF K>(-1) THEN
    TEXTOUT_P(K,X,Y);
    X:=X+16;
      IF X>300 THEN
      Y:=Y+20;
      X:=0;
      END;
  END;
UNTIL ISKEYDOWN(4)=1;
END;