getangle

(getangle [base-point] [prompt])

Asks for an angle: typed (in any angle format) or with two points. Returns radians.

(setq a (getangle "\nAngle: "))

Differences with AutoCAD

It does not take ANGBASE or ANGDIR into account (with the initial values the result is the same).