Insertion de plusieurs lignes de texte

[jms]

Salut,

Savez-vous comment je pourrais insérer soit des text multilignes, soit plusieurs lignes de texte en suivant des lignes de commandes aussi basiques que les suivantes ? (sauf que les suivantes, elles marchent pas 😞 )

(command "TEXT" "J" "TL" "-226602,79855" "30" "0" "ETB2_11C_TechR_C-06-1" "12 m²")
(command "TEXT" "J" "TL" "-226597,80144" "30" "0" "ETB2_11C_TechR_C-06-2" "1 m²")
(command "TEXT" "J" "TL" "-226802,82249" "30" "0" "ETB2_11C_CorriTech_C-09-1" "18 m²")
(command "TEXT" "J" "TL" "-226800,82594" "30" "0" "ETB2_11C_TechR_C-09-2" "3 m²")
(command "TEXT" "J" "TL" "-226588,82928" "30" "0" "ETB2_11C_CorriTech_C-11-1" "4 m²")

Il s'agit ici d'un petit extrait de quelques centaines de lignes permettant, en principe d'afficher des numéros de locaux sur un plan et leurs surfaces respectives, après un retour à la ligne.

Le plus simple serait encore d'insérer un texte multiligne, avec un symbole de retour chariot entre les n° de local et la surface, mais je ne connais pas ce symbole.

Si quelqu'un voit une solution, je l'en remercie !

[jms]

Je viens de trouver une solution en utilisant la commande "DTEXT" plutôt que "TEXT".

Evidemment ça me donne deux lignes de texte, et c'est déjà un résultat. Avec un texte multiligne, ce serait encore mieux 😉

...

Hum, erratum ! J'avais juste testé au clavier et ça fonctionnait, bien sûr. Mais plus lorsque c'est intégré sur une ligne de script...

[didier]

Bonjour @jms

Il semble que ces lignes de texte proviennent d'un fichier externe, c'est bien le cas ?

Si oui, faire un script est la première solution à réfléchir, elle est décrite maintes et maintes fois sur ce site,
Reviens poser la question si tu ne t'en sors pas avec la création de ce script et les aides déjà expliquées...

Amicalement

[jms]

Bonjour Didier,

Merci pour le retour. Oui, ces lignes viennent d'un simple script *.scr

Attention, je ne maîtrise pas du tout le LISP. Quand je fais un "script", il s'agit toujours de lignes de commandes assez basiques puisque limitées à la syntaxe des commandes Autocad. Dans le cas présent, je suis bien obligé de chercher une autre solution. A ce stade, je ne vois que l'insertion d'un bloc avec deux attributs. Mais comme les textes que je souhaite insérer peuvent avoir une orientation et une hauteur variable, je dois juste prévoir une mise à jour de l'échelle en fonction de cette hauteur souhaitée.

 

[didier]

Bonjour @jms

Je ne comprends pas bien ce qu'il faut faire.
Puisque ces lignes viennent d'un fichier script, c'est qu'on peut lancer ce script et obtenir le dessin des textes.

Que faut-il changer ?
Une insertion de bloc avec attributs ?

Pour ce qui est de la direction des textes, il "suffit" de rajouter une donnée pour cette direction dans le script.
Cette direction est-elle connue avant d'écrire les données pour réaliser le script ?

Autre chose : "puisque limitées à la syntaxe des commandes Autocad"
cette phrase est superflue, car de toute façon le script ne permet rien d'autre.

Amicalement

[jms]

Je pense que j'ai du donner beaucoup trop de précisions superflues, en effet.

Si on oublie tout le contenu de ce fil, pour le résumer à l'essentiel, ça donne : quelqu'un peut-il m'aider à écrire un script qui permet d'insérer un texte multiligne dans Autocad ?

[Curlygoth]

hello,

ça fait très longtemps que j'ai pas réaliser de script,

Je les faisait avec mon ami Excel ou je mettait ma formule que je déroulais ensuite...

sur excel CAR(10) te fera un retour à la ligne (non visible) mais compréhensible sur autocad 😉 en enregistrant en .prn puis en renommant en .scr

