Topic: 2009 Bug with Autolisp custom commands?

[KewlToyZ]

FYI,
I hope you don't mind.
I shared this piece of work with the folks at Autodesk subscription services.

This is brilliant!

I have to agree with them.

[KewlToyZ]

I took a quick peek at DTD.lsp and it appears that the STYLE command in V2009 now has one extra prompt that your routine isn't supplying a value for.

I'm not seeing this from the command prompts in 2009?
(command "-style" "KTA Notes" "archquik.shx" sca 0.9 0 "No" "No")
1.) -style - command invoked
2.) Style name - KTA Notes
3.) Font name - archquik.shx
4.) Height - sca (factored by the dimscale)
5.) Width - 0.9
6.) Obliquing - 0
7.) Backwards - No
8.) Upside Down - No

Just strange the command runs and exits without any errors but only invokes every other time it is called?

[KewlToyZ]

Fixed, knew it was something simple  :ugly:

Code: [Select]

(defun c:dtt()
(c:setscale)
(setq sc (getvar "dimscale"))
(setq scx 0.25)
(setq sca (* sc scx))

(setq titlstart (getpoint "\nChoose start point for KTA Titles text:  "))
;=================================================Turn off command line responses
(command "CMDECHO" 0);DO NOT CHANGE THIS LINE
;=======================================================================

(command "-layer" "m" "G-ANNO-TITL" "l" "CONTINUOUS" "G-ANNO-TITL" "c" 2 "G-ANNO-TITL" "LW"  0.60 "G-ANNO-TITL" "")
(command "-style" "KTA Titles" "archquik.shx" sca 1.0 0 "No" "No")
(prompt "\nEnter your KTA Title!!")
(command "dtext" "Style" "KTA Titles" titlstart 0 /pause)
;=================================================Turn on command line responses
(command "CMDECHO" 1);DO NOT CHANGE THIS LINE
;========================================================================

(prompt "\nDTT comand KTA Titles complete!!")
(princ)
)