0 Members and 1 Guest are viewing this topic.
(setq firstn "Lee" lastn "Mac" birthday T)(if birthday (alert (strcat "Happy Birthday" (chr 32) firstn (chr 32) lastn (chr 33))))