et sinon : tu les génères comment ?

 

 

 

[jms]

Salut Curlygoth,

Merci pour ton avis. Pour les scripts, je les génère avec un petit utilitaire, qu'un consultant nous avait développé il y a 20 ans, et qui est toujours aussi utile.

Le principe est le suivant : j'ai un certain nombre de variables dans une table d'une DB Access. D'autre part, j'ai un script de base qui contient des commandes Autocad ainsi que le nom des champs de cette table. Quand je lance l'utilitaire, je sélectionne cette DB, ce script de base, et il génère un script avec autant de boucles qu'il y a de lignes dans la table de la DB.

En clair, ça donne un truc comme ceci :(extrait d'un script de base)

-layout s Macro-implantation
(command "insert" "[FG]CARTOUCHE[/FG]" "0,0" "" "" "" "[FG]PARAM5[/FG]" "[FG]PARAM6[/FG]" "Macro-implantation" "[FG]PARAM7[/FG]" "NO_SCALE" "ENGIE")
(command "insert" "P:\\06 - DOCUMENTATION PROJET\\_AUTODESK_SUPPORT_\\_TEMPLATE_\\[FG]LOGO[/FG]" "0,0" "" "" "")

 

Et après le traitement par l'utilitaire, ça donne ceci, soit le même extrait, où les variables sont mises à jour (les "xxxxx..." masquent l'identité du client):

-layout s Macro-implantation
(command "insert" "P:\\06 - DOCUMENTATION PROJET\\_AUTODESK_SUPPORT_\\_TEMPLATE_\\CARTOUCHE_2021.dwg" "0,0" "" "" "" "Gosselies" "3rd" "Macro-implantation" "22/08/2022" "NO_SCALE" "xxxxxxxxxxxx")
(command "insert" "P:\\06 - DOCUMENTATION PROJET\\_AUTODESK_SUPPORT_\\_TEMPLATE_\\LOGO_xxxxxxxxxxx_2014.dwg" "0,0" "" "" "")

 

Concernant l'ajout du CAR(10), comment l'écrirais-tu ? Pas comme ceci, en tout cas : (command "MTEXT" "-226602,79855" "W" "0" "ETB2_11C_TechR_C-06-1" "CAR(10" "12m²")  

[Olivier Eckmann]

(command "_-MTEXT" "1000.0,2000.0" "_J" "MC" "_W" 0 "TOTO\\PTITI" "")

Olivier

[jms]

il y a 5 minutes, Olivier Eckmann a dit :

(command "_-MTEXT" "1000.0,2000.0" "_J" "MC" "_W" 0 "TOTO\\PTITI" "")

Olivier

Ah ben ça, comme on dit à Liège..."Oufti !!!"

Merci Olivier. J'ignorais que ce "\\" renvoyait à la ligne.

Ta réponse me sera utile, encore un grand merci !

[Olivier Eckmann]

C'est \\P qui renvoie à la ligne

Dans un script (ou au clavier) ça ne serait que \P mais dans une commande Lisp, il faut doubler l'anti-slash pour qu'il soit bien interprété.

 

Olivier

[jms]

Oui, le doublement du back-slash, je l'utilisais déjà pour d'autres script, en particulier quand il s'agit d'indiquer un chemin d'accès à un fichier.

J'ai utilisé ton exemple et ajouté les hauteurs et rotation, qui ne sont pas systématiquement les mêmes. Mon script de base donne maintenant ceci: 

(command "_-MTEXT" "[FG]X[/FG],[FG]Y[/FG]" "_H" [FG]HEIGHT[/FG] "_R" [FG]ROTATION[/FG] "_J" "TL" "_W" 0 "[FG]New_rm_id[/FG]\\P[FG]Area[/FG]" "")

Et, une fois traité, le final donne ceci et tout fonctionne :

