Регистрация | Вход
Graphics3D 640,480 ,32,2SetBuffer BackBuffer() camera=CreateCamera() light=CreateLight() RotateEntity light,90,0,0 AmbientLight(255,255,255)cube=CreateSphere() PositionEntity cube,0,0,0ScaleEntity(cube,10,10,10)EntityFX(cube,16); Load texture tex=LoadTexture( "spherepanorama.png" ) ; Texture entity EntityTexture cube,tex pitch#=0 yaw#=0 roll#=0 While Not KeyDown( 1 ) If KeyDown( 208 )=True Then pitch#=pitch+1 If KeyDown( 200 )=True Then pitch#=pitch-1 If KeyDown( 203 )=True Then yaw#=yaw+1If KeyDown( 205 )=True Then yaw#=yaw-1 If KeyDown( 45 )=True Then roll#=-1 If KeyDown( 44 )=True Then roll#=1 If KeyDown( 17 )=True MoveEntity(camera,0,0,0.1)RotateEntity(camera,0,yaw,0);TurnEntity camera,0,yaw#,0 TurnEntity camera,pitch,0,0 RenderWorld Flip Wend End