Visual LISP, AutoLISP and General Customization
cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

Enable "Shaded viewport options", "Shade plot" in Model?

3 REPLIES 3
Reply
Message 1 of 4
Micke_ELE
890 Views, 3 Replies

Enable "Shaded viewport options", "Shade plot" in Model?

Is there any option to enable Shaded viewport options in Model?

 

An costomer have many files probobly convertet to dwg from other software.

 

We have an LISP batch plot function that checks if the drawing is an model or layout and sends the approtiate answers to plot command.

When model behave as an layout the batch plot stops working.

 

Is it possible to check with lisp if model have "Shaded viewport options" enabled or force ti to be enabled?

 

Included:

 

svo_enabled.dwg - Shade viewport options enabled in model.

 

svo_disabled.dwg - Shade viewport options disabled in model.

 

/Micke

 

3 REPLIES 3
Message 2 of 4
pendean
in reply to: Micke_ELE

One idea... How about instead of "checking" your lisp actively sets what you want to ensure you get what you want? For example, if you want to be in modelspace then use MODEL command, and to set "shade plot" settings you can use SHADEMODE and/or -PLOT command's detailed options for shade plot settings (there is a dash in that command's name).

Practice these at the commandline, see how they work.
Message 3 of 4
Micke_ELE
in reply to: pendean

MODEL and SHADEMODE don’t change anything.

Both files are in Model and SHADEMODE is 2Dwireframe but they behave different.

Svo_disabeled.dwg have "Shaded viewport options" disabled and "Scale lineweights" enabled in plot dialogue.

I need a way to force it to be the same or a way to check the difference.

Message 4 of 4
Micke_ELE
in reply to: Micke_ELE

The part of my lisp that dont work when Model behave as Layout is:

 

(if (= (getvar "CTAB") "Model")
	(command "plot" "Y" "" pc3 (caddr (cdr (assoc ram papper))) "M" (if (or (= ram "A4") (= ram "A1S"))"P" "L") "N"
	      "W" "none" ins "none" (list (+ (car ins) (* maxx skala)) (+ (cadr ins)(* maxy skala)))
	      (/ 1 skala) "CENTER" "y" ctb (if (or (= ram "A1")(= ram "A1S")(= ram "A0")) "n" "Y") "A" fnamn "N" "Y")
     (command "plot" "Y" "" pc3 (caddr (cdr (assoc ram papper))) "M" (if (or (= ram "A4") (= ram "A1S"))"P" "L") "N"
	      "W" "none" ins "none" (list (+ (car ins) (* maxx skala)) (+ (cadr ins)(* maxy skala)))
	      (/ 1 skala) "CENTER" "y" ctb (if (or (= ram "A1")(= ram "A1S")(= ram "A0")) "n" "Y")
	      "N" "N" "N" fnamn "N" "Y")
)

 The code stops at "A" when Model behaves as Layout.

 

/Micke

Can't find what you're looking for? Ask the community or share your knowledge.

Post to forums  

Autodesk Design & Make Report

”Boost