TYPEAHEAD         Typeahead cannot be set in the 1 to 15 range.

  Clipper Version  1.29 dtd 04/15/91.

  Problem Statement

  SET TYPEAHEAD TO <nVar> or SET(_SET_TYPEAHEAD, <nVar>) do not react
  to numbers less than the DOS buffer (except 0).

  Cause

  Unknown.

  Work Around(s) per Chuck Friedel [76467,706]

  *---------------
  FUNCTION strokes ( nCount )
  *---------------
  * retain specified number of keystrokes (oldest)
  *---------------

  LOCAL nKey, cChrs := ""

  DO WHILE nCount-- > 0 .AND. ( nKey := INKEY() ) # 0
    IF nKey < 0 .OR. nKey > 255    // outside CHR()'s range
       RETURN NIL
    ENDIF
    cChrs += CHR( nKey )
  ENDDO

  KEYBOARD ( cChrs )

  RETURN NIL