Search the Community
Showing results for tags 'autocad'.

Hello, i am using autocad 2017, and i need to create a countersink. I would like to know if it is possible in autocad 2017, i couldn't find the tools that would allow me to do so. I tried chamfering but it is not giving the desired results. The holes where i need countersinks are the holes in the middle. http://i.picpar.com/HoPb.png Do i need to acquire inventor or another autodesk program designed for this purpose. Thank you.
 8 replies

 countersink
 autocad

(and 1 more)
Tagged with:

I'm working in millimeters and whenever I use the AREA command I end up with a large number. I want to know if you can customize the AREA command somehow to show meters squared automatically.


Quantise LISP works fine but makes hatch with quantised objects nonassociative
3dwannab posted a topic in AutoLISP, Visual LISP & DCL
Here's the code originally written by David Forbus (Thank you btw). Any help will be appreciated in helping me to fix the hatch issue. Thanks. ;;; QUANTALL ;;; Written by David Forbus 09_dec_2008 ;;; QUANTALL prompts a user for a Quantize Value ;;; QUANTALL then prompts a user for a selection set and then ;;; modifies the INSERTION POINTS of TEXT, MTEXT, CIRCLES, BLOCKS, LINES and LWPOLYLINES within that selection set so they all "snap" to quantized coordinates. ;;; Modified by 3dwannab (get OSNAP settings) 14.06.02 (defun QUANTLN () (setq SPX (/ (cadr (assoc 10 CURENT)) QUANTVALUE )) (setq SPY (/ (caddr (assoc 10 CURENT)) QUANTVALUE )) (setq SPZ (/ (cadddr (assoc 10 CURENT)) QUANTVALUE )) (setq EPX (/ (cadr (assoc 11 CURENT)) QUANTVALUE )) (setq EPY (/ (caddr (assoc 11 CURENT)) QUANTVALUE )) (setq EPZ (/ (cadddr (assoc 11 CURENT)) QUANTVALUE )) (if (>= ( SPX (fix SPX)) 0.5) (setq SPX (* QUANTVALUE (+ 1.0 (fix SPX)))) (setq SPX (* QUANTVALUE (fix SPX)))) (if (>= ( SPY (fix SPY)) 0.5) (setq SPY (* QUANTVALUE (+ 1.0 (fix SPY)))) (setq SPY (* QUANTVALUE (fix SPY)))) (if (>= ( SPZ (fix SPZ)) 0.5) (setq SPZ (* QUANTVALUE (+ 1.0 (fix SPZ)))) (setq SPZ (* QUANTVALUE (fix SPZ)))) (if (>= ( EPX (fix EPX)) 0.5) (setq EPX (* QUANTVALUE (+ 1.0 (fix EPX)))) (setq EPX (* QUANTVALUE (fix EPX)))) (if (>= ( EPY (fix EPY)) 0.5) (setq EPY (* QUANTVALUE (+ 1.0 (fix EPY)))) (setq EPY (* QUANTVALUE (fix EPY)))) (if (>= ( EPZ (fix EPZ)) 0.5) (setq EPZ (* QUANTVALUE (+ 1.0 (fix EPZ)))) (setq EPZ (* QUANTVALUE (fix EPZ)))) (setq CURENT (subst (list 10 SPX SPY SPZ) (assoc 10 CURENT) CURENT )) (setq CURENT (subst (list 11 EPX EPY EPZ) (assoc 11 CURENT) CURENT )) (entmod CURENT) ) (defun QUANTPOLY () (setq COUNTER2 1) (setq POLYNEW (list)) (while (< COUNTER2 (length CURENT)) (setq VRTXPNT (nth COUNTER2 CURENT)) (if (= 10 (car VRTXPNT)) (progn (setq SPX (/ (cadr VRTXPNT) QUANTVALUE )) (setq SPY (/ (caddr VRTXPNT) QUANTVALUE )) (if (>= ( SPX (fix SPX)) 0.5) (setq SPX (* QUANTVALUE (+ 1.0 (fix SPX)))) (setq SPX (* QUANTVALUE (fix SPX)))) (if (>= ( SPY (fix SPY)) 0.5) (setq SPY (* QUANTVALUE (+ 1.0 (fix SPY)))) (setq SPY (* QUANTVALUE (fix SPY)))) (setq POLYNEW (append POLYNEW (list (list 10 SPX SPY))))) (if (= 330 (car VRTXPNT)) nil (if (= 5 (car VRTXPNT)) nil (setq POLYNEW (append POLYNEW (list VRTXPNT)))) ) ) (setq COUNTER2 (+ COUNTER2 1)) ) (entmake POLYNEW) (entdel CURENTNAME) ) (defun QUANTREG () (setq SPX (/ (cadr (assoc 10 CURENT)) QUANTVALUE )) (setq SPY (/ (caddr (assoc 10 CURENT)) QUANTVALUE )) (setq SPZ (/ (cadddr (assoc 10 CURENT)) QUANTVALUE )) (if (>= ( SPX (fix SPX)) 0.5) (setq SPX (* QUANTVALUE (+ 1.0 (fix SPX)))) (setq SPX (* QUANTVALUE (fix SPX)))) (if (>= ( SPY (fix SPY)) 0.5) (setq SPY (* QUANTVALUE (+ 1.0 (fix SPY)))) (setq SPY (* QUANTVALUE (fix SPY)))) (if (>= ( SPZ (fix SPZ)) 0.5) (setq SPZ (* QUANTVALUE (+ 1.0 (fix SPZ)))) (setq SPZ (* QUANTVALUE (fix SPZ)))) (setq CURENT (subst (list 10 SPX SPY SPZ) (assoc 10 CURENT) CURENT )) (entmod CURENT) ) (defun QUANTXT () (setq TXTHORZ (cdr (assoc 72 CURENT))) (setq TXTVERT (cdr (assoc 73 CURENT))) (if (= TXTHORZ 0) (if (= TXTVERT 0) (progn (setq SPX (/ (cadr (assoc 10 CURENT)) QUANTVALUE )) (setq SPY (/ (caddr (assoc 10 CURENT)) QUANTVALUE )) (setq SPZ (/ (cadddr (assoc 10 CURENT)) QUANTVALUE )) (if (>= ( SPX (fix SPX)) 0.5) (setq SPX (* QUANTVALUE (+ 1.0 (fix SPX)))) (setq SPX (* QUANTVALUE (fix SPX)))) (if (>= ( SPY (fix SPY)) 0.5) (setq SPY (* QUANTVALUE (+ 1.0 (fix SPY)))) (setq SPY (* QUANTVALUE (fix SPY)))) (if (>= ( SPZ (fix SPZ)) 0.5) (setq SPZ (* QUANTVALUE (+ 1.0 (fix SPZ)))) (setq SPZ (* QUANTVALUE (fix SPZ)))) (setq CURENT (subst (list 10 SPX SPY SPZ) (assoc 10 CURENT) CURENT )) ) (progn (setq SPX (/ (cadr (assoc 11 CURENT)) QUANTVALUE )) (setq SPY (/ (caddr (assoc 11 CURENT)) QUANTVALUE )) (setq SPZ (/ (cadddr (assoc 11 CURENT)) QUANTVALUE )) (if (>= ( SPX (fix SPX)) 0.5) (setq SPX (* QUANTVALUE (+ 1.0 (fix SPX)))) (setq SPX (* QUANTVALUE (fix SPX)))) (if (>= ( SPY (fix SPY)) 0.5) (setq SPY (* QUANTVALUE (+ 1.0 (fix SPY)))) (setq SPY (* QUANTVALUE (fix SPY)))) (if (>= ( SPZ (fix SPZ)) 0.5) (setq SPZ (* QUANTVALUE (+ 1.0 (fix SPZ)))) (setq SPZ (* QUANTVALUE (fix SPZ)))) (setq CURENT (subst (list 11 SPX SPY SPZ) (assoc 11 CURENT) CURENT )) ) ) (progn (setq SPX (/ (cadr (assoc 11 CURENT)) QUANTVALUE )) (setq SPY (/ (caddr (assoc 11 CURENT)) QUANTVALUE )) (setq SPZ (/ (cadddr (assoc 11 CURENT)) QUANTVALUE )) (if (>= ( SPX (fix SPX)) 0.5) (setq SPX (* QUANTVALUE (+ 1.0 (fix SPX)))) (setq SPX (* QUANTVALUE (fix SPX)))) (if (>= ( SPY (fix SPY)) 0.5) (setq SPY (* QUANTVALUE (+ 1.0 (fix SPY)))) (setq SPY (* QUANTVALUE (fix SPY)))) (if (>= ( SPZ (fix SPZ)) 0.5) (setq SPZ (* QUANTVALUE (+ 1.0 (fix SPZ)))) (setq SPZ (* QUANTVALUE (fix SPZ)))) (setq CURENT (subst (list 11 SPX SPY SPZ) (assoc 11 CURENT) CURENT )) )) (entmod CURENT) ) (defun QUANTARC () (setq SPX (/ (cadr (assoc 10 CURENT)) QUANTVALUE )) (setq SPY (/ (caddr (assoc 10 CURENT)) QUANTVALUE )) (setq SPZ (/ (cadddr (assoc 10 CURENT)) QUANTVALUE )) (if (>= ( SPX (fix SPX)) 0.5) (setq SPX (* QUANTVALUE (+ 1.0 (fix SPX)))) (setq SPX (* QUANTVALUE (fix SPX)))) (if (>= ( SPY (fix SPY)) 0.5) (setq SPY (* QUANTVALUE (+ 1.0 (fix SPY)))) (setq SPY (* QUANTVALUE (fix SPY)))) (if (>= ( SPZ (fix SPZ)) 0.5) (setq SPZ (* QUANTVALUE (+ 1.0 (fix SPZ)))) (setq SPZ (* QUANTVALUE (fix SPZ)))) (setq CURENT (subst (list 10 SPX SPY SPZ) (assoc 10 CURENT) CURENT )) (setq RADR (/ (cdr (assoc 40 CURENT)) QUANTVALUE )) (if (>= ( RADR (fix RADR)) 0.5) (setq RADR (* QUANTVALUE (+ 1.0 (fix RADR)))) (setq RADR (* QUANTVALUE (fix RADR)))) (setq CURENT (subst (cons 40 RADR) (assoc 40 CURENT) CURENT )) (entmod CURENT) ) (defun c:Fix_Quantize_All ( / osnap ) ;;3dwannab fix (setvar "cmdecho" 0) (setq OSNAP (getvar "osmode")) ;;3dwannab fix (setvar "osmode" 0) (setq QUANTVALUE (getreal "\nEnter Quantize Value: ")) (setq SELECTSET (ssget)) (setq COUNTER0 (1 (sslength SELECTSET ))) (while (> COUNTER0 1.0) (setq CURENT (entget (ssname SELECTSET COUNTER0))) (setq CURENTNAME (ssname SELECTSET COUNTER0)) (if (= (cdr (assoc 0 CURENT)) "LINE") (QUANTLN)) (if (= (cdr (assoc 0 CURENT)) "TEXT") (QUANTXT)) (if (= (cdr (assoc 0 CURENT)) "MTEXT") (QUANTREG)) (if (= (cdr (assoc 0 CURENT)) "INSERT") (QUANTREG)) (if (= (cdr (assoc 0 CURENT)) "CIRCLE") (QUANTREG)) (if (= (cdr (assoc 0 CURENT)) "ARC") (QUANTARC)) (if (= (cdr (assoc 0 CURENT)) "LWPOLYLINE") (QUANTPOLY)) (setq COUNTER0 (1 COUNTER0)) ) (princ) (setvar "osmode" OSNAP) ) (princ "\nType \"Fix_Quantize_All\" to Quantize the INSERTION POINTS of TEXT, MTEXT, CIRCLES, ARCs, BLOCKS, LINES and LWPOLYLINES to the round off value.") 
Using Civil 3D 2016 and having Intermittent Problems with not being able to remove items from the selection set. Anyone else having this problem? Terry Nolan www.FloridaDraftingServices.com www.1stProto.com 1stProto Design Services
 3 replies

 civil 3d
 cad drafting

