acad 2009

[aaronr]

I wrote this route to connect draw 3 lines and fillet them together. We went AutoCad 2009 and keeps err out with the fillet command. Any please.

(DEFUN C:5 ()
(COMMAND "LAYER" "m" "E-WIRING" "c" "blue" "" "")
(setvar "Orthomode" 1)
(setvar "osmode" 16383)
(command "line" PAUSE PAUSE "")
(setq s (ssget "l"))
(command "pLine" PAUSE "W" "0" "" PAUSE "")
(setq SS (ssget "l"))
(setq FLSCALE (* (GETVAR "DIMSCALE") 0.09375))
(COMMAND "FILLET" "R" FLSCALE "")
(command "fillet" S SS )
(command "pLine" PAUSE "W" "0" "" PAUSE "")
(setq SS (ssget "l"))
(setq FLSCALE (* (GETVAR "DIMSCALE") 0.09375))
(COMMAND "FILLET" "R" FLSCALE "")
(command "fillet" S SS )
(princ))

Moderator Note:

Please use [ CODE ] tags...

[Opie]

Which fillet command does it error out on?

Which AutoCAD version did it work in?

[aaronr]

It works in 2008 and all-lower versions.
It err out when fillet command looking for radius I think
It say's the filler command is unknown command in 2009MEP when ran in the lsp.

[aaronr]

It do same thing for this command
let start small

(DEFUN C:FL ()
         (setq FLSCALE;(*;(GETVAR;"DIMSCALE");0.09375))
         (COMMAND "FILLET";"R" FLSCALE;"")
         (COMMAND "FILLET";PAUSE PAUSE))

[RobertB]

Why are there all those semi-colons? The proper code syntax is:

(defun C:FL ()
 (setq FlScale (* (getvar "DimScale") 0.09375))
 (command "._Fillet" "_r" FlScale "")
 (command  "._Fillet" pause pause)
 (princ))

Next, read up on the new (initcommandversion) function.

[aaronr]

Why are there all those semi-colons? The proper code syntax is:

(defun C:FL ()
 (setq FlScale (* (getvar "DimScale") 0.09375))
 (command "._Fillet" "_r" FlScale "")
 (command  "._Fillet" pause pause)
 (princ))

Next, read up on the new (initcommandversion) function.

Where do find out about this info (initcomm and version) function.
Thanks that worked

[ccowgill]

Where do find out about this info (initcommandversion) function.
Thanks that worked

initcommandversion can be found in the AutoCAD 2009 Developer Help files, accessed through the help->additional resources menu, or the VLIDE editor.