Topo.lsp : bug sur AutoCAD 2011

[PhY62]

Bonjour à tous.

 

J'utilise topo.lsp (avec topo.dcl) de la suite BonusCAD 2002 pour charger des semis de points.

 

La routine fonctionnait parfaitement jusqu'à la version 2010 et depuis mon passage à la version 2011 c'est le drame :

 

Commande: topo

quitter / sortir abandon; erreur: une erreur est survenue dans la fonction

*erreur*paramètre de la variable AutoCAD rejeté: "textstyle" nil

 

Merci pour vos réponses et longue vie au site :)

 

edit:

http://bruno.valsecchi.neuf.fr/index.html pour la routine

le fichier de pts ascii est sous la forme X Y Z

 

exemple

1000.00 2000.00 10.00
1233.44 2533.25 12.45
...

 

[Edité le 12/4/2010 par PhY62]

[bonuscad]

Bonjour,

 

Je n'ai pas de version 2011 à disposition pour pouvoir corriger.

 

Mais pourrais tu coller directement ce qui suit en ligne de commande (le faire dans un nouveau dessin vierge)

(command "._style" "$spec-lsp" "simplex" "0.0" "1.0" "0.0" "_No" "_No" "_No") 

 

Tu postes le retour de ce qui apparait en fenêtre de texte. (F2)

Peut être que la commande STYLE à des paramètres supplémentaires (ou en moins) par rapport aux versions précédentes.

 

(gile) a aussi écrit une routine d'importation de fichier de points, tu peut essayer de l'utiliser en attendant (ou définitivement) ;)

[PhY62]

Merci Bonuscad pour ta réponse :)

 

Commande: (command "._style" "$spec-lsp" "simplex" "0.0" "1.0" "0.0" "_No" 
"_No" "_No")
._style Entrez le nom du style de texte ou [?] : $spec-lsp
Nouveau style.
Spécifiez le nom de police complet ou le nom de fichier de polices (TTF ou SHX) 
: simplex Spécifiez la hauteur du texte ou [Annotatif] <0.00>: 0.0 
Spécifiez le facteur de largeur <1.00>: 1.0
Spécifiez l'angle d'inclinaison <0.00g>: 0.0 Afficher le texte inversé ? 
[Oui/Non] : _No Afficher le texte renversé ? [Oui/Non] : _No 
Vertical? [Oui/Non] : _No
"$spec-lsp" est maintenant le style de texte courant.

Commande: nil 

 

Je cours voir la routine de (gile) ;)

[PhY62]

bonjour à tous

 

Je reviens sur mon problème de lisp.

 

Notre bureau d'études a eu des problèmes avec la version 2011. Dans un 1er temps, le service informatique nous a ré-installé la version 2010 (désintallation de la v2011) en attendant le service pack 1. Je me suis dis "chouette topo va refonctionner !"

Ben non, toujours le même problème :

 

Commande: topo
quitter / sortir abandon; erreur: une erreur est survenue dans la fonction 
*erreur*paramètre de la variable AutoCAD rejeté: "textstyle" nil

Commande: 

 

Je ne comprend plus rien.

 

J'ai pourtant cherché des "résidus" de la version 18.1... sans succès.

 

Merci de vos réponses

 

[bonuscad]

Bonjour,

 

Je n'arrive pas à reproduire le problème sous ma version.

 

Je te suggère d'éditer avec le bloc-note le fichier topo.lsp.

 

Au tout début du fichier cela doit être de la forme

 

