How Do You Draw Parrell Lines Turbocad
@ah2m67 wrote: How to drawing a perpendicular line from a point on the line ?
I think nigh other Replies have misunderstood what you desire to do. Several are about the ordinary PERpendicular Object Snap mode, which is PERpendicular to something. As I read it [it seems pretty clear from your wording], you want to draw perpendicular from something, and without necessarily anything else around that yous tin can go PERpendicular to. You tin exercise that without needing to change the UCS as has been suggested, past using the "<bending" format and feeding in the angle perpendicular to the object [in your request, a Line, but whatever appropriate object] at the specified bespeak. Try this:
(defun pf () (strcat "<" (angtos (+ (angle '(0 0 0) (vlax-bend-getFirstDeriv (setq ent (automobile (nentselp (getvar 'lastpoint)))); entity (vlax-bend-getParamAtPoint ent (osnap (getvar 'lastpoint) "_nea") ); ...Param ); ...FirstDeriv ); bending (/ pi 2); [perpendicular] ); + (getvar 'aunits) 8 ); rtos ); strcat ); defun (vl-load-com) Include that in your acaddoc.lsp file if you take 1, or salvage that to a file with a .lsp filetype ending, named whatsoever you want [I would call it something like PerFrom.lsp], and APPLOAD it.
It is written to be used subsequently you have given whatever you're drawing a first point. It's not restricted to drawing a Line, just can exist used in cartoon a Polyline, or for a Text rotation, or for the 2nd point of a Move or Re-create displacement, or for other purposes. And it doesn't need to be a point on a Line that y'all starting time from , but can be on annihilation with linearity [Line, Polyline, Arc, Circumvolve, Spline, Ellipse] -- anything that qualifies in the "curve" grade for (vlax-curve-...) functions.
Usage: in the case of your request -- drawing a Line perpendicular from some other Line -- recollect the Line control and give information technology a starting signal at the place y'all desire to draw perpendicular from on the existing Line [whether using NEArest or ENDpoint or MIDpoint Object Snap, or with Snap on if the existing Line was drawn that way, or whatever]. Then, when it's asking for the adjacent indicate, blazon in (pf) [with the parentheses], which stands for " p erpendicular f rom". That will lock in the direction for drawing the new Line to perpendicular [in either direction] from the existing one.
Use information technology similarly for the other purposes mentioned -- any time it'southward asking for a next indicate when the previous point was on some object with linearity. In drawing a Line or Polyline, it tin also be used for the adjacent Line or Polyline segment, and will lock the direction in to perpendicular from the latest segment.
If that works for y'all, you can put it into a menu item to option on, if that'southward easier than typing it in.
[Past the way, it isn't written to business relationship for, and I haven't tried it in, other-than-Earth Coordinate Systems, just could probably exist adjusted for that, if necessary. It also wants the from point to be unambiguous, that is, if yous pick at something like an INTersection, I don't think you can control which intersecting object it'due south going to find the perpendicular direction from.]
Kent Cooper, AIA 
Source: https://forums.autodesk.com/t5/autocad-forum/drawing-a-perpendicular-line-from-a-point-on-the-line/td-p/6670460
Posted by: hughesthind1949.blogspot.com
0 Response to "How Do You Draw Parrell Lines Turbocad"
Post a Comment