Lisp routine for the perpendicular distance between two lines

[bsimpson]

I am in need of a lisp routine that will measure the distance between two polylines. I have attempted this but have not yet reached the summit.

The difficulty in the lisp routine seams to be with the output. The out put should be in the form of a ascii file.

There is one line that is staked at a uniform distance and an input variable is needed for;

1 first line
2 Second line
3 Stake distance

The distance is measured from the perpendicular snap on the first line to the intersection snap of the second line.

I have been refered to batter ticks but the lisp routine there is similar but does not work for what I spercifically need.

thanks
bsimpson