Тема: Пули.
Показать сообщение отдельно
Старый 19.03.2012, 07:44   #5
pepel
Мастер
 
Аватар для pepel
 
Регистрация: 23.09.2009
Адрес: ленобласть
Сообщений: 1,189
Написано 447 полезных сообщений
(для 2,526 пользователей)
Ответ: Пули.

Сообщение от Платон Александрович Посмотреть сообщение
Гм, а что там пилить-то? Ну вот например, сойдет?
Const CL_WALL% = 1
Const CL_BULLET% = 2

Graphics3D ( 800, 600, 0, 2 )

Local Wall% = CreateCube ( )
EntityColor ( Wall, 64, 64, 64 )
PositionEntity ( Wall, 5.0, 0, 0 )
EntityType ( Wall, CL_WALL )

Local Bullet% = CreateSphere ( 3 )
EntityColor ( Bullet, 255, 200, 100 )
EntityFX ( Bullet, 1 )
ScaleEntity ( Bullet, 0.05, 0.05, 0.05 )
EntityRadius ( Bullet, 0.05, 0.05 )
PositionEntity ( Bullet, -1.0, 0, 0 )
EntityType ( Bullet, CL_BULLET )

Collisions ( CL_BULLET, CL_WALL, 2, 1 )

Local Camera% = CreateCamera ( )
PositionEntity ( Camera, 0, 0, -10.0 )

Repeat
	
	If KeyDown ( 57 ) Then MoveEntity ( Bullet, 1000000.0, 0, 0 )
	
	UpdateWorld ( )
	
	RenderWorld ( )
	
	Text ( 10, 10, Str ( EntityX ( Bullet ) ) )
	
	Flip ( False )
	
Until KeyDown ( 1 )

End
спасиб
(Offline)
 
Ответить с цитированием