getangle
(getangle [punto-base] [pregunta])
Pide un ángulo: tecleado (en cualquier formato de ángulo) o con dos puntos. Devuelve radianes.
(setq a (getangle "\nÁngulo: "))
Diferencias con AutoCAD
No tiene en cuenta ANGBASE ni ANGDIR (con los valores iniciales da lo mismo).