' *** KEY_REPT.LST *** 2nd GFA-Manual, page 8-11 > PROCEDURE key_repeat(flag!) ' ' *** Switch key-repeat on or off ' IF flag! SPOKE &H484,BSET(PEEK(&H484),1) ! repeat on ELSE SPOKE &H484,BCLR(PEEK(&H484),1) ! repeat off ENDIF RETURN ' ********* '