создание стрелялки с Физикой,или без неё

[Vovan_X]

Хочу собрать Стрелялку свою и по сети поиграть.

помогите разобратся с солизией как в обычном режиме( не используя не какие физики)
как правельно раставить.

Const gravity#=-0.004

Const Typeplayer=1,Typebot=2,Typelevel=3

У меня есть Бот, плауер мой игрок, и Левел. Бот и плауер анимированый.


Collisions Typeplayer,Typelevel,2,3
Collisions Typeplayer,Typeplayer,2,3
Collisions Typebot1,Typeplayer,2,3
Collisions Typebot1,Typelevel,2,3

как и где правельно, и как можно будет дабовлять ети функции.



Graphics3D 800,600, 16, 2
SetBuffer BackBuffer()

;----Что это такое----------
HidePointer

Global fntArialr

fntArialr=LoadFont("Arial",35,False,False,False)


;--------в index у меня Боты---------------
Include "data\index.bb"

Const gravity#=-0.004

Const Typeplayer=1,Typebot=2,Typebot1=4


zdorov=100

;----------------------------
lit=CreateLight()
;--level-----Он у меня один там просто двери и мелкие обьекты, хочю зделать чтоб открывались---

level = LoadanimMesh("map\level1\level1.3ds")

;----------Camera С туманом---------------
campiv = CreatePivot(player)
cam=CreateCamera(campiv )
PositionEntity cam,0,1.7,0
CameraRange Cam,0.2,9000
CameraFogRange Cam,-20,90
CameraFogMode Cam,1
CameraFogColor Cam,150,200,250
CameraClsColor Cam,150,200,250

;----------------------------
player= LoadAnimMesh("player\player1\player.3ds")
Animate player,1
;-------шарик я подогнал под автомат на дуло, чтобы пули вылитали точно с него-------
gol5=CreateSphere(8,player)
ScaleEntity gol5,0.01,0.01,0.01
PositionEntity gol5,0.046 ,1.54 ,1.087
EntityColor gol5,231,109,0
EntityAlpha gol5,0
EntityType player,Typeplayer

;-----вот и сами пули
Global bullet =CreateSphere(8,gol5)
ScaleEntity bullet ,0.01,0.01,0.01
PositionEntity bullet ,0.046 ,1.54 ,1.087
EntityColor bullet ,231,109,0
HideEntity bullet
EntityRadius bullet,1
;----------Патроны-------------------
Ocher=100

;-------------это типа цель, но я незнаю как зделать--------------------------
Global cursor = LoadSprite("text\cross.JPG")
SpriteViewMode cursor,4


;------------------- Вот Кализия----------------------
Collisions Typeplayer,Typelevel,2,3
Collisions Typeplayer,Typeplayer,2,3
Collisions Typebot1,Typeplayer,2,3
Collisions Typebot1,Typelevel,2,3


Repeat

;----------------------------

EntityParent cam,player

;-----------Боты ходят за мной-----------

dist# = EntityDistance ( bot, player)
If dist > 5
TurnEntity bot,0,Sgn(DeltaYaw(bot,player))*0.9,0
MoveEntity bot,0,0,0.03
EndIf
dist# = EntityDistance ( bot1, player)
If dist > 5
TurnEntity bot1,0,Sgn(DeltaYaw(bot1,player))*0.9,0
MoveEntity bot1,0,0,0.03
EndIf


;--------------------------------------------------------------
If KeyDown(200) MoveEntity player,0,0,.1
If KeyDown(20 MoveEntity player,0,0,-.1
If KeyDown(203) TurnEntity player,0,1,0
If KeyDown(205) TurnEntity player,0,-1,0

If KeyDown(17) MoveEntity player,0,0,.1
If KeyDown(31) MoveEntity player,0,0,-.1
If KeyDown(30) MoveEntity player,-0.1,0,0
If KeyDown(32) MoveEntity player,0.1,0,0

;-------------------Вот функция для вастрела пуль------------- --------------

If Ocher >0 If MouseDown(1) CreateBullet (gol5,.5,120+Rnd(50))
If MouseDown(3) TurnEntity gol5,0,2,0
If MouseDown(1) Ocher=Ocher -1
If Ocher<0 Ocher=Ocher * 0

;----------------Правай кнопкай прицел---------------------
If MouseDown(2)
CameraZoom cam,4
Else
CameraZoom cam,1
EndIf

;--Хотел мышку привезать к камере и анимации Плауера,заанимировал руки с пушкой( верх,вниз,влево и в право)-
;--Но не чего не получилось, у меня плауер целиком с руками ногами--------
MoveMouse 320,300
If EntityCollided (gol5,Typelox) Ocher=Ocher-1

;-------------------------------
UpdateBullet
UpdateWorld
RenderWorld(cam)
If EntityCollided (player,typebot) zdorov=zdorov-1

SetFont fntArialr
Text 70,27,"Health"+zdorov
SetFont fntArialr
Text 70,67,"Health-Bot="+zdorov
Text 70,97,"Health-Player="+zdorov

Text 280,47,"Patron="+Ocher

SetFont fntArialr
Text 500,27,"Account"

SetFont fntArialr
Text 500,67,"Bot="+SchetP

SetFont fntArialr
Text 500,97,"Player="+SchetB
If zorov=zdorov<1
Else

End

EndIf

;-----------------------------------

Flip
Until KeyHit(1)
End




В архиве модель не анимированого Плауера текстура, и цель.

Помогите пожалуста, Разобратся можт код исправите я 3 день мучаюсь. С посибо за ранее, если поможете скинте по почте--- [email protected]

[alcoSHoLiK]

Ты левелу EntityType не задал. Ботам, скорей всего, тоже.

[Vovan_X]

Да я поставил и всеровно не то гравитацию ставиш 0.02 и плауер плавно уходит вниз, что делать непойму.

Вот ещё архив со скринами из игры кому интересно посмотрите, я программирую недавно и поэтому ещё не понял всю суть создание игр, я моделер. Больше с графикой возится люблю с 2Д и 3Д.

Попрежнему жду помощи. Спосибо.

[Vovan_X]

Ну хотябы обьясните что за цифры Collision tplayer,tlevel,2,3 -- Что это означает. и как это правельно раставить. а с анимеш это вообше не работает. и когда я всё поставил то плауер просто поднялся выше. и цепляет обьекты не касающееся его а он всеравно цепляет

Помогите пожалуста.

[alcoSHoLiK]

Про цифры в справке блица написано. С аниммэшем чуть сложнее, нужно его детей искать, и им выставлять коллизии. На форуме уже поднимались подобные вопросы.

[Leito]

колизия маст дай.

все без нее делается очень легко.

[mr.DIMAS]

Насколько я помню когда грузишь модель аниммешом можно потом заюзать EntityType Entity,Type,True ( True для коллизии детей меша) и все коллизии с мешем будут работать.
зы. Во как завернул

[Vovan_X]

Всё можно тему закрыть или удалить я стрелялки бросил я их честно не перевариваю буду гонку доделовать. Спосиб