Hello,
is there allready a free tool that can display the UV layout of the B3D model?
http://www.unwrap3d.com/the freeware version can load in b3d models with the plugin that is on that site. but to do the interesting stuff with that program you need to register it.
Hi!
[CODE]
Graphics3D 640,480,32,2
Sphere = CreateSphere(12)
SaveWire(Sphere,"Texture",512,512)
Function SaveWire(Entity,File$,ImgWidth,ImgHeight)
Local I,OldBuffer,ImageWire,Surface,T,Vertex0
Local Vertex1,Vertex2,V0U#,V0V#,V1U#,V1V#,V2U#,V2V#
Local X1,Y1,X2,Y2,X3,Y3
For I = 1 To CountSurfaces(Entity)
ImageWire = CreateImage(ImgWidth,ImgHeight)
SetBuffer ImageBuffer(ImageWire)
Surface = GetSurface(Entity,I)
For T = 0 To CountTriangles(Surface)
Vertex0 = TriangleVertex(Surface,T,0)
Vertex1 = TriangleVertex(Surface,T,1)
Vertex2 = TriangleVertex(Surface,T,2)
V0U# = VertexU#(Surface,Vertex0)
V0V# = VertexV#(Surface,Vertex0)
V1U# = VertexU#(Surface,Vertex1)
V1V# = VertexV#(Surface,Vertex1)
V2U# = VertexU#(Surface,Vertex2)
V2V# = VertexV#(Surface,Vertex2)
Color 255,255,255
X1 = ImageWidth(ImageWire) * V0U#
Y1 = ImageHeight(ImageWire) * V0V#
X2 = ImageWidth(ImageWire) * V1U#
Y2 = ImageHeight(ImageWire) * V1V#
X3 = ImageWidth(ImageWire) * V2U#
Y3 = ImageHeight(ImageWire) * V2V#
Line X1,Y1,X2,Y2
Line X2,Y2,X3,Y3
Line X3,Y3,X1,Y1
Next
SaveBuffer(ImageBuffer(ImageWire),File$ + I + ".bmp")
Next
SetBuffer OldBuffer
End Function
[/CODE]
cu olli
Thank you both. You have saved me some time.