XMesh - Mesh, Materials, Textures
XState - d3dmatrix of position
XObject = XMesh+XObject
XCamera - matrix of world
XWindow - hwnd
XDevice - Direct3D device
Support only one subsets Models when arrays in types not supported
Smple of program:
Download from (press link on orange line for download):'------------------------------------
' FBXL Meshes application
'------------------------------------
#include once "fbxl.bas"
Dim As XWindow win
Dim As XDevice dev
Dim As XObject obj
MakeWindow(win,"Meshes example",400,400)
InitDirectX
MakeDevice(dev,win)
LoadObject(dev,obj,"tiger.x")
do while( TestOnQuitMessage() = 0 )
ClearScene(dev,RGB( 0, 0, 0 ))
XRotate(obj, timeGetTime() / 1000.0)
SetCamera(dev,0.0, 2.0,-2.0, 0.0, 0.0, 0.0)
DrawObject(dev,obj)
ShowScene(dev)
loop
FreeObject(obj)
FreeDevice(dev)
FreeDirectX
FreeWindow(win)
End 0
http://www.deck4.narod.ru/FBXL005.rar
http://www.deck4.narod.ru/first.jpg