Sorry your browser is not supported!

#constant VertexX       GET VERTEXDATA POSITION X
#constant VertexY       GET VERTEXDATA POSITION Y
#constant VertexZ       GET VERTEXDATA POSITION Z

#constant NormalX       GET VERTEXDATA NORMALS Z
#constant NormalY       GET VERTEXDATA NORMALS Z
#constant NormalZ       GET VERTEXDATA NORMALS Z

#constant Vertices      GET VERTEXDATA VERTEX COUNT
#constant Indexes       GET VERTEXDATA INDEX COUNT
#constant DeleteVertices        Delete mesh from vertexdata
#constant LockVerticesMesh      Lock vertexdata For Mesh
#constant LockVerticesLimb      Lock vertexdata For Limb
#constant UnlockVertices        Unlock Vertexdata

Sync on : Sync rate 0 : Sync
Disable escapekey

rem Used this way to prevent problems with the Indexes - Otherwise there are 24 Indexes O_o

Make object cube 2, 10 : Make mesh from object 1, 2 : Make memblock from mesh 1, 1 : Delete object 2 : Delete mesh 1
Make mesh from memblock 1, 1 : Make object 1, 1, 0

Repeat
  Set cursor 0, 0
  Print \"Press any key\"
  LockVerticesLimb 1, 0
  Print \"Vertices: \", Vertices ()
  Print \"Indexes: \", Indexes ()
  UnlockVertices
  Print \"\"
  Print \"I Guess You See The Cube!\"
  Turn object left 1, .1
  Sync
Until Scancode()

Wait 500

rem delete the Vertices of hopefully one triangle

LockVerticesLimb 1, 0
DeleteVertices 1, 4, 0, 0
UnlockVertices


Repeat
  Set cursor 0, 0
  Print \"Press any key to exit\"
  LockVerticesLimb 1, 0
  Print \"Vertices: \", Vertices (), \"  <- Should be 33\"
  Print \"Indexes: \", Indexes ()
  UnlockVertices
  Print \"\"
  Print \"Do You See The Cube?   I guess not!\"
  Turn object left 1, .1
  Sync
Until Scancode()