After stretch command ,selected be turned into ti
Printed From: CAD Forum
Category: EN
Forum Name: CAD - general
Forum Description: General discussion about CAD, formats, standards, management, licensing, networking, harware, other CAD applications
URL: https://www.cadforum.cz/forum_en/forum_posts.asp?TID=10832
Printed Date: 28.Sep.2026 at 11:36
Topic: After stretch command ,selected be turned into ti
Posted By: lijinsong
Subject: After stretch command ,selected be turned into ti
Date Posted: 06.Dec.2014 at 19:46
|
(defun c:tt( / pt1 pt2 mp an1 mode dypnt mp dist pnt1 pnt2 pnt3 pnt4) (vl-load-com) ( vl-cmdf "stretch" "C" ) ( while ( > ( getvar 'CmdActive ) 0 ) ( command pause ) ) (setq bent (ssget "P")) ;The insertion point coordinate origin (setq bpoint '(0 0 0) ) ;Here, as long as the hours minutes and seconds better improvement (setq bname (substr (rtos (getvar 'cdate) 2 8) 10 8)) (command "-block" bname bpoint bent "" ) (command "-insert" bname bpoint "" "" "" ) )   |
Replies:
Posted By: John Connor
Date Posted: 06.Dec.2014 at 21:05
|
How about explaining the purpose behind the code you are posting. ------------- "Humans have a strength that cannot be measured. This is John Connor. If you are reading this, you are the resistance." <<AutoCAD 2015>> |
Posted By: lijinsong
Date Posted: 07.Dec.2014 at 07:01
| Thank you for your attention to my post, my idea is to become piece later with the original reinforced distinguish. Easy to modify. If mixed together will be very difficult to identify the various reinforced. |
Posted By: John Connor
Date Posted: 07.Dec.2014 at 13:22
|
That explanation is basically garbage. I won't be using any of the lisp routines you've posted. ------------- "Humans have a strength that cannot be measured. This is John Connor. If you are reading this, you are the resistance." <<AutoCAD 2015>> |
Posted By: lijinsong
Date Posted: 07.Dec.2014 at 15:44
| It seems you are a school, the demands of practical work to solve the problem, but not to how complex. |
Posted By: John Connor
Date Posted: 07.Dec.2014 at 18:16
|
Maybe you should ask a friend with a better command of the English language translate your posts for you. They don't make much sense. It would be helpful if you explained what your lisp routine is supposed to do and give a real world example of the routine in use. A video demonstration of the routine in action would be best. ------------- "Humans have a strength that cannot be measured. This is John Connor. If you are reading this, you are the resistance." <<AutoCAD 2015>> |