insertion of block...

[BriLaF]

I need some help out there...
How do I get this routine to insert a block and not have to give a x & y scale factor. Where in the insert command do I give a "1" "1" for scale factor? Any help would be appreciated...

(defun c:RECEPT (/ oce)
(setq oce (getvar "CMDECHO"))
(setvar "CMDECHO" 0)
(command "_.-layer" "_M" "ELECT" "")
(command "_.-layer" "_C" "4" "ELECT" "")
(command "_.-layer" "_L" "CONTINUOUS" "ELECT" "")
(command "_.-layer" "_ON" "ELECT" "")
(command "_.-layer" "_T" "ELECT" "")
(command "_.-layer" "_U" "ELECT" "")
(command "_.INSERT" "RECEPT")
(setvar "CMDECHO" oce)
(princ)
)

 

[Phil Kenewell]

BriLaF,

Change the line: (command "_.INSERT" "RECEPT")

 

[R. Robert Bell]

My favorite approach is to use the Insert command's options:

(command "._Insert" "Recept" "_s" 1 "_r" 0 pause)

This approach will give you a dragging insert at the scale (and rotation) you have provided which is important if the scale is something other than 1.

 

[Phil Kenewell]

(command "._Insert" "Recept" "_s" 1 "_r" 0 pause)

I agree, Mr., Bell's approach is even better...