[NitE]

и правда пропадают, хз что делать ))
вот мой код с мега-полезными функциями !

Function mouselook(ent)
	mxspd#=MouseXSpeed()*Mousespeed 
	myspd#=MouseYSpeed()*Mousespeed 
	MoveMouse GraphicsWidth()/2,GraphicsHeight()/2	 
	campitch#=EntityPitch(ent)+myspd# 
	If campitch#<-89 Then campitch#=-89
	If campitch#>89 Then campitch#=89
	RotateEntity ent,campitch#,EntityYaw(ent)-mxspd#,EntityRoll(ent)
End Function

Function player_move(ent)
	If KeyDown(17) MoveEntity ent,0,0,player_speed
	If KeyDown(31) MoveEntity ent,0,0,-player_speed
	If KeyDown(30) MoveEntity ent,-player_speed,0,0 
	If KeyDown(32) MoveEntity ent,player_speed,0,0
End Function

Function create_planet()
planet=CreateSphere(32,sun)
size#=Rnd(100,300)
ScaleEntity planet,size#,size#,size#
EntityColor planet,Rnd(0,200),Rnd(0,200),Rnd(0,200)
EntityShininess  planet,.2
PositionEntity planet,Rnd(-20000,20000),Rnd(-2000,2000),Rnd(-20000,20000)
End Function


Global mousespeed#=0.5
Global player_speed=10

SeedRnd(MilliSecs())
Graphics3D 1024,768,32,2
SetBuffer BackBuffer()
AmbientLight 0,0,0


light=CreateLight(2)
LightColor light,255,200,50
LightRange light,99999

camera=CreateCamera()
CameraRange(camera,0.001,99999999999999)

Global sun=CreateSphere()
EntityFX sun,1
EntityColor sun,255,255,100
size=10
ScaleEntity  sun,size,size,size



For i=1 To 100
create_planet()
Next

CameraClsMode(camera,1,1)
CameraZoom(camera,1.4)
Repeat


mouselook(camera)
player_move(camera)












UpdateWorld()
RenderWorld()




Flip()
Until KeyHit(1)
End