It sets it near the top:
Either remove that line, or change it to what you want.Code:(command "style" "standard" "wgsimpl.shx" "" "" "" "" "")
Lee

Registered forum members do not see this ad.
Does anyone know how to change text style in this lisp routine (font..)?
It sets it near the top:
Either remove that line, or change it to what you want.Code:(command "style" "standard" "wgsimpl.shx" "" "" "" "" "")
Lee
Lee Mac Programming
With Mathematics there is the possibility of perfect rigour, so why settle for less?
Just another Swamper

Thanks for the answer Lee Mac.
I saw that and I did it,but...
If I modify it or erase it, it won't recognize the greek fonts.
When you select a polyline it automatically adds a letter in every vertex in order. A,B,C ect (but in greek Α,Β,Γ..)
See these samples with the previous routine (with some changings)
The result is in 1.jpg but I need the second one (2.jpg)
You will probably need to use a font that supports greek![]()
Lee Mac Programming
With Mathematics there is the possibility of perfect rigour, so why settle for less?
Just another Swamper

Is this correct?Code:(command "style" "standard" "arial.shx" "" "" "" "" "")
Perhaps something like:
Code:(commmand "_.-style" "standard" "arial.ttf" "" "" "" "" "")
Lee Mac Programming
With Mathematics there is the possibility of perfect rigour, so why settle for less?
Just another Swamper

Once again correct...
Can you explain me where exactly is the code that adds the next letter in the next vertex (etc.)
I think is in the next one sample.
I congratulate you one more time not only for your help but for your lisp you gave us (- Incremental Numbering Suite - Automatic Numbering - Attribute Modification Suite - Dynamic Information Tool - Curve Aligned Text - Piping Program -). Very usefulCode:;**************LABELS ON LANDMARKS********************** (setq ptp (polar (nth i pllst) angtxt (* ht 1.5))) (if (= i 17) (setq alfa 194) ) (command "text" "j" "c" ptp ht 100 (if (< i 24) (strcat prfx "%%" (itoa (+ i alfa)) sufx) (strcat prfx "%%217" (itoa (- i 23)) sufx) ) );endtext
Last edited by tagkelas; 22nd Aug 2009 at 11:42 pm.
Steve,
Why not ASMI's program instead - I think it performs the same operation:
http://www.asmitools.com/Files/Lisps/Tabcord.html
Lee Mac Programming
With Mathematics there is the possibility of perfect rigour, so why settle for less?
Just another Swamper
Bookmarks