I Seem to be having trouble trying to texture a sphere, I load in the mesh and the texure - there is something i have done wrong
Maybe some kind person could put me on the right track, the sphere mesh is from the forum somewhere it was a library with a shape primitives .
The moon keeps turning a grey and plain.
i know its something to do with the mesh because the robot.mesh works, any help welcome.
I have tryed to create a mesh - Sphere in blender and it to appears grey and plain.
Code: Select all
UseJPEGImageEncoder()
InitEngine3D()
InitMouse()
_Window=#True
Add3DArchive("I:\Pure Basic Backup\Project\Space Invasion PB\Data",#PB_3DArchive_FileSystem )
If InitKeyboard()=0 Or InitSprite()=0
MessageRequester("Error", "Can't open DirectX 7 or Greater", 0) : End
EndIf
ExamineDesktops()
MonitorFrequency=DesktopFrequency(0)
If MonitorFrequency=0 : MessageRequester("Error", "Failed to open a 800*600 screen!",0) : End : EndIf
If _Window=#False
If OpenScreen(800,600,16,"Moon Test",#PB_Screen_WaitSynchronization,MonitorFrequency)
Else
MessageRequester("Error", "Failed to open a 800*600 16 bit screen",0)
EndIf
EndIf
If _Window=#True
OpenWindow(0,0,0,800,600,"Moon Test",#PB_Window_SystemMenu|#PB_Window_ScreenCentered|#PB_Window_SizeGadget|#PB_Window_MaximizeGadget)
If OpenWindowedScreen(WindowID(0),0,0,800,600,1,0,0,#PB_Screen_WaitSynchronization)
Else
MessageRequester("Error", "Failed to open a 800*600 32 bit screen",0)
EndIf
EndIf
If LoadMesh (0, "Moon.Mesh")
Else
MessageRequester("Error", "Could not load Mesh",0) : End
EndIf
Parse3DScripts()
If LoadTexture(0, "Moon.jpg")
Else
MessageRequester("Error", "Could not load Texture",0) : End
EndIf
CreateMaterial(0, TextureID(0))
CreateEntity(0, MeshID(0), MaterialID(0))
CreateCamera(0, 0, 0, 800, 600)
CameraLocate(0,0,0,5)
CameraLookAt(0,0,0,0)
CameraBackColor(0, RGB(0,0,0))
CreateLight(0, RGB(255,255,255), 0, 0, 0)
Repeat
ClearScreen(RGB(0,0,0))
ExamineKeyboard()
ExamineMouse()
MouseX = -MouseDeltaX()/10
MouseY = -MouseDeltaY()/10
If KeyboardReleased(#PB_Key_F1)
ClearScreen(RGB(0,0,0))
CameraRenderMode(0, #PB_Camera_Wireframe)
EndIf
If KeyboardReleased(#PB_Key_F2)
ClearScreen(RGB(0,0,0))
CameraRenderMode(0, #PB_Camera_Textured)
EndIf
If KeyboardReleased(#PB_Key_F3)
ClearScreen(RGB(0,0,0))
CameraRenderMode(0, #PB_Camera_Plot)
EndIf
If KeyboardPushed(#PB_Key_Left) : KeyX=-1
ElseIf KeyboardPushed(#PB_Key_Right) : KeyX=1
Else
KeyX=0
EndIf
If KeyboardPushed(#PB_Key_Up) : KeyY=-1
ElseIf KeyboardPushed(#PB_Key_Down) : KeyY=1
Else
KeyY=0
EndIf
RotateEntity(0, 0, 1, 0, #PB_Relative)
RotateCamera(0, MouseY, MouseX, RollZ, #PB_Relative)
MoveCamera (0, KeyX, 0, KeyY)
RenderWorld()
StartDrawing(WindowOutput(0)) : DrawingMode(#PB_2DDrawing_Transparent)
FrontColor(RGB(255,255,255))
BackColor(RGB(0,0,0))
DrawingMode(0)
DrawText(10,70,"Framerate: "+Str(Engine3DFrameRate(#PB_Engine3D_Current)))
StopDrawing()
FlipBuffers()
Until KeyboardPushed(#PB_Key_Escape)
End
Regards
Kevin

