change in lisp required
Printed From: CAD Forum
Category: EN
Forum Name: AutoCAD
Forum Description: Discussion about AutoCAD and AutoCAD LT, viewers, DWG and DXF formats, Design Review, AutoCAD web, Drive, add-ons
URL: https://www.cadforum.cz/forum_en/forum_posts.asp?TID=9276
Printed Date: 10.Jul.2026 at 12:50
Topic: change in lisp required
Posted By: thinker
Subject: change in lisp required
Date Posted: 08.Jun.2013 at 14:42
|
http://www.cadforum.cz/forum_en/uploads/381267/LEVEL_Y-X.lsp" rel="nofollow">
Hi every one!
I am working on road cross section and using this lisp to show the levels and offset from center line, I have to keep vertical scal double to horizantal scale so when I use this it show double value of Y-axis
 I want change in this lisp that it shows the half value of Y-axis any body can help thanksuploads/381267/LEVEL_Y-X.lsp
|
Replies:
Posted By: Kent Cooper
Date Posted: 10.Jun.2013 at 14:52
|
If I understand what you're asking, try changing this line:
(setq north (strcat " " (rtos (cadr pt2) 2 3)))
to this:
(setq north (strcat " " (rtos (/ (cadr pt2) 2) 2 3)))
|
Posted By: thinker
Date Posted: 11.Jun.2013 at 05:17
Thank you very much Kent cooper I check it little bit it is working properly  i will check more then i will give comments
|
Posted By: thinker
Date Posted: 11.Jun.2013 at 13:11
| Thanks again Mr.Kent cooper I check it, it is working perfectly |
Posted By: Kent Cooper
Date Posted: 12.Jun.2013 at 15:44
| You're welcome -- it's good to hear that I understood correctly what you were trying to do. |