forum.boolean.name - Смена анимации с помощью KeyDown

forum.boolean.name (http://forum.boolean.name/index.php)

- FAQ (http://forum.boolean.name/forumdisplay.php?f=15)

- - Смена анимации с помощью KeyDown (http://forum.boolean.name/showthread.php?t=17786)

Niburiec

24.01.2013 14:06

Смена анимации с помощью KeyDown

Прочитал все сообщения на форуме по поводу загрузки анимации, но для себя ничего не нашел...А потому хочу поинтересоваться у профи, как менять анимацию с помощью KeyDown? Я пробовал разные варианты загрузок: и X, и B3D, и MD2. Но так толком ничего и не понял. С помощью KeyHit смена анимации проходит легко и без проблем, не взирая на то есть там ключи или нет. Но стоит поменять на KeyDown и сменнённая анимация замирает на первом кадре, пока не отпустишь клавишу. Так вот я хотел спросить, кто может мне без отговорок и сссылок на туториал, объяснить на пальцах как сделать простой цикл проверки нажатия и смены анимации? Чтоб нажал вверх - пошел вперёд, отпустил клавишу - стоит, нажал пробел-подпрыгнул, а если две клавиши (вперёд и Shift)- бежит... Вот такой вопрос.

CRASHER

24.01.2013 14:14

Ответ: Смена анимации с помощью KayDown

А что тут не понятного? KeyHit реагирует один раз после нажатия. KeyDown много раз пока не отпустишь клавишу. При KeyDown текущий кадр переносится на 1 кадр пока эта клавиша нажата. Если хочешь приципить анимацию к движению объекта, просто сделай проверку внутри кейдауна на проигрывание анимации объектом если есть уже анимация не вкючать новую.

Niburiec

24.01.2013 14:25

Ответ: Смена анимации с помощью KayDown

Спасибо конечно, но мне это ни о чём не говорит. Если не трудно код пожалуйста напишите для наглядности.

CRASHER

24.01.2013 14:39

Ответ: Смена анимации с помощью KayDown

Если это вам ни о чем не говорит, значит рано браться за программирование игр. едиственное что могу подсказать : команда проверяющая анимированность объекта - Animate(Ent).

Niburiec

24.01.2013 14:46

Ответ: Смена анимации с помощью KayDown

Я боюсь что б не было поздно :) Ведь время не стоит на месте...Про Animate(Ent) я знаю, а вот как его правильно вставить в цикл ? Вот тут у меня соображения не хватает. Наверно я староват уже для понимания :) Ну ничего, если вы мне не можете объяснить попробую обратиться на другой форум... Может там мне не скажут что я недотёпа...

CRASHER

24.01.2013 14:51

Ответ: Смена анимации с помощью KeyDown

Тфу, подрукой блитза нет. Не Animate() а Animating() кажется.
Рановато, и недотепа, разные вещи.

Цитата:

Если кейдаун (57)
_____Если анимейтинг(Энт)
_________ничего...(или что то)
_____иначе
_________анимейт(Энт)
_____конец если
конец если

Niburiec

24.01.2013 14:55

Ответ: Смена анимации с помощью KeyDown

)))) Да не страшно, ведь я то всё равно ничего не понимаю, ведь так ? Вот куда мне здесь что вставить:

Graphics3D 800,600,16,1
SetBuffer BackBuffer()
cam=CreateCamera()
lite = CreateLight(1)
MoveEntity lite,5,0,0

;--------------------------------------
m=LoadAnimMesh("officer.b3d")
men=ExtractAnimSeq(m,212,232)
men2=ExtractAnimSeq(m,236,260)
men3=ExtractAnimSeq(m,301,319)

ScaleEntity m,0.1,0.1,0.1
PositionEntity m,0,0,0,True

PointEntity cam,m
PositionEntity cam,0,3,-7

While Not KeyHit(1)
Animate m,1,0.5,1
If KeyDown(200) Animate m,1,0.5,men2

If KeyDown(205) Animate m,1,0.5,men3

UpdateWorld
RenderWorld
Flip
Wend
End

CRASHER

24.01.2013 15:04

Ответ: Смена анимации с помощью KeyDown

If KeyDown(200)
if not Animating(men2)
Animate m,1,0.5,men2
endif
endif

