2 puts "CR24420: Test for type of sensitivity of AIS_Plane"
7 set aV "Driver1/Viewer1/View1"
8 vinit name=$aV l=32 t=32 w=400 h=400
16 puts "Testing Select3D_TOS_INTERIOR type of sensitivity:"
21 checkcolor 395 200 0 1 1
24 puts "Error : Select3D_SensitiveFace does not work properly with type of sensitivity Select3D_TOS_INTERIOR!"
29 puts "Testing Select3D_TOS_BOUNDARY type of sensitivity:"
35 checkcolor 395 200 0.5 0.8 0.9
38 puts "Error : Select3D_SensitiveFace does not work properly with type of sensitivity Select3D_TOS_BOUNDARY!"
42 checkcolor 395 200 0 1 1
45 puts "Error : Select3D_SensitiveFace does not work properly with type of sensitivity Select3D_TOS_BOUNDARY!"