(and 2 more)
Tagged with:

Additional Payment Required for Physical Media for AutoCAD 2017
JGA posted a topic in Software & Licensing
I am gobsmacked that Autodesk have the cheek to require customers to pay a sum on top of the subscription fee for obtaining an update in their software. Subscription licenses are costing organisations thousands of pounds annually, but still ask for more money to obtain the software! The installers are now in the 10's of Gb's. Surely from a customer relations exercise, it makes sense to swallow the cost of the media & postage? 15 replies

3d points or 3d polyline along the given path
MAINISL2 posted a topic in AutoLISP, Visual LISP & DCL
Hi there I am looking for some kind of lisp to import points or 3d polyline along with a reference line. I am attaching reference files for study. thanks Bridge Plan.dwg Profile Data.csv 
VBA Code to retrieve the surface area of a solid body for writing to excel
RemiS posted a topic in .NET, ObjectARX & VBA
Hi Everybody, Via the command area it is possible to retrieve the surface area of a solid body (Acad3DSolid). Unfortunately the area it is not a property of a solid body so I'm haveing difficulties retrieving the surface area (which I want to write to an excel file). I've tried to explode the solid which results in several regions and surfaces. Unfortunately only the regions have an area; the (curved) surfaces don't. Anybody suggestions how to get the area of some solids useing VBA? Looking forward to the suggestions!
 solid body
 excel