тоже самое с другой кнопкой. Тебе в предыдущей теме тоже хороший код привели.
http://forum.boolean.name/showthread.php?t=7338

Niburiec

24.01.2013 15:06

Ответ: Смена анимации с помощью KeyDown

Сейчас попробую...

Попробовал... В строке if not Animating(men2) выбивает ошибку: Entity does not exist

Хотя я не могу утверждать что вы не правы, не знаю, может дело в самой анимации?

Arton

24.01.2013 15:24

Ответ: Смена анимации с помощью KeyDown

"Entity does not exist" дык интити нету, проверь правильность пути к файлу, названия переменных, скорее всего в этом косяк, сам сколько раз мучился с подобным, а потом оказывалась впопыхах переменную не так назвал.

Niburiec

24.01.2013 15:33

Ответ: Смена анимации с помощью KeyDown

Может не надо использовать с B3D ExtractAnimSeq ? Ведь в начале он загружает модель, а потом при проверке ошибка...

Arton

24.01.2013 15:36

Ответ: Смена анимации с помощью KeyDown

Синь файлик модели я посмотрю.

И какой версии блица ты пользующийся?

Niburiec

24.01.2013 15:58

Ответ: Смена анимации с помощью KeyDown

Вложений: 1

Версия 1.98 А модель я позаимствовал из FPS Креатора (да простят меня они). В архиве X (оригинал), B3D я его просто конвертнул в Fragmotion и MD2, тут я пытался сделать по науке, не знаю вышло ли...

Ой.. забыл скинуть текстуру...ну да и так будет понятно...

Arton

24.01.2013 16:03

Ответ: Смена анимации с помощью KeyDown

Цитата:

Сообщение от Niburiec (Сообщение 250546)

Вопервых X несодержит анимацию, но я вижу что ты разобрался.
Версия 1.99, у меня всё работает, ошибок нет. Блиц глючит, попробуй запустить в оконном режиме.

Niburiec

24.01.2013 16:18

Ответ: Смена анимации с помощью KeyDown

Цитата:

Graphics3D 800,600,16,2
SetBuffer BackBuffer()
cam=CreateCamera()
lite = CreateLight(1)
MoveEntity lite,5,0,0

;--------------------------------------
m=LoadAnimMesh("officer.b3d")
men=ExtractAnimSeq(m,212,232)
men2=ExtractAnimSeq(m,236,260)
men3=ExtractAnimSeq(m,301,319)

ScaleEntity m,0.1,0.1,0.1
PositionEntity m,0,0,0,True

PointEntity cam,m
PositionEntity cam,0,3,-7

Animate m,1,0.5,1
While Not KeyHit(1)
If KeyDown(200)
If Not Animating(men2)
Animate m,1,0.5,men2
EndIf
EndIf

Animate m,1,0.5,1
UpdateWorld
RenderWorld
Flip
Wend

End

Пробовал я и в оконном - да хоть ты тресни... И пути проверил - всё впорядке... не идёт зараза...

А так ходит, но мне нужно чтоб он шёл только при нажатой клавише...

Цитата:

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

camera=CreateCamera()

light=CreateLight()
RotateEntity light,90,0,0

; Загрузка md2
m=LoadMD2( "officer_5.md2" )
;me1=LoadAnimSeq(
; Загрузка текстуры md2
m_tex=LoadTexture( "officer_1_D2.dds" )

; Наложить текстуру
EntityTexture m,m_tex

; Включаем анимацию md2
PositionEntity m,0,-35,70
RotateEntity m,0,0,0
AnimateMD2 m,1,0.3,1,24

While Not KeyDown( 1 )
If KeyHit(200) AnimateMD2 m,1,0.3,25,49

UpdateWorld
RenderWorld
Flip
Wend

End

Arton

24.01.2013 16:22

Ответ: Смена анимации с помощью KeyDown

#15 тож работает, а вот проверка нажатия сделана через одно место - mav.
Включи дебагер посмотри в чём дело.

Niburiec

24.01.2013 17:04

Ответ: Смена анимации с помощью KeyDown

Debuger ничего мне не объяснит по русский :) А как сделать проверку нажатия во втором коде с md2? Может хоть MD2 пойдёт...Сам я не додумаюсь, это точно.

pepel

24.01.2013 19:01

