[occt.git] / tests / bugs / vis / bug24133_2

puts "============"
puts "CR24133"
puts "============"
puts ""
#######################################################################
#  Development of improvement of dimensions implementation
#  Angle dimension
#######################################################################
pload VISUALIZATION

vfont add [locate_data_file DejaVuSans.ttf] SansFont

vinit
vpoint angle1P1 0 0 0
vpoint angle1P2 50 50 50
vpoint angle1P3 50 50 100
vdimension dim1 -angle -shapes angle1P1 angle1P2 angle1P3 -font SansFont
vfit
vmoveto 249 206

set x_coord 249
set y_coord 200

checkcolor $x_coord $y_coord 0 1 1

if { $stat != 1 } {
   puts "Error : Highlighting of angle dimension with 2d text is wrong."
}
vinit Viewer2/View2
vpoint angle2P1 0 0 0
vpoint angle2P2 50 50 50
vpoint angle2P3 50 50 100
vdimension dim2 -angle -text 3d -shapes angle2P1 angle2P2 angle2P3 -font SansFont
vfit
vmoveto 263 251

set x_coord 335
set y_coord 319

checkcolor $x_coord $y_coord 0 1 1

if { $stat != 1 } {
   puts "Error : Highlighting of angle dimension with 3d text is wrong."
}

checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
a6eb515f	1	puts "============"
	2	puts "CR24133"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Development of improvement of dimensions implementation
	7	# Angle dimension
	8	#######################################################################
	9	pload VISUALIZATION
	10
6fb1a930	11	vfont add [locate_data_file DejaVuSans.ttf] SansFont
6fb1a930	12
a6eb515f	13	vinit
2ec85268	14	vpoint angle1P1 0 0 0
	15	vpoint angle1P2 50 50 50
	16	vpoint angle1P3 50 50 100
	17	vdimension dim1 -angle -shapes angle1P1 angle1P2 angle1P3 -font SansFont
a6eb515f	18	vfit
	19	vmoveto 249 206
	20
	21	set x_coord 249
	22	set y_coord 200
	23
	24	checkcolor $x_coord $y_coord 0 1 1
	25
	26	if { $stat != 1 } {
	27	puts "Error : Highlighting of angle dimension with 2d text is wrong."
	28	}
d7bffd44	29	vinit Viewer2/View2
2ec85268	30	vpoint angle2P1 0 0 0
	31	vpoint angle2P2 50 50 50
	32	vpoint angle2P3 50 50 100
	33	vdimension dim2 -angle -text 3d -shapes angle2P1 angle2P2 angle2P3 -font SansFont
a6eb515f	34	vfit
	35	vmoveto 263 251
	36
d7bffd44	37	set x_coord 335
d7bffd44	38	set y_coord 319
a6eb515f	39
	40	checkcolor $x_coord $y_coord 0 1 1
	41
	42	if { $stat != 1 } {
	43	puts "Error : Highlighting of angle dimension with 3d text is wrong."
	44	}
	45
5747059b	46	checkview -screenshot -3d -path ${imagedir}/${test_image}.png