+ Reply to Thread
Page 1 of 2 1 2 LastLast
Results 1 to 10 of 12
  1. #1
    Forum Newbie
    Using
    AutoCAD 2006
    Join Date
    Sep 2007
    Posts
    4

    Unhappy Trim inside circle

    Registered forum members do not see this ad.

    Hi Group,

    I am new to this group and seeking some help.

    I have written a macro to create a circle of 2mm nearest and or at intersection of existing lines or polylines, and trim all entities inside that circle.

    ^c^ccircle nea,int \0.5;trim @0.5<0;;@0.5<180;;erase w @0.707<225;@1.42<45;;

    This macro although works to a degree, has some issues of trimming more than one line at a time and more curiously it only works when zoomed in quite close.

    I now feel my only option is to learn AutoLisp to solve this, but so far have failed. Can anyone help me with this.

    Best Regards
    Simon Miller
    Cube3 - Creative Product Design

  2. #2
    Super Member ASMI's Avatar
    Using
    AutoCAD 2008
    Join Date
    Nov 2005
    Location
    Oceanus Procellarum, Moon
    Posts
    1,427

    Default

    If you have installed Express Tools and command _EXTRIM:

    ^C^Ccircle nea,int \0.5;_extrim _select _l $M=$(getvar,lastpoint);

  3. #3
    Super Member Hedgehog's Avatar
    Computer Details
    Hedgehog's Computer Details
    Operating System:
    XP sp 3
    Motherboard:
    Asus NCL-DE/1U E7520
    CPU:
    2 x Intel Xeon 7150N
    RAM:
    8 x Kingston KHX6400D2K2/4G 4 GB PC2-6400
    Graphics:
    NVidia Quadro FX 5500 1 GB Pci-X 16
    Primary Storage:
    2 x Seagte Barracuda 7200.10 320 GB HDD
    Monitor:
    ViewSonic VP2290b-2Black 22” LCD
    Using
    MEP 2009
    Join Date
    Aug 2007
    Location
    Any Pub, Derbyshire, UK
    Posts
    896

    Default

    This works but you still have to be close in (ASMI's works zoomed out, cool)...

    ^c^ccircle;int;\0.5;trim;l;;c;@-0.2,-0.2;@0.4,0.4;;erase;w;@1,1;@-2,-2;;

    (I'm assuming you want to erase the circle at the end of it?)

    edit/ ok try...

    ^c^ccircle;int;\0.5;zoom;o;l;;trim;l;;c;@-0.2,-0.2;@0.4,0.4;;erase;w;@1,1;@-2,-2;;zoom;p;

    edit/ naaa... needs more work.
    Last edited by Hedgehog; 11th Sep 2007 at 02:54 pm.

  4. #4
    Senior Member
    Computer Details
    VVA's Computer Details
    Operating System:
    Windows 7
    CPU:
    Intel Core i5-2400
    RAM:
    8 Gb
    Graphics:
    Nvidia Quadro 600
    Primary Storage:
    Seagate 500 GB + WD 750 GB
    Monitor:
    Philips 27"
    Using
    AutoCAD 2013
    Join Date
    Dec 2006
    Location
    Minsk, Belarus
    Posts
    401

    Default

    Try it. Your need Express Tools
    Code:
     
    ^C^C_circle;_nea,_int;\0.5;(setq cc (entlast));_extrim;_L;@;_erase;!cc;;

  5. #5
    Forum Newbie
    Using
    AutoCAD 2006
    Join Date
    Sep 2007
    Posts
    4

    Default

    Sorry guys but we do not have Express Tools
    Simon

  6. #6
    Super Member Hedgehog's Avatar
    Computer Details
    Hedgehog's Computer Details
    Operating System:
    XP sp 3
    Motherboard:
    Asus NCL-DE/1U E7520
    CPU:
    2 x Intel Xeon 7150N
    RAM:
    8 x Kingston KHX6400D2K2/4G 4 GB PC2-6400
    Graphics:
    NVidia Quadro FX 5500 1 GB Pci-X 16
    Primary Storage:
    2 x Seagte Barracuda 7200.10 320 GB HDD
    Monitor:
    ViewSonic VP2290b-2Black 22” LCD
    Using
    MEP 2009
    Join Date
    Aug 2007
    Location
    Any Pub, Derbyshire, UK
    Posts
    896

    Default

    Done it...

    ^c^ccircle;int;\0.5;(setq cc (entlast));zoom;o;l;;trim;l;;c;@-0.2,-0.2;@0.4,0.4;;erase;!cc;;zoom;p;

    Thanks for the setq idea there VVA

  7. #7
    Banned Alan Cullen's Avatar
    Using
    Map 3D 2009
    Join Date
    Jun 2006
    Location
    Cairns, Queensland, Australia
    Posts
    4,181

    Default

    Your using 2006, I'm sure you have express tools. You just have to go back to your installation disk and install it. It does not auto install.

  8. #8
    Super Member Hedgehog's Avatar
    Computer Details
    Hedgehog's Computer Details
    Operating System:
    XP sp 3
    Motherboard:
    Asus NCL-DE/1U E7520
    CPU:
    2 x Intel Xeon 7150N
    RAM:
    8 x Kingston KHX6400D2K2/4G 4 GB PC2-6400
    Graphics:
    NVidia Quadro FX 5500 1 GB Pci-X 16
    Primary Storage:
    2 x Seagte Barracuda 7200.10 320 GB HDD
    Monitor:
    ViewSonic VP2290b-2Black 22” LCD
    Using
    MEP 2009
    Join Date
    Aug 2007
    Location
    Any Pub, Derbyshire, UK
    Posts
    896

    Default

    No Express needed for my version

  9. #9
    Forum Newbie
    Using
    AutoCAD 2006
    Join Date
    Sep 2007
    Posts
    4

    Default

    Thanks a lot guys. Hedgehog, that last one works a treat and all ive added is the nearest object snap.

    Thanks again.

    Regards
    Simon Miller
    Cube3

  10. #10
    Forum Newbie
    Using
    AutoCAD 2006
    Join Date
    Sep 2007
    Posts
    4

    Default

    Registered forum members do not see this ad.

    I am using it to generate a DXF file for a laser profiler to follow. I need the 1mm gaps in the lines so that after the profile has been cut the part remains in the sheet and does not fall out when removed from the machine. I will dig out the install CD and look for Express tools. Thanks for the info though

Similar Threads

  1. Inside of buildings
    By Ronrico19 in forum AutoCAD 3D Modelling & Rendering
    Replies: 7
    Last Post: 21st Jan 2007, 02:49 pm
  2. Replies: 2
    Last Post: 14th Jul 2006, 05:24 pm
  3. Text inside a circle
    By ebjco in forum AutoCAD Drawing Management & Output
    Replies: 2
    Last Post: 22nd Nov 2005, 07:38 pm
  4. Text inside a circle
    By ebjco in forum AutoCAD Drawing Management & Output
    Replies: 7
    Last Post: 22nd Nov 2005, 04:27 pm
  5. Line from inner circle to outer circle
    By jocaan in forum AutoCAD Beginners' Area
    Replies: 6
    Last Post: 11th Mar 2004, 09:28 pm

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts