PROCEDURE Loop()

   LOCAL n

   DO WHILE .T.
      ? n := hb_RandomInt( 0, 19 )
      IF n == 10
         EXIT
      ENDIF
      ? hb_RandomInt( 0, 19 )
   ENDDO

   RETURN