Graphics3D 640,800; Даж не могу представить себе такой монитор...
SetBuffer BackBuffer()
camera=CreateCamera()
light=CreateLight()
fen=LoadImage("cursor.bmp")
While Not KeyHit(1); Удалить ненужную фигню, зачем запускать 2 бесконечных
;цикла? притом 1 прям в другом оО...
DrawImage fen,MouseX(),MouseY(); Перенести в цикл который ниже
sp=CreateSphere();-------Никогда не создавай в цикле объекты, без условия,
;ато будут штамповатся пока памятьн е кончится и выдаст MAV, так же не загружай и т. д.
;что нада делать 1 раз а не милльион триста тысяц милиардоффф)))
PositionEntity sp,0,0,5
tex=LoadTexture("Earth.jpg")
EntityTexture sp, tex
While Not KeyDown( 1 )
TurnEntity sp,0,-1,0
RenderWorld
Flip
Wend
End
Graphics3D 800,600
SetBuffer BackBuffer()
camera=CreateCamera()
light=CreateLight()
fen=LoadImage("cursor.bmp")
sp=CreateSphere()
PositionEntity sp,0,0,5
tex=LoadTexture("Earth.jpg")
EntityTexture sp, tex
While Not KeyDown( 1 )
cls; Очищаем экран (если чёт рисовали что ненада, допустим
;мышку в предыдущем месте где она была в предыдущий раз...)
DrawImage fen,MouseX(),MouseY()
TurnEntity sp,0,-0.1,0
UpdateWorld
RenderWorld
Flip
Wend
End
Возможно еще ты камеру не там поставил, поэксперементируй... я тут пошаманил чуток, должно работать...теоретически