19.03.2012, 07:44
|
#5
|
Мастер
Регистрация: 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)
|
|