Ответ: Смена анимации с помощью KeyDown

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

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

я использовал эти

Global player_start=0 - игрок начал идти
Global player_stop=1 - игрок остновился
Global player_still=1 - игрок стоит

вот код

PHP код:




Graphics3D 800,600,16,2
SetBuffer BackBuffer()
cam=CreateCamera()
lite = CreateLight(1) 
MoveEntity lite,5,0,0

;--------------------------------------
m=LoadAnimMesh("officer.b3d")
men=ExtractAnimSeq(m,212,232)
men2=ExtractAnimSeq(m,236,260)
men3=ExtractAnimSeq(m,301,319)

ScaleEntity m,0.1,0.1,0.1
PositionEntity m,0,0,0,True

PointEntity cam,m
PositionEntity cam,0,3,-7

Animate m,1,0.5,men

Global player_start=0 ; сигнал для старта ходьбы
Global player_stop=1 ; сигнала для остановки ходьбы
Global player_still=1   ;игрок стоит

Repeat
    If KeyHit(1) End
    UpdateWorld

            player_start=0;Обнуление сигнала для старта ходьбы
            
            If KeyHit(200) player_start=1:player_stop=-0
            
            If KeyDown(200)
                player_still=0
            Else
                If player_still=0 player_stop=1
            EndIf    
            
            
            
            If player_start Animate m,1,0.5,men2,6 ;цифра 6 на конце это transition - плавный переход от одной анимации в другую
            If player_stop Animate m,1,0.5,men,10 :player_still=1:player_stop=0

    
    RenderWorld tween
    Flip

Forever

может показаться что можно обойтись всего двумя переменными start и stop , например так:

PHP код:




player_start=0;Обнуление сигнала для старта ходьбы
            
            If KeyHit(200) player_start=1:player_stop=-0
            
            If KeyDown(200)
            
            Else
                player_stop=1
            EndIf    
            
            
            
            If player_start Animate m,1,0.5,men2,6
            If player_stop Animate m,1,0.5,men,10:player_stop=0

но в таком случае player_stop будет равняться 1 постоянно , если не нажата клавиша вперед а нам нужно чтоб она всплавала единожды, т.е. один кадр, а потом снова становилась 0 .для этого я использую переменную контейер так сказать player_still в которую при первом проигрыше записываем 1 и следовательно если не нажата кнопка вперед проверяем стоит ли игрок If player_still=0 player_stop=1

Niburiec

24.01.2013 19:31

Ответ: Смена анимации с помощью KeyDown

ГЛОБАЛЬНОЕ СПАСИБО !!! Всё доходчиво и понятно. Я понимаю что многим трудно объяснять как для первоклассника, но куда ж нам тогда деваться? Только к вам - мастерам. Ещё раз спасибо. Теперь всё работает отлично !!!

pepel

24.01.2013 19:44

Ответ: Смена анимации с помощью KeyDown

Цитата:

Сообщение от Niburiec (Сообщение 250563)

да незачто. пиши на форум если будут проблемы. думаю с прыжком и бегом разберешься сам по логике

Niburiec

24.01.2013 22:28

Ответ: Смена анимации с помощью KeyDown

Эх... Тогда ещё вопрос по ходу дела. Опять я всё про тоже. Наверное достал уже своими вопросами? Что не так в этом коде? ...Честное слово, последний вопрос по этой теме и всё.

Цитата:

Graphics3D 800,600,16,1
SetBuffer BackBuffer()
cam=CreateCamera()
lite = CreateLight(1)
MoveEntity lite,5,0,0

;--------------------------------------
m=LoadAnimMesh("officer.b3d")
men=ExtractAnimSeq(m,212,232)
men2=ExtractAnimSeq(m,236,260)
men3=ExtractAnimSeq(m,301,319)

ScaleEntity m,0.1,0.1,0.1
PositionEntity m,0,0,0,True

PointEntity cam,m
PositionEntity cam,0,3,-7

Animate m,1,0.5,men

Global player_start=0
Global player_stop=1
Global player_still=1
Global player_beg=0

Repeat
If KeyHit(1) End
UpdateWorld

player_start=0:player_beg=0

If KeyHit(200) player_start=1:player_stop=-0:Gosub level1
If KeyHit(205) player_beg=1:player_stop=-0:Gosub level2
Goto level3

