Thanks the one I was looking for was Pointstyles, I thought I tryed that as a guess.
Also made a couple of changes to the original code gratefully supplied by AlanJt
;vercheck.lsp version check for aecc objects
(defun ah:vercheck ()
(vl-load-com)
(if ((lambda (vrsn)
(cond
((vl-string-search "R17.2" vrsn) (setq appstr "6.0")) ;09
((vl-string-search "R18.0" vrsn) (setq appstr "7.0")) ;10
((vl-string-search "R18.1" vrsn) (setq appstr "8.0")) ;11
((alert "This version of C3D not supported!"))
)
)
(vlax-product-key)
) ; end if condition progn is true
(progn
(cond (*AeccDoc*)
((setq *AeccDoc*
(vlax-get
(cond (*AeccApp*)
((setq *AeccApp*
(vla-getinterfaceobject
(cond (*Acad*)
((setq *Acad* (vlax-get-acad-object)))
)
(strcat "AeccXUiLand.AeccApplication." appstr)
)
)
)
)
'ActiveDocument
)
)
)
) ; end main cond
) ; end progn
) ; end if vsrn
)
and now
;; Original code by Alan J. Thompson, 06.22.10
;; Modified by Alan H Jan 2011
(vl-load-com)
(ah:vercheck)
(vlax-for j (vlax-get *AeccDoc* 'Pointstyles)
(setq lst (cons (cons (vla-get-name j) j) lst))
)
this way only need to change 1 lisp for newer versions hopefully