Inside a wait loop....need normal key functionality...

[webmasterpdx]

I have a wait loop of this form...
WHILE(1) DO
e:=WAIT(-1);
if (TYPE(e)==6) THEN
// Handle mouse
ELSE
// Handle key events
IF (e==4) THEN RETURN; END; // K_Esc
END;

I want this to be a code editor, and I want to be able to use the tools menu during this loop. Either, I want to pass on the tool button press key event to the system or activate the tool's menu somehow from code.....how would I achieve that?
Thanks
-Donald