Graphics3D 640,800
SetBuffer BackBuffer()
camera=CreateCamera()
light=CreateLight()
fen=LoadImage("cursor.bmp")
While Not KeyHit(1)
DrawImage fen,MouseX(),MouseY()
sp=CreateSphere()
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
|
Если два While, то и два Wend должно быть
зы-почитай о структурном программировании