the nearest i got to was ..
create the function as a prg file with the paramters
return as a function returns
i.e.
modi comm xx.prg
parameter p
wait window p
return .t.
? xx("<g>")
*g*