(command "_-MTEXT" "-226602,79855" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_TechR_C-06-1\\P12 m²" "")
(command "_-MTEXT" "-226597,80144" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_TechR_C-06-2\\P1 m²" "")
(command "_-MTEXT" "-226802,82249" "_H" 30 "_R" 90 "_J" "TL" "_W" 0 "ETB2_11C_CorriTech_C-09-1\\P18 m²" "")
(command "_-MTEXT" "-226800,82594" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_TechR_C-09-2\\P3 m²" "")
(command "_-MTEXT" "-226588,82928" "_H" 30 "_R" 90 "_J" "TL" "_W" 0 "ETB2_11C_CorriTech_C-11-1\\P4 m²" "")
(command "_-MTEXT" "-226587,83135" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_ITR_C-11-2\\P5 m²" "")
(command "_-MTEXT" "-226808,83009" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_TechR_C-11-3\\P2 m²" "")
(command "_-MTEXT" "-226582,83396" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_TechR_C-11-4\\P7 m²" "")
(command "_-MTEXT" "-226469,81888" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Corri_D-08-2\\P3 m²" "")
(command "_-MTEXT" "-226527,82759" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Stairs_87_STAIRS\\P16 m²" "")
(command "_-MTEXT" "-226734,81891" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Lift_BH_LIFT\\P9 m²" "")
(command "_-MTEXT" "-221893,80160" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_Offic_01\\P112 m²" "")
(command "_-MTEXT" "-220774,81075" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_TechR_036\\P2 m²" "")
(command "_-MTEXT" "-221557,80507" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_Corri_101\\P49 m²" "")
(command "_-MTEXT" "-221016,80393" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_MeetS_102\\P10 m²" "")
(command "_-MTEXT" "-223084,80351" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_Corri_118\\P5 m²" "")
(command "_-MTEXT" "-223047,80521" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_PrintC_121_PRINT\\P10 m²" "")
(command "_-MTEXT" "-222517,80194" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_Offic_13\\P26 m²" "")
(command "_-MTEXT" "-220777,80484" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_TechR_136\\P0 m²" "")
(command "_-MTEXT" "-222904,80195" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_Offic_16\\P25 m²" "")
(command "_-MTEXT" "-222060,80691" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_Offic_22\\P137 m²" "")
(command "_-MTEXT" "-221186,80691" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_Offic_32\\P17 m²" "")
(command "_-MTEXT" "-220916,80691" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11BC_Offic_34\\P21 m²" "")
(command "_-MTEXT" "-219621,79317" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Stairs_00_STAIRS\\P17 m²" "")
(command "_-MTEXT" "-220039,78753" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Offic_01\\P118 m²" "")
(command "_-MTEXT" "-219962,78365" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_103\\P8 m²" "")
(command "_-MTEXT" "-219596,79839" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_PrintC_121_PRINT\\P11 m²" "")
(command "_-MTEXT" "-219852,79944" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_MailR_122\\P7 m²" "")
(command "_-MTEXT" "-219852,80082" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_MeetR_123\\P19 m²" "")
(command "_-MTEXT" "-219830,81191" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_131\\P7 m²" "")
(command "_-MTEXT" "-220233,83947" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_149\\P8 m²" "")
(command "_-MTEXT" "-220234,84489" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_152\\P8 m²" "")
(command "_-MTEXT" "-219903,84220" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_158\\P8 m²" "")
(command "_-MTEXT" "-220193,79138" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_16\\P13 m²" "")
(command "_-MTEXT" "-219744,81524" "_H" 30 "_R" 90 "_J" "TL" "_W" 0 "ETB2_11C_CorriTech_165\\P18 m²" "")
(command "_-MTEXT" "-220199,79441" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_18\\P12 m²" "")
(command "_-MTEXT" "-220187,79721" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_MeetR_20\\P37 m²" "")
(command "_-MTEXT" "-220182,81024" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_CoffeeC_27_COFFEE\\P40 m²" "")
(command "_-MTEXT" "-220196,81720" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_35\\P13 m²" "")
(command "_-MTEXT" "-220197,81969" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Bubble_37\\P13 m²" "")
(command "_-MTEXT" "-220034,83678" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Offic_38\\P292 m²" "")
(command "_-MTEXT" "-219854,82878" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_PrintC_64_PRINT\\P9 m²" "")
(command "_-MTEXT" "-219605,81761" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Stairs_73_STAIRS\\P16 m²" "")
(command "_-MTEXT" "-220029,79721" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11C_Corri_99\\P17 m²" "")
(command "_-MTEXT" "-217270,79170" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_TechR_00\\P12 m²" "")
(command "_-MTEXT" "-217540,79517" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Offic_01\\P27 m²" "")
(command "_-MTEXT" "-218276,79517" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Offic_04\\P33 m²" "")
(command "_-MTEXT" "-218730,79517" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Offic_06\\P33 m²" "")
(command "_-MTEXT" "-219255,79517" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Offic_08\\P27 m²" "")
(command "_-MTEXT" "-219260,81573" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Offic_09\\P22 m²" "")
(command "_-MTEXT" "-218018,79880" "_H" 22 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_ToilM_103_WC-WOMEN\\P25 m²" "")
(command "_-MTEXT" "-218521,79823" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_TechR_105\\P7 m²" "")
(command "_-MTEXT" "-218841,79880" "_H" 22 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_ToilM_106_WC-MEN\\P21 m²" "")
(command "_-MTEXT" "-219128,81191" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Bubble_109\\P7 m²" "")
(command "_-MTEXT" "-218795,81573" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Bubble_11\\P14 m²" "")
(command "_-MTEXT" "-218568,81573" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Offic_12\\P14 m²" "")
(command "_-MTEXT" "-219686,80699" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_MeetS_129\\P13 m²" "")
(command "_-MTEXT" "-218276,81573" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Bubble_13\\P14 m²" "")
(command "_-MTEXT" "-218006,81573" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Offic_14\\P14 m²" "")
(command "_-MTEXT" "-217532,81573" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Offic_16\\P22 m²" "")
(command "_-MTEXT" "-218005,80306" "_H" 22 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_ToilM_203_WC-DIS\\P4 m²" "")
(command "_-MTEXT" "-217511,80091" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Store_901\\P9 m²" "")
(command "_-MTEXT" "-219322,80091" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_Store_908\\P9 m²" "")
(command "_-MTEXT" "-216951,79591" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Offic_01\\P341 m²" "")
(command "_-MTEXT" "-216725,78372" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Bubble_107\\P8 m²" "")
(command "_-MTEXT" "-217041,79313" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Offic_117\\P7 m²" "")
(command "_-MTEXT" "-217317,79857" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11CD_PrintC_21_PRINT\\P11 m²" "")
(command "_-MTEXT" "-216973,79938" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_MailR_122\\P6 m²" "")
(command "_-MTEXT" "-216979,80084" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_MeetR_123\\P19 m²" "")
(command "_-MTEXT" "-216981,80520" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_MeetR_126\\P31 m²" "")
(command "_-MTEXT" "-216905,83948" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Bubble_158\\P8 m²" "")
(command "_-MTEXT" "-216906,83683" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Bubble_160\\P8 m²" "")
(command "_-MTEXT" "-217023,81524" "_H" 30 "_R" 90 "_J" "TL" "_W" 0 "ETB2_11D_CorriTech_165\\P18 m²" "")
(command "_-MTEXT" "-216622,82095" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Bubble_38\\P13 m²" "")
(command "_-MTEXT" "-216623,82364" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Offic_40\\P13 m²" "")
(command "_-MTEXT" "-216613,82529" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Bubble_41\\P13 m²" "")
(command "_-MTEXT" "-216614,82943" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Bubble_44\\P13 m²" "")
(command "_-MTEXT" "-216816,83408" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Offic_45\\P191 m²" "")
(command "_-MTEXT" "-216955,83068" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_Bubble_63\\P13 m²" "")
(command "_-MTEXT" "-217088,82875" "_H" 30 "_R" 0 "_J" "TL" "_W" 0 "ETB2_11D_PrintC_64_PRINT\\P9 m²" "")
 

MERCI !