tests/bugs/vis/bug25783_2

   1 puts "============"
   2 puts "OCC25783_1"
   3 puts "Draw 2d objects in top-down mode."
   4 puts "============"
   5 puts ""
   6
   7 vinit View1
   8 vclear
   9 vaxo
  10
  11 # display polyline in overlay
  12 text2brep tcc "Center" Times-Roman 30
  13 vdisplay  tcc -2dTopDown -osd
  14 polyline  lcc -50 -50 0 -50 50 0 50 50 0 50 0 0 0 -50 0 -50 -50 0
  15 vdisplay  lcc -2dTopDown -overlay
  16
  17 # display polyline in overlay in the top left corner of the view
  18 text2brep ttl "Top-Left" Times-Roman 30
  19 vdisplay  ttl -2dTopDown -trsfPersPos -1 -1 5 -osd
  20 polyline  ltl 0 0 0 0 100 0 100 100 0 100 50 0 50 0 0 0 0 0
  21 vdisplay  ltl -2dTopDown -trsfPersPos -1 -1 3 -overlay
  22
  23 # display polyline in overlay in the bottom left corner of the view
  24 text2brep tbl "Bottom-Left" Times-Roman 30 x=-27 y=0
  25 vdisplay  tbl -2dTopDown -trsfPersPos -1 1 30 -osd
  26 polyline  lbl 0 -100 0 0 0 0 100 0 0 100 -50 0 50 -100 0 0 -100 0
  27 vdisplay  lbl -2dTopDown -trsfPersPos -1 1 3 -overlay
  28
  29 # display polyline in overlay in the bottom right corner of the view
  30 text2brep tbr Bottom-Right Times-Roman 30 x=-145 y=0
  31 vdisplay  tbr -2dTopDown -trsfPersPos 1 1 30 -osd
  32 polyline  lbr -100 -100 0 -100 0 0 0 0 0 0 -50 0 -50 -100 0 -100 -100 0
  33 vdisplay  lbr -2dTopDown -trsfPersPos 1 1 3 -overlay
  34
  35 # display polyline in overlay in the top right corner of the view
  36 text2brep ttr "Top-Right" Times-Roman 30 x=-130 y=0
  37 vdisplay  ttr -2dTopDown -trsfPersPos 1 -1 5 -osd
  38 polyline  ltr -100 0 0 -100 100 0 0 100 0 0 50 0 -50 0 0 -100 0 0
  39 vdisplay  ltr -2dTopDown -trsfPersPos 1 -1 3 -overlay
  40
  41 vdump ${imagedir}/${casename}.png