How do i get my lisp to load quietly?

[Anonymous]

i added a lisp file to our in house automatic loading file that checks for a certain block, & if it finds it redefines the block then runs attsync. Its much like acaddoc.lsp. Everything works great except i see on the command line that it had run. How can i make this run without it reporting to the command line. I tried to put (princ) at the end but it did not do the trick.

[Shneuph]

I think you probably have to set cmdecho to 0 at the beginning:

Very beginning:

(setq mycmdecho (getvar "cmdecho"))

(setvar "cmdecho" 0)

...rest of code.,..

at end:

(setvar "cmdecho" mycmdecho)

(princ)

Hope that does it.

EDIT:

If you use variables you will probably want to set them to nil at the end as well.

(setq mycmdecho nil)

[Anonymous]

Ok, thanks alot. I will try that

[Anonymous]

---

@Shneuph wrote:

I think you probably have to set cmdecho to 0 at the beginning:

Very beginning:

(setq mycmdecho (getvar "cmdecho"))

(setvar "cmdecho" 0)

...rest of code.,..

at end:

(setvar "cmdecho" mycmdecho)

(princ)

Hope that does it.

EDIT:

If you use variables you will probably want to set them to nil at the end as well.

(setq mycmdecho nil)

---

Its still showing up. This is what i get:

AutoCAD menu utilities loaded.
ATTSYNC complete5 nil

Here is my code:

;;This program is to fix Wendy's Title Info Block
;;It will replace The Attribute ArialBlack With CDG Arial Black
(setq mycmdecho (getvar "cmdecho"))
(setvar "cmdecho" 0)
(If (AND (tblsearch "block" "Sheet Info 24x36" (OR (= (strcase (GETVAR "PROJECTNAME")) "WENDYS")(= ln16 "IA (SQE2000)")(= ln16 "IA (NRE2000)")(= ln16 "IA (E2000)")(= ln16 "IA (CG3480 REMODEL)") (= ln16 "IA (E2000 REMODEL)")(= ln16 "IA (NEW YORK REMODEL)"))))
(PROGN
(COMMAND "-INSERT" "Sheet Info 24x36=H:/BL-LIB/Sheet Info 24x36.dwg" "y" "" "0,0" "1" "" "")
(COMMAND "ATTSYNC" "Name" "Sheet Info 24x36" "")
);END Progn
);END IF
(setvar "cmdecho" mycmdecho)
(setq mycmdecho nil)
(princ)

Also, one more thing. This program inserts the block & redefines it but i wonder if i should erase the last enity because i'm assuming this is placing another entity into my file

[stevor]

Although for prompts, try:

(setvar 'nomutt 0)

[Anonymous]

---

@stevor wrote:

Although for prompts, try:

(setvar 'nomutt 0)

---

Does it matter what no mutt is set to in your drawing? I checked the drawing & nomutt was set to 0.