AutoLISP Chamfer Usage

[Anonymous]

I'm trying to chamfer the top edge of a cylinder without user input given the two chamfer distances.

(command "chamfer" "d" ChamX ChamY pt2 "") ;this is what I'm trying to use, where ChamX and ChamY are the chamfer distances, and pt2 is a point on the edge of the cylinder I'm trying to chamfer. I've tried several variations trying to select the edge as an entitiy, trying the function with the edge selected first. No matter what I do the chamfer function doesn't work. Any help would be appreciated.

[paullimapa]

Does it work when you manually enter the same sequence of commands using the basic AutoCAD CHAMFER command?

Area Object Link | Attribute Modifier | Dwg Setup | Feet-Inch Calculator
Layer Apps | List on Steroids | VP Zoom Scales | Exchange App Store

[Anonymous]

Yes, it works outside of autolisp, and autocad even has the numbers entered in and saved.

[paullimapa · Accepted solution]

This is the sequence of commands I would pass through lisp to get Chamfer to work on a 3d Cylinder's edge:

(setq ob (entsel)) ; select edge of cylinder

(setq pt (cadr ob)) ; get selected point on edge

(setq chamfx (getdist)) ; enter first chamfer value like 0.25

(setq chamfy (getdist)) ; enter second chamfer value like 0.5

(command"_.Chamfer" pt "" chamfx chamfy pt "") ; execute Chamfer command

Area Object Link | Attribute Modifier | Dwg Setup | Feet-Inch Calculator
Layer Apps | List on Steroids | VP Zoom Scales | Exchange App Store