getkword

(getkword [prompt])

Asks for one of the initget keywords. Returns the whole keyword (or its global name) and nil on Enter.

(initget "Line Arc")
(getkword "\n[Line/Arc]: ")