(and 3 more)
Tagged with:

Lagging, Slow, Jerky movemements of the pointer in Autocad
rasnoland posted a topic in AutoCAD General
Hi I have been having this issue with several versions of Autocad. At some point the application will start showing a lagging behavior when entering and existing commands. It completely blows my concentration and the productive flow away. I have researched quite a lot on the net, and tried all the usual suspects: Disabling all CPU consuming features (cycle, dynamic inputs, properties palette, visual effects, etc). I have deactivated all the 3d performance settings. Disable "enable desktop composition" in Windows. All my graphic drivers are up to date. But nothing seems to work and the frustration start to be quite annoying. Anyone managed to find a solution for this? Your help will be super appreciated! I am running AutocadCAD 2013 in W7 (64bits) Ras 15 replies

 performance
 lag

(and 3 more)
Tagged with:

Dynamic Block Auto Cabinet Door divison with 1/8" reveals between doors
Raul Ruiz posted a topic in AutoCAD Drawing Management & Output
Hello everyone, So I work in a cabinet shop as a drafter. I am trying to save time drawing our shop drawings using dynamic blocks. I have been trying all morning and researching through forums with no luck. I have simple 3/4" MDF slab doors and I need a block that can divide the doors between 10" to 20" equal widths with 1/8" space between the doors. In essence I will need 2 blocks, one for the plan section and one for the elevation, the same concept applies. Previously I would use the divide command after subtracting all 1/8" reveals to manually get equal doors. I will greatly appreciate if someone can help me and ease the process. Please see attachment to see what I am trying to resolve. Thank you,Auto Cabinet Door Division.dwg 4 replies

 cabinet doors
 autocad

