réglage des variables en lisp / passer en présentation objet

[gtrghtr]

Bonjour,

 

voici un nouveau problème:

 

au démarrage de chaque plan j'essaie de créer un lisp qui me règle mes variables: ucsfollow, navcubedisplay, ...

mais visiblement certaines de ces variables sont bloqué en espace papier comme "navecubedisplay"

mais il arrive que les plans soient enregistré en espace papier au quel cas ils s'ouvrent en espace papier, du coup j'ai le message:

Entrez une nouvelle valeur pour NAVVCUBEDISPLAY <0>: 1
Impossible de mettre NAVVCUBEDISPLAY à cette valeur.

et mon lisp ne se charge pas. :(

 

au démarrage je charge le lisp suivant:

 

(defun-q CHLYB () 

; variable
(setvar "UCSFOLLOW" 0 )
(setvar "NAVVCUBEDISPLAY" 1) ;désactive le viewcube

(princ) 
) 

(setq S::STARTUP (append S::STARTUP CHLYB )) 


; fin d’initialisation LYB

 

donc, est ce que quelqu'un sait comment est ce que je peux passer en présentation objet en lisp ?

 

 

 

Merci bien et bonne rentrée à tous,

 

GTR

[Goldorak44]

Salut,

 

tu peux passer en vue "objet" avec cette commande :

 

(command "_MODEL")

 

;)

[gtrghtr]

excellent c'est bien ça que je cherchait et ça fonctionne !

 

Merci :)

[Tramber]

Avec (setvar "TILEMODE" 0) après un (setq memo(getvar "TILEMODE")) on a un avantage sur (command "_model"), c'est qu'on peut mémoriser la valeur et revenir à l'espace papier si souhaité !

[gtrghtr]

merveilleux :)

 

on a donc:

(setq til(getvar "TILEMODE"))
(setvar "TILEMODE" 1)
(setvar "NAVVCUBEDISPLAY" 1)
(setvar "TILEMODE" til)

 

ce qui est encore plus propre.

 

Merci encore et bonne fin de journée,

 

GTR