Macro for selecting construction lines

[teaaddict]

I have customers who want drawings in DWG format. To do this I have a macro that puts different line and annotation onto different layers. This can be done with swAnnot.GetType. How do I select construction lines with chain style in to put them onto a centreline layer from within a macro?