(and 2 more)
Tagged with:

Generate mutiple AutoCAD drawings from data stored in an Excel file.
Berbero posted a topic in AutoLISP, Visual LISP & DCL
Dear smarties I read a few articles here and there regarding a way to generate multiple drawings from an excel file, but no one had explained step by step on how to do it. So, I am lost half way. I am very new to this kind of things, but I will try to follow, so please go slow on me. here is what I want to fix: 1. I need to automatically generate 10 drawings both in dwg and pdf copied into a folder. 2. All the variables (VAR1 to VAR3) are stored in an excel file. refer to the attached files as an example. 3. I only need to create one original drawing, which will be used to generate all the 10 drawings. Please help EXCELVAR.xls ORIGINALDWG.dwg 
Rectangle With Triangle Stretch Help Dynamic Block
martin74302 posted a topic in AutoCAD 2D Drafting, Object Properties & Interface
I have a awning window in front elevation that i want to stretch horizontally and vertically , im having trouble getting the triangle to stay in the middle when i stretch horizontally. Can someone help me :) attachment below : Window.dwg 
Problems with UCS and attaching xrefs
Dragspelarn posted a topic in AutoCAD 2D Drafting, Object Properties & Interface
Hello Folks! Having problems with the UCS at the moment. I have rotated my drawings with the UCS command and used the plan command to set the drawings in the angle i want to view them in. And then used world to get the coordinate system true to its original state. The problem is when i am trying to attach the drawings together, they are in different places. Do you guys have any clues? (Sorry for my bad english) /PerAnton 
Hi guys, Is it possible to specify zoom factor that will show on my monitor same size as will printed on paper? For example: i'm making drawing in 1:100 scale in milimeters, and before printing it i want to make sure that everything is readable. I know that depands on screen resolution, dpi and pixel size.

