Function Call w/ Arguements Not working Please help!

[duan623104]

Here is my section of code that I need help on. The error VisualLISP is giving me is :Function Canceled. The builder doesn't complain, so my syntax is correct, but its just not working. I am making simple lines and changing the color to them using the "change" command with a function call. Can anyone please tell me what I am doing wrong??

(defun color (col)
    (command "change" col "" "P" "C" "T" "255,0,0" "")
)

(defun c:wellplace ()
(color po2)  ;po2 is a "point number 2" that is calculated else in the code.
)

Shouldn't it take the po2 which is a polar point, consisting of x,y,z coordinates and pass it along to the "color function"?
I am doing this, because I need to do the "change" command a good 8 times, and i don't want 8 of duplicate lines of the same thing.

Also if i go with not defining a function and just inputting the "change" command right into the body of my code, it works perfect, and replace 'col' with 'po2' so what gives?

[Opie]

You are saying PO2 is supposed to be a coordinate? It may not be picking any objects at that coordinate. Have you thought about passing the entity or entities as an argument?