Hi!

Replacing wait command with

do while .t.
  valik =chr(inkey(3))
  if valik#chr(0)
    exit
    endif
  enddo

Shows menu properly.
How to replace accept command with similar?
How to implement accept command using inkey() ?
Or is there some api function which can used to read line form console ?