User key to toggle to and from RPN

[ekeppel]

I just realized that I never use Algebraic mode, so I've combined those two previous code blocks as follows:

Code:

KEY K_View()
BEGIN
  IF Entry == 0
    THEN Entry:=2 ELSE Entry:=0;
  END;
  STARTVIEW(-1,1);
  TEXTOUT_P(STRINGFROMID(1903+Entry),G0,2,207,2,RGB(255,0,0));
  WAIT(.5);
END;

This gives feedback when changing modes and also skips Algebraic.

Eric