Hi, AcadClass has been launched at **Link Removed** The Android app is here: **Link Removed**

Hello! I was working in a drawing when I got a message asking me to save a recovery copy which I did, but now I can't open the original file. Everytime I try get this message: AutoCad Error Aborting  Fatal error: Unhandle access violation reading 0x3b639abe exception at 33ed3712h. What is this and how can I fix it so I can go back to use my original drawing which is linked to some others?

I just have normal autocad 2016, nothing fancy like civil 3d. I was wondering, is there a way i can bring in a survey point data file (.txt or .asc) into Autocad. Maybe by something in program by default, or a 3rd party plug in that is compatible with autocad. I don't want to spend way more money for the Autocad civil 3d license.

Hey everyone, I guess this is a simple project but I have absolutely 0 ideas on how to do it. I know the basics of AutoCAD, but I'm not good at it. This is my assignment. This is the example of how my assignment should look like (keep in mind that it is not the final result of my assignment, but an example of how i should finalise it.) Any help would be appreciated!

Hello, I'm a new user about autocad and new user about this Forum. I try use VB and CAD... Is there a solution for my problem in object? i just write code for MSGBOX: Dim Variabile As Integer Variabile = MsgBox("Hai esportato i parametri?", vbOKCancel) If Variabile = 2 Then ActiveWindow.Close and work if use a macro....but for insert this message when close a file? can i make a particular macro for this like excel or access??? thanks for You interest

http://autocadtutorialsbd.com/youtubevideotutorials/

 autocad 3d modeling
 autocad 3d mechanical
 (and 2 more)

Hello everybody! Few programmers (including myself) decided to create a website with free (for now) AutoLisp programs and scripts for Autocad. Well, we have few questions to define where to start. Your answers would really help.  Do you use programs (scripts) in your work?  Which program (script) you would use but do not have. Best regards, ... PS Link to website asap

Hi all I really do not have much experience with AutoLISP but I would like to write a script that allows me to: 1. Create a new DWG 2. Draw a line from a set of existing coordinates from a .txt file 3. Save this drawing in a specified location 4. Close the drawing 5. Rinse and repeat until all of the .txt files have been drawn. Basically this will be used for hundreds of .txt files containing coordinates to draw the crosssections of a tunnel. Is this something that can be done? As after hours of research I have only managed to be able to draw one crosssection using a batch file but haven't been able to close the drawing or save it. Thanks in advance for any help
 13 replies

 autolisp
 autocad 14

(and 2 more)
Tagged with:

I'm working in between the Xref and the Main drawing, but after I was done with the first Xref I noticed in the main drawing that is missing the created layers, for that reason, the view in the main drawing was completely wrong,even the created linetype didn't load to the main drawing. I attached a screen shot of the Xref and the main drawing. working with AutoCAD 2015.

AutoCAD beginners need more exercises to practice. You can find more exercises in this book, over 200 pure exercises. https://goo.gl/dpyQ7Y
 1 reply

 autocad workbook
 autocad exercises

(and 2 more)
Tagged with:

Hello Everyone, I am new to the industry and working on my first project involving a basic design which includes relocation of some existing electrical loads to a new switchboard and removing the existing switchboard. I was wondering if anyone could share some of their drawings (single line and floor plan) which I could use a reference. I would really appreciate the help. I am confused on how to create a existing oneline showing the demo stuff and create asbuilt drawings. Thank you