forum.boolean.name

forum.boolean.name (http://forum.boolean.name/index.php)
-   3D-программирование (http://forum.boolean.name/forumdisplay.php?f=12)
-   -   очень нужен совет по анимации и звуку (http://forum.boolean.name/showthread.php?t=14877)

ant0N 10.06.2011 23:03
очень нужен совет по анимации и звуку
 
Извините если такая тема уже есть, все читать у меня нет сейчас времени.
Подскажите мне, вот я сделал анимацию бега, нажимаю кнопку все работает, персонаж бежит..., но как сделать так чтобы когда я перестаю жать кнопку - анимация бега останавливалась и допустим включалась анимация свободной стойки? То же самое у меня и со звуком....пока не доиграет не остановится...
дайте пример кода пожалуйста

Spy4433 10.06.2011 23:21
Ответ: очень нужен совет по анимации и звуку
 
путем контроля нажатия клавиши

если клавиша нажата то
анимация бега
если нет то
анимация стоять

RegIon 11.06.2011 06:30
Ответ: очень нужен совет по анимации и звуку
 
Код:
If  KeyDown(200) And (Not (KeyDown(205) Or KeyDown(203))) TranslateEntity hero,0,0,speed#:moveto=1;up
If  KeyDown(208) And (Not (KeyDown(205) Or KeyDown(203))) TranslateEntity hero,0,0,-speed#:moveto=2;down
If  KeyDown(205) And (Not (KeyDown(208) Or  KeyDown(200))) TranslateEntity hero,speed#,0,0:moveto=3;right
If  KeyDown(203) And (Not (KeyDown(208) Or  KeyDown(200))) TranslateEntity hero,-speed#,0,0:moveto=4;left
PositionEntity hero,EntityX(hero),-.2,EntityZ(hero)
If moveto<>0 And AnimSeq(hero)<>run Animate hero,1,1,run
If moveto=0 And AnimSeq(hero)<>nor Animate hero,1,1,nor
на те мой кусок кода

ant0N 11.06.2011 08:40
Ответ: очень нужен совет по анимации и звуку
 
Огромное вам спасибо!:super:

RegIon 11.06.2011 08:59
Ответ: очень нужен совет по анимации и звуку
 
Цитата:
Огромное вам спасибо!:super:
зы..кнопка в углу если что

Program23 11.06.2011 10:16
Ответ: очень нужен совет по анимации и звуку
 
Вложений: 1
Делай,как здесь.И будет тебе счастье!

Вложение 14016

ant0N 11.06.2011 12:57
Ответ: очень нужен совет по анимации и звуку
 
еще один вопрос в тему
как сделать чтобы анимация менялась через определенное время (например каждую вторую минуту вклучалася аним idl2, и через 2 мин снова idl1?

RegIon 11.06.2011 13:14
Ответ: очень нужен совет по анимации и звуку
 
time=MilliSecs()/60000 Mod 2 будет интегрировать минуты от 0 до 1
тебе надо типо так:

time=MilliSecs()/60000 Mod 4

if time>0 and time<2 And AnimSeq(entity%)<>id1 Animate entity%,1,1,id1
if time>2 and time<4 And AnimSeq(entity%)<>id2 Animate entity%,1,1,id2

как увеличить количество кадров в максе,а то 100 не хватило,а где это не нашёл...

ant0N 11.06.2011 13:25
Ответ: очень нужен совет по анимации и звуку
 
вот я сделал обзор мышкой, TurnEntity cam,MouseYSpeed(),-MouseXSpeed(),0
а когда запускаю то не могу повернуть влево пока не сделаю полный оборот вправо, так же и вверх.... что это может быть?

RegIon 11.06.2011 13:29
Ответ: очень нужен совет по анимации и звуку
 
MoveMouse GraphicsWidth()/2,GraphicsHeight()/2
--это просто у тебя мышь ведать воткнулась в границу монитора.....позиционируй её посреди экрана....
Ответе мне:

как увеличить количество кадров в максе,а то 100 не хватило,а где это не нашёл...?

ant0N 11.06.2011 13:32
Ответ: очень нужен совет по анимации и звуку
 
Для того, чтобы увеличить количество кадров в линейке нужно нажать на кнопку Time Configuration
а дальше все понятно

ant0N 11.06.2011 13:46
Ответ: очень нужен совет по анимации и звуку
 
еще вопрос.
как сделать чтобы анимация включалась по двойному нажатию. ( например
два раза ЛКМ = attack
два раза ЛКМ + Shift =attack2 и тд )?

RegIon 11.06.2011 13:49
Ответ: очень нужен совет по анимации и звуку
 
t=t+MouseHit(1)
if t>0 and MilliSecs()/1000 Mod 100 = 90 t=0
if t=2 And AnimSeq(entity%)<>id3 Animate entity%,1,1,id3:t=0

ant0N 11.06.2011 13:51
Ответ: очень нужен совет по анимации и звуку
 
Цитата:
Сообщение от Костян (Сообщение 191125)
t=t+MouseHit(1)
if t=2 And AnimSeq(entity%)<>id3 Animate entity%,1,1,id3:t=0
элементарно же все, как я сам не догадался:) спасибо! +

RegIon 11.06.2011 13:55
Ответ: очень нужен совет по анимации и звуку
 
ps: будет срабытывать всегда,выше вариант на быстрый клик..тот лучше(но может троить)

ant0N 11.06.2011 14:06
Ответ: очень нужен совет по анимации и звуку
 
Цитата:
Сообщение от Костян (Сообщение 191125)
t=t+MouseHit(1)
if t=2 And AnimSeq(entity%)<>id3 Animate entity%,1,1,id3:t=0
что то не выходит(
дергается и все
и второй вариант тоже

ant0N 11.06.2011 14:43
Ответ: очень нужен совет по анимации и звуку
 
at = 0

If MouseDown (1) at=1
If at<> 0 And AnimSeq(pla) <> atackp Animate pla,1,.2,atackp

;скажите что не правильно?

ant0N 11.06.2011 18:31
Ответ: очень нужен совет по анимации и звуку
 
может тогда кто нибудь знает как сделать
чтоба Т= 100 каждую секунду убавлялось на 1 тоесть сделать: Х = Т - 1

Reks888 11.06.2011 18:50
Ответ: очень нужен совет по анимации и звуку
 
While T>0
If Millisecs() mod 1000=0 then T=T-1
Wend

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

ant0N 11.06.2011 19:08
Ответ: очень нужен совет по анимации и звуку
 
почему то когда пишу print T пишет 0

Reks888 11.06.2011 20:32
Ответ: очень нужен совет по анимации и звуку
 
есть предположение что T=0
Выполняется условие выхода из цикла T>0
Перед циклом задай нужное значение T

ant0N 11.06.2011 20:47
Ответ: очень нужен совет по анимации и звуку
 
все перепробовал не получается(
есть еще варианты?

Reks888 11.06.2011 20:54
Ответ: очень нужен совет по анимации и звуку
 
T=1
While T>0
T=T-1
Delay 1000
Wend

Работает одну секунду потом отрубается

ant0N 11.06.2011 20:59
Ответ: очень нужен совет по анимации и звуку
 
но мне нужно чтобы был отсчет времени.... от 30 до 0
это как возможно?

Reks888 11.06.2011 21:01
Ответ: очень нужен совет по анимации и звуку
 
На

oldTime=MilliSecs()
T=30
While T>0
If MilliSecs()-oldTime>1000 Then
Print T
T=T-1
oldTime=MilliSecs()
End If
Delay 1
Wend

Задача довольно легкая с точки зрения алгоритмики, RTFM блеять. За такие глупые вопросы можно и ненависти от участников треда схлопотать

ant0N 11.06.2011 21:06
Ответ: очень нужен совет по анимации и звуку
 
спсб!

ant0N 11.06.2011 21:15
Ответ: очень нужен совет по анимации и звуку
 
Цитата:
Сообщение от S_A_W (Сообщение 191132)
at = 0

If MouseDown (1) at=1
If at<> 0 And AnimSeq(pla) <> atackp Animate pla,1,.2,atackp

;скажите что не правильно?
а про это что скажешь?

Reks888 11.06.2011 21:17
Ответ: очень нужен совет по анимации и звуку
 
А я с анимациями почти никогда не работал, что такое AnimSeq не знаю.
И вместо тебя help читать не буду. Оставлю это удовольствие тебе

St_AnGer 11.06.2011 21:39
Ответ: очень нужен совет по анимации и звуку
 
Цитата:
Сообщение от S_A_W (Сообщение 191132)
at = 0

If MouseDown (1) at=1
If at<> 0 And AnimSeq(pla) <> atackp Animate pla,1,.2,atackp

;скажите что не правильно?
Наверно лучше так:

Код:
If MouseDown (1) 
      at = 1
else
      at = 0
end if

If at<> 0 And AnimSeq(pla) <> atackp Animate pla,1,.2,atackp
Должно работать. Только at = 0 перед условием MouseDown убери вообще

Reks888 12.06.2011 02:41
Ответ: очень нужен совет по анимации и звуку
 
Грифер обиделся?

Mr_F_ 12.06.2011 02:41
Ответ: очень нужен совет по анимации и звуку
 
крутой блог


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

vBulletin® Version 3.6.5.
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Перевод: zCarot