AutoCAD lisp: Label Lines with Bearings and Distances by clicking on any polyline Label Lines with Bearings and