Показать сообщение отдельно
Старый 23.01.2009, 22:43   #1
NickDev
AnyKey`щик
 
Регистрация: 23.01.2009
Сообщений: 4
Написано 0 полезных сообщений
(для 0 пользователей)
Как сделать задержку у анимации

Привет народ.Я делаю игру арканоид, уже почти всё готово, и у меня возникает проблема с анимацией.

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

вот код анимации взрыва астероида при столкновении с кораблем игрока

For s.ship=Each ship
....For ast.asteroid=Each asteroid
.......If ImagesCollide(img_ship,s\x,s\y,0,img_ast,ast\x,ast \y,0) Then
..........DrawImage img_dship,s\x-48,s\y-50
......;анимация врзыва астероида
..........frame=frame+1
.......If frame>10 Then frame=0
.........DrawImage img_ex_ast,ast\x,ast\y,frame
.......Delete ast
......;конец анимации
........If score>0
..........score=score-100
........EndIf
........If health_ind>0
..........health_ind=health_ind-5
........EndIf
......Exit
....EndIf
..Next
Next

отформатировал как смог), чтобы удобнее читать

Последний раз редактировалось NickDev, 23.01.2009 в 22:57.
(Offline)
 
Ответить с цитированием