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

puts "============"
puts "OCC22332"
puts "============"
puts ""

######################################################
# 
######################################################

set BUGNUMBER OCC22332

vinit
vclear
box b 100 100 100
vsetdispmode b 1
vdisplay b
vtrihedron tri
vfit
 
vmoveto 0 0

# TEST LINEWIDTH
# draw a 10px horizontal line at (10,10) - (400,10)
vlayerline 10 10 400 10 10

checkcolor 15 5 1 0 0
checkcolor 15 13 1 0 0
checkcolor 15 14 0 0 0

# TEST LINETYPE
# draw a slashed 10px horizontal line at (10,10) - (400,10)
vlayerline 10 10 400 10 10 1

checkcolor 23 10 1 0 0
checkcolor 25 10 1 0 0
checkcolor 26 10 0 0 0
checkcolor 30 10 0 0 0
checkcolor 32 10 1 0 0

set only_screen 1
Commit	Line	Data
e187cc0a	1	puts "============"
	2	puts "OCC22332"
	3	puts "============"
	4	puts ""
	5
	6	######################################################
	7	#
	8	######################################################
	9
	10	set BUGNUMBER OCC22332
	11
	12	vinit
	13	vclear
	14	box b 100 100 100
	15	vsetdispmode b 1
	16	vdisplay b
	17	vtrihedron tri
	18	vfit
	19
	20	vmoveto 0 0
	21
	22	# TEST LINEWIDTH
	23	# draw a 10px horizontal line at (10,10) - (400,10)
	24	vlayerline 10 10 400 10 10
	25
	26	checkcolor 15 5 1 0 0
	27	checkcolor 15 13 1 0 0
	28	checkcolor 15 14 0 0 0
	29
	30	# TEST LINETYPE
	31	# draw a slashed 10px horizontal line at (10,10) - (400,10)
	32	vlayerline 10 10 400 10 10 1
	33
	34	checkcolor 23 10 1 0 0
	35	checkcolor 25 10 1 0 0
	36	checkcolor 26 10 0 0 0
	37	checkcolor 30 10 0 0 0
	38	checkcolor 32 10 1 0 0
	39
	40	set only_screen 1
	41