Hi All,is there a lisp that will give you grade elevations
after picking start/end points and entering the desired slope? (or
something similar)I've heard of something like this before. I'm not
very good at determining what the grades should be for two points with
a desired slope and I have not been able to find any tutorials to help.ThanksCadman33619

[QUOTE=cadman33619]Hi All,is there a lisp that will give you grade elevations
after picking start/end points and entering the desired slope? (or
something similar)I've heard of something like this before. I'm not
very good at determining what the grades should be for two points with
a desired slope and I have not been able to find any tutorials to help.ThanksCadman33619
[/QUOTE]I hope find something for you.defun c:grade () (prompt "\npick points for the grade") (setq ang1 (getangle)) (setq tanofang (/ (sin ang1) (cos ang1))) (setq grade1 (/ 1 tanofang)) (setq txt1 (strcat (rtos grade1 2 1) ":1")) (setq pnt1 (getpoint "\nPick location for text")) (command "text" pnt1 (rtd ang1) txt1) ) (defun rtd (a) (/ (* a 180.0) pi))

Hi,this is not exactly what I'm looking for. This works great for providing the slope of a line. What I need is something that will tell me the new grade elevation of a point I select (after entering the desired slope and an existing grade elevation). I'm not very good at determining new grades for a site. I was hoping there was a LISP for this.Thanks for your help, toughCadman33619