mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-08 18:40:55 +03:00
d33222c108
New class AIS_PointCloud for displaying point sets. Update Graphic3d_ArrayOfPoints, OpenGl_PrimitiveArray and OpenGl_VertexBuffer classes to be able to use normals for points. Add Draw Harness command vpointcloud. Add test case v3d/point_cloud/sphere. Move protected method AIS_Shape::DisplayBox() to public function StdPrs_WFDeflectionRestrictedFace::AddBox(). Small correction of grids.list for v3d tests
31 lines
534 B
Plaintext
31 lines
534 B
Plaintext
puts "========"
|
|
puts "Point cloud object from triangulated sphere"
|
|
puts "========"
|
|
|
|
# create sphere
|
|
sphere ss 10
|
|
mkface s ss
|
|
incmesh s 0.01
|
|
|
|
# draw sphere
|
|
vinit View1
|
|
vclear
|
|
vsetdispmode 1
|
|
vaxo
|
|
vpointcloud p s -nonormals
|
|
vaspects p -setcolor GREEN
|
|
vfit
|
|
vrotate 0.2 0.0 0.0
|
|
vdump $::imagedir/${::casename}_green.png
|
|
|
|
# random colors mode
|
|
vpointcloud p s -randcolors
|
|
vdump $::imagedir/${::casename}_rand.png
|
|
|
|
# mode with normals
|
|
vpointcloud p s -normals
|
|
vsetmaterial p COPPER
|
|
vdump $::imagedir/${::casename}_copper.png
|
|
|
|
vmoveto 200 200
|