Changing text style

[tagkelas]

Does anyone know how to change text style in this lisp routine (font..)?

KORKTH.LSP

[Lee Mac]

It sets it near the top:

 

 (command "style" "standard" "wgsimpl.shx" "" "" "" "" "")

 

Either remove that line, or change it to what you want.

 

Lee

[tagkelas]

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)

KORKTH.LSP

[Lee Mac]

You will probably need to use a font that supports greek :wink:

[tagkelas]

 (command "style" "standard" "arial.shx" "" "" "" "" "")

Is this correct?

[Lee Mac]

Perhaps something like:

 

(commmand "_.-style" "standard" "arial.ttf" "" "" "" "" "")

[tagkelas]

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.

 

;**************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

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 useful

[stevesfr]

Perhaps something like:

 

(commmand "_.-style" "standard" "arial.ttf" "" "" "" "" "")

 

 

Is it possible to somehow utilize an "english" font in this program, or is it not worth it to convert all the called for ascii symbols? A clue please.

Steve

[Lee Mac]

Steve,

 

Why not ASMI's program instead - I think it performs the same operation:

 

http://www.asmitools.com/Files/Lisps/Tabcord.html

[stevesfr]

Steve,

 

Why not ASMI's program instead - I think it performs the same operation:

 

http://www.asmitools.com/Files/Lisps/Tabcord.html

 

Lee, thanks, should have searched deeper; plus tabcord has all sort of user customization possibilities available!

Steve

[Lee Mac]

Lee, thanks, should have searched deeper; plus tabcord has all sort of user customization possibilities available!

Steve

 

 

Yeah, I reckon that was one of ASMI's best ones