DCL not working

DCL not working

mbrown2N7T5
Contributor Contributor
409 Views
2 Replies
Message 1 of 3

DCL not working

mbrown2N7T5
Contributor
Contributor

Can anyone tell me what I did wrong with the attached DCL and Lisp

I have been looking at it for hours and am missing something.

The file loads but the command does not work.

0 Likes
410 Views
2 Replies
Replies (2)
Message 2 of 3

paullimapa
Mentor
Mentor

your dcl loads find. the problem is with your lisp code at the start you have an extra pair of parenthesis

paullimapa_0-1694747199185.png

Get rid of those and you'll see your dialog:

paullimapa_1-1694747211924.png

 


Paul Li
IT Specialist
@The Office
Apps & Publications | Video Demos
0 Likes
Message 3 of 3

Sea-Haven
Mentor
Mentor

Another version.

 

 

(setq Micro_Names (list "Please choose" "1766-L32AWA" "1766-L32BWA" "1766-L32BXB" "1766-L32BWAA" "1766-L32AWAA" "1766-L32BXBA"))
(if (not AH:Butts)(load "Multi Radio buttons.lsp"))
(setq ans (ah:butts 1 "V" micro_names))

 

Look at the value in ans. The multi radio buttons is a global make a dcl as required 3 lines of code versus a full dcl. Can see up to about 20 choices, "H" is horizontal.

SeaHaven_0-1694750894955.png

 

 

 

 

 

0 Likes