Arbortext IsoDraw > Macro Language Reference > Window Commands > Attribute Window > Contour Sets
  
Contour Sets
* 
The contour set macro commands below are only available in 3D mode:
ADD CONTOURSET (See Add Contourset.)
ACTIVATE CONTOURSET (See Activate Contourset.)
SELECTED OBJECTS TO ACTIVE CONTOURSET (See Selected Objects to Active Contourset.)
REMOVE SELECTED OBJECTS FROM CONTOURSET (See Remove Selected Objects from Contourset.)
If the active document is in 2D mode when one of these commands executes, the macro will generate this error message: Macro error: Active window is not in 3D mode.
The following example macro uses the contour set commands in this section.
MACRO contour_test
# recorded with Arbortext IsoDraw 7.3
OPEN "D:\data\batch_process_example_data\ProE\ac-40.asm"
3D TRANSFORM 0.565 0 (-0.825) 0 0.378 0.889 0.258 0 0.734 (-0.458) 0.502 0 (-69.908) 32.939 3.418 1
ADD CONTOURSET "black"
activeDoc.contoursets["black"].color.type = "colorRef"
activeDoc.contoursets["black"].color.color = "Black"
activeDoc.contoursets["black"].color.tone = 1
ADD CONTOURSET "red"
activeDoc.contoursets["red"].color.type = "cmykValues"
activeDoc.contoursets["red"].color.CMYK = "{CMYK 0 1 1 0}"
ADD CONTOURSET "gold"
activeDoc.contoursets["gold"].color.type = "rgbValues"
activeDoc.contoursets["gold"].color.RGB = "{RGB 255 219 0}"
ACTIVATE CONTOURSET 'gold'
SELECT AT 224.769 265.826
SELECTED OBJECTS TO ACTIVE CONTOURSET
SELECT AT 268.689 293.343
ACTIVATE CONTOURSET 'red'
SELECTED OBJECTS TO ACTIVE CONTOURSET
SELECT AT 299.646 281.173
ACTIVATE CONTOURSET 'black'
SELECTED OBJECTS TO ACTIVE CONTOURSET
SELECT AT 340.92 226.669
SELECTED OBJECTS TO ACTIVE CONTOURSET
REMOVE SELECTED OBJECTS FROM CONTOURSET
ACTIVATE CONTOURSET 'gold'
ACTIVATE CONTOURSET 'gold'
SELECT NONE
ACTIVATE CONTOURSET 'red'
ACTIVATE CONTOURSET 'red'
activeDoc.contoursets["red"].name = "red2000"
activeDoc.contoursets["red2000"].color.CMYK = "{CMYK 0.19 1 1 0}"
ACTIVATE CONTOURSET 'gold'
activeDoc.contoursets["gold"].name = "gold700"
activeDoc.contoursets["gold700"].color.RGB = "{RGB 255 201 0}"
ACTIVATE CONTOURSET 'black'
activeDoc.contoursets["black"].color.tone = 0.76
MESSAGE activeDoc.contoursetCount
END MACRO