Alright this is what I did to make this all work, for anyone that is interested.
(DEFUN C:P12011() (COMMAND "POLARMODE" "7")(COMMAND "polaraddang" "79.8612; 7.4585; 11.1492; 101.1492; 191.1492; 281.1492; 46.9352; 136.9352; 226.9352; 316.9352"));;replace the angles with the angles you need for your job
I decided to use "p" for polar and the job number after it to kick off the lisp. Each job will have a different set of angles needed and this to me was the easiest way to remember the correct command for each job.
(DEFUN C:P-()(COMMAND "polaraddang" "."))
Will set polar angle addition to an empty string, now you can start fresh for the next job.
Thanks again to cadtag and dave for all your help. Its guys like you that make this web site great. I tried to add reputation points to both of you but I guess i need to spread the love. lol