: TEMPO-ARRET
  1000 0 DO
    100 MS ( MS mot pr‚-d‚fini, g‚nŠre un d‚lai)
    ?KEY IF LEAVE THEN
  LOOP ;