UV mapping problem

Blitz3D Forums/Blitz3D Programming/UV mapping problem

This will draw the UV map on screen, use it to see if there is a correct UV map or not. Replace CreateSphere() with LoadMesh("yourmesh.x") e.t.c

Graphics3D 1024,768,32,2

mesh=CreateSphere(16)

drawUVs mesh,512,0

WaitKey
End


Function drawUVs(mesh,scale,uvset)

	surfCount = CountSurfaces(mesh)

	For i = 1 To surfCount
		surf = GetSurface(mesh,i)
		triCount = CountTriangles(surf)

		For j = 0 To triCount-1
			u0# = VertexU(surf,TriangleVertex(surf,j,0),uvset) * scale
			v0# = VertexV(surf,TriangleVertex(surf,j,0),uvset) * scale

			u1# = VertexU(surf,TriangleVertex(surf,j,1),uvset) * scale
			v1# = VertexV(surf,TriangleVertex(surf,j,1),uvset) * scale

			u2# = VertexU(surf,TriangleVertex(surf,j,2),uvset) * scale
			v2# = VertexV(surf,TriangleVertex(surf,j,2),uvset) * scale
			
			Line u0,v0,u1,v2
			Line u1,v1,u2,v2
			Line u0,v0,u2,v2
		Next
	Next
End Function