.Level1
If KeyDown(200)
player_still=0
Else
If player_still=0 player_stop=1
EndIf

If player_start Animate m,1,0.5,men2,6
If player_stop Animate m,1,0.5,men,10 :player_still=1:player_stop=0
Return

.level2
If KeyDown(205)
player_still=0
Else
If player_still=0 player_stop=1
EndIf

If player_beg Animate m,1,0.5,men3,6
If player_stop Animate m,1,0.5,men,10 :player_still=1:player_stop=0
Return

.level3

RenderWorld tween
Flip

Forever

И за одно, как реализовывается одновременное нажатие клавиш вперед+Shift ?

Arton

24.01.2013 22:51

Ответ: Смена анимации с помощью KeyDown

Код работает, это у тебя блиц балует - серьёзно.

На хрена ты там гоосабы сделал? :4to:

Фтопку их. Сделай лучше функции отдельно и ссылайся на них, когда нажимаешь клавиши.

Кнопки - это же просто!

Код:

If KeyDown(адин_кнопка)=True ;если ЗАЖАЛИ такую-то кнопку...

        If KeyDown(два_кнопка)=True ;+ ЗАЖАЛИ такую-то кнопку...

                ;Тут что-то происходит...

  EndIf

EndIf

или

Код:

If KeyDown(адин_кнопка)=True and KeyDown(два_кнопка)=True then ;тут что-то происходит...

pepel

25.01.2013 00:49

Ответ: Смена анимации с помощью KeyDown

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

просто тут довольно сложный код . т.к. если делать как в играх то тут много ньюансов - например если сначала зажать шифт а потом вперед он сразу должен бежать, если зажать вперед и потом зажимать и отпускать шифт он должен то идти то бежать и т.д.

PHP код:




Graphics3D 800,600,16,2
SetBuffer BackBuffer()
cam=CreateCamera()
lite = CreateLight(1) 
MoveEntity lite,5,0,0

;--------------------------------------
m=LoadAnimMesh("officer.b3d")
men=ExtractAnimSeq(m,212,232)
men2=ExtractAnimSeq(m,236,260)
men3=ExtractAnimSeq(m,301,319)

ScaleEntity m,0.1,0.1,0.1
PositionEntity m,0,0,0,True

PointEntity cam,m
PositionEntity cam,0,3,-7

Animate m,1,0.5,men

Global player_start_go=0
Global player_start_run=0
Global player_go=0
Global player_run=0
Global player_stop=1 
Global player_still=1 


Repeat
If KeyHit(1) End
UpdateWorld

down_up= KeyDown(200)
hit_up=KeyHit(200)
down_shift=KeyDown(54)

player_start_go=0
player_start_run=0

If hit_up player_start_go=1


If   down_up And down_shift
    player_run=1
Else
    If   player_run=1 And down_up=0 And player_go=0 And player_still=0 player_still=1:    player_stop=1:player_run=0
    If   player_run=1 And down_up And player_still=0 player_start_go=1:    player_run=0
EndIf



If player_run=0 And player_still=0 And player_go=0 And  player_start_go=0 player_still=1:player_stop=1
If player_run=1 And (player_still=1 Or player_go=1) player_start_run=1:player_go=0:player_still=0


If   down_up

    If down_shift
        player_go=0
        player_still=0
    Else
        player_go=1
        player_still=0
    EndIf

Else
player_go=0
EndIf



If player_start_go Animate m,1,0.5,men2,6
If player_start_run Animate m,1,0.5,men3,5
If player_stop Animate m,1,0.5,men,10

player_stop=0

RenderWorld tween
Text 0,0,"player_run  "+player_run
Text 0,10,"player_go  "+down_up
Flip

Forever

Niburiec

25.01.2013 01:08

Ответ: Смена анимации с помощью KeyDown

Если честно, я не ожидал что понадобится столько времени... Но вам, уважаемый, нужно памятник при жизни ставить за то что имеете терпение и не отказываете в помощи. Вобщем, спасибо за полный код. Теперь у меня есть над чем посидеть и разобраться. Постараюсь, по крайней мере...Однако, на мой взгляд, этот вопрос освещён полностью и у других будет возможность заглянуть как это делается :)

Часовой пояс GMT +4, время: 06:53.