Text to Arctext > orient Arctext

[Lukasvop1]

Hi guys, one more stuff I need, is copy many texes to the Arctexts here is oreder of steps :

Text to Arctext

   1.Set the properties of Arctext (rememeber it)
   2.Select text (Single line text)
   3.Select Arc
   4.Create Arctext above arc

   5.Select text > select arc

   6.Delete source text (possible feature - it will be good if lisp automatically delete source text, but if it's too complicated, no needed)

Orient Arc text

   1.select Arctext
   2.use (up, down, left, right) arrow to orient Arctext

 

 

[ВeekeeCZ]

No way to avoid the dialog. No way to pass the text content directly.

[Lukasvop1]

I little bit think of it and realize Arctext is like "extension" inside AutoCAD by default.
Arctext isn't type of text.

 

So to be able make Arctext work as I want, need to create extension similar like default Arctext but with featurres I described on the topic.

Am I right?

[ВeekeeCZ]

That's not what I am seeing. But still, can't do any better than posted.

[komondormrex]

---

@Lukasvop1 wrote:

Arctext isn't type of text.

---

surely not at all. it is more likely a number of chars placed radially regarding to arc. it can be easily found when an arctext is exploded.

and yes it is sort of entity created with external runtime extension written in c* language. 

but i think what you are looking for could be solved using lisp. 

[Lukasvop1]

@ВeekeeCZ wrote:
This can be used to adjust already existing texts.Not before, nor while creation (if the dialog is on).

This could be rewritten to simply toggle convex/concave and in/outward.

Yes, but the same is possible do it now when type command "arctext" and select (previously) created Arctext
then change "convex/concave" "inward/outward"

Because of that, I want create simple and fast solution (for user) do that multiple at once. I think easiest way how to control it, is by arrow key.

How otherwise you wana do it?

[Sea-Haven]

Arctext is an Express tool, so for Acad may be able to find the corresponding lsp, it may have a defun inside that you can call, an example is Extrim.lsp but in lisp its (etrim ........

No Acad at moment.

[daniel_cadext]

It looks like a custom object to me (AcDbArcAlignedText).

You should be able to run entget, entmod , entmake on these. just have to figure out the dxf codes

[komondormrex · Accepted solution]

hey there,

check the ATXT.vlx compiled rared version. loads as same as raw.

updated_5

[Lukasvop1]

Very nice job, works smart and fast as I wanted. Maybe one little detail can you rename it to "ATXT"?

[komondormrex]

sure, #9

[Lukasvop1]

Thank you, I found one more thing, is kind of way how to change arctext settings in this lisp?

You set default as I posted in topic, It was just example (it my mistake), most common I use this :

 

Is possible to control it?

[komondormrex]

check update.

default settings is now (setq atxtset '(120 30 30)) ; height spacing offset.

if you want to change it run setq function in command line eg. (setq atxtset '(150 25 25)) or else you want BEFORE running atxt command.

to see current settings use !atxtset.

[Lukasvop1]

Absolutely perfect, thank you.

[Lukasvop1]

Hi, I found one more issue when select text and then pick arc to align, layer of both are changed to 0. I need let all vault on source layer (don´t change it). Is it possible? Thank you.

[komondormrex]

hi,

sure. check update.

[Lukasvop1]

Nice, thank you but now changed also default arctext settings.

Can you set default settings back to (120 30 30)?

[Lukasvop1]

Hello,
currently I switched into AutoCAD 2026 and your lisp stop working. I got this error message. Can you chcek it please?

[komondormrex]

hey, 

checked it in 26, works all fine. 

[Lukasvop1]

Well, so what's could be wrong? I changed SSD because it crashed, reinstall AutoCAD to 2026 version and got this error..