Показать сообщение отдельно
Старый 20.10.2005, 16:56   #34
ZanoZa
Элита
 
Регистрация: 02.10.2005
Сообщений: 1,789
Написано 132 полезных сообщений
(для 252 пользователей)
БЛИН ТРАБЛА!
Сделал чтобы пушки по разному стреляли, и вышла лажа
первые 2 пушки нормально, третья не работает, а потом и все пушки не работают :
wallbash: 
For k=1 To 1
 If weapon=0
spdbul=5
  sphere=CreateSphere()
  ScaleEntity sphere,0.1,0.1,0.1
  RotateEntity sphere,10,0,20
	ElseIf weapon=1
	spdbul=30
	sphere=CreateCube()
  ScaleEntity sphere,0.1,0.1,0.1
  RotateEntity sphere,10,0,20
	ElseIf weapon=2
	spdbul=3
	sphere=CreateCone()
  ScaleEntity sphere,0.1,0.1,0.1
  RotateEntity sphere,10,0,20
	EndIf
 If bul=0
  d.Dude=New Dude
  d\entity=CopyEntity( sphere )
  EntityColor d\entity,Rnd(255),Rnd(255),Rnd(255)
  ResetEntity d\entity
  PositionEntity d\entity,EntityX#(campiv,1),EntityY#(campiv)-0.3,EntityZ#(campiv,1)
  PlaySound shot 
  RotateEntity d\entity,EntityPitch#(cam,1),EntityYaw#(campiv),0 
  EntityType d\entity,enti
  Collisions enti,Typelevel,2,3
  Collisions enti,botar,2,2
  EndIf 
 Next

spdbul=5 скорость стрельбы
Ещё код выкладываю
(Offline)
 
Ответить с цитированием