(defun toperr (ch / sv_cmd sv_sty a b ech plnw1 plnw2 plnw3 num_ok alt_ok
                   drp_pt drp_sp dcl_id coma what_der xxx what_next cnt znul
                   biz htx num dx dy alt pt nb nw_car carac chaine pl_nam
                   m n layname onoff frozth color linetype vpf vpn ss cvpname
                   xdlist vpldata sortlist name templist bit-70 chn
                   old-idx layname on off frozth linetype colname
                   errtile layinfo color dashdata
             )

 

Et bien tu enlève toutes les variables locales pour avoir simplement ceci:

 

(defun toperr (ch / )

 

Tu sauvegarde ta modif et tu fais un essai...

Je soupçonne la variable "sv_sty" d'être remise à nil.

Si cela perdure essayes de la soustraire de la même manière que ci-dessus pour la fonction principale

(defun c:topo ( / sv_cmd sv_sty a b ......) - > (defun c:topo ( / sv_cmd a b .....)

 

C'est manips sont juste pour essayer de débuger ...

[PhY62]

Merci pour ta réponse :D

 

1er essai infructueux:

 

Commande: topo
quitter / sortir abandon
Commande: 

 

2ème essai : -> même chose que 1

 

Cela ne peut pas venir d'une version de framework.net ou de microsoft visual c++ installée avec la v2011 ?

 

Le lisp fonctionnait correctement à l'époque avec la version 2010.

 

 

[bonuscad]

Cela ne peut pas venir d'une version de framework.net ou de microsoft visual c++ installée avec la v2011 ?

 

Non

 

*erreur*paramètre de la variable AutoCAD rejeté: "textstyle" nil

 

Si en ligne de commande tu fais: (setvar "textstyle" nil), tu auras le même retour d'erreur.

 

donc si dans le code dans la partie (defun c:topo ..... , tu mets en remarque avec un semi-colon ; les ligne suivantes

 

;  (setq olderr *error* *error* toperr)  
;  (setq sv_sty (getvar "textstyle"))
;  (cond
;    ((null (tblsearch "STYLE" "$SPEC-LSP"))
;      (command "._style" "$spec-lsp" "simplex"
;               "0.0" "1.0" "0.0" "_No" "_No" "_No"
;      )
;    )
;  )
;  (setvar "textstyle" "$SPEC-LSP")
 
 
 
;  et celle ci en fin de code
;  (setvar "textstyle" sv_sty)
;  (setq *error* olderr)

 

Peut être que cela va isoler le problème ?!... :(

[PhY62]

non toujours pas :(

 

Commande: topo
; erreur: quitter / sortir abandon

Commande: 

 

Perso, je ne pense pas que ça provient du code puisque qu'avant l'install / déinstall 2011 puis la ré-install de la 2010 ça fonctionnait.

 

:casstet:

 

 

[bonuscad]

bizarre :o

 

Et toutes les commandes des expresstools fonctionnent? Tu n'as pas d'autre souci ?

 

De mon côté je cale. :(

 

Dernière espoir, fais toi un nouveau profil vierge pour voir si tu as les même symptômes, peut être un problème d'environnement mal déclaré...

 

Ou alors une incohérence dans ma fonction erreur

une erreur est survenue dans la fonction *erreur*

 

Tu peux , toujours mettre cette fonction complétement en remarque pour qu'elle ne soit pas chargée. (en gardant aussi les remarques que t'as faites au préalable)

 

; (defun toperr (ch / )

; ....

; )

 

Fais un essai dans un nouveau dessin (pour être sure de n'avoir aucune fonction au départ en mémoire)

 

 

[Edité le 6/5/2010 par bonuscad]

[PhY62]

Au niveau les express tools ça fonctionne correctement.

 

La routine InsTopo de (gile) fonctionne aussi (cette routine est mon plan B actuellement).

 

Il y quelques routines lisp qui fonctionnaient et qui ne fonctionnent plus depuis mon passage à la v2011 (talus.lsp notamment).

 

J'ai vraiment la nette impression qu'il reste un truc installé par la v2011 qui pose problème :casstet: :casstet:

 

 

 

 

[bonuscad]

Il y quelques routines lisp qui fonctionnaient et qui ne fonctionnent plus depuis mon passage à la v2011 (talus.lsp notamment)

 

Si cette routine talus est la mienne, j'ai bien peur que ce soit mon code qui pose problème (elle utilise la même structure de gestion d'erreurs. )

 

Si tu te sens pas de faire les manips de débogage que je t'ai indiqué. Tu me donne une adresse courriel et je t'envoie le fichier.

 

Pour talus je peux te proposer une version complétement réécrite que je n'ai pas encore mis en ligne, sauf sur acadlabs.com

[PhY62]

Euh... comment fait-on ici pour envoyer un message privé pour te donné mon mail ?