LISP cond predicate / test for text

akendall1966
akendall1966
in Programming and customization

Hi Folks,

Trying to learn a little LISP and make a few productivity tools for myself. I put together the attached routine as I put a lot of slots in sheet metal panels where they bolt together. But, I'm stuck can't find anything on the web which suggest I probably just doing it the wrong way. I am using a condition to run different protions of the code to give either a slot with a full rad at each end or rectanlgular slot with filleted corners. Snippet below I am just not getting a match on RADTYPE = "Filleted"

(initget 1 "fullRad Filleted")
(setq RADTYPE (getkword "\nSelect System [Full(R)adius/(F)illeted]: "))
(cond 
(
    (= RADTYPE "Filleted")

Tried: eq eql equals none work :/

What the proper way to get and comapre the users choice in a cond?

Appriciate any help recieved.

Adrian

Comments

This discussion has been closed.