LAST_KEY

     Returns a TPU keyword for the last key you entered or that TPU
     read or executed.  If you are replaying a LEARN sequence, LAST_KEY
     returns a keyword for the key that defines the LEARN sequence.

  Syntax

     keyword := LAST_KEY

  Examples

     1.  endk := LAST_KEY;

         Stores in the variable ENDK the last key you typed.

     2.  The following procedure prompts the user for input for key
         definitions:

         PROCEDURE user_define_key
            udef := READ_LINE ("Type the definition: ");
            ukey := READ_LINE ("Press the key to define: ", 1);
            IF LENGTH (ukey) > 0
               THEN ukey := KEY_NAME (ukey)
               ELSE ukey := LAST_KEY;
            ENDIF;
            DEFINE_KEY (udef, ukey);
         ENDPROCEDURE;

  Related topics

     DEFINE_KEY   LOOKUP_KEY   KEY_NAME   KEYNAMES TABLE   READ_KEY