Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Программирование игр для компьютеров > Blitz3D > 2D-программирование

2D-программирование Вопросы, касающиеся двумерного программирования

Ответ
 
Опции темы
Старый 28.12.2011, 14:16   #1
Nikich
Бывалый
 
Регистрация: 22.12.2011
Сообщений: 844
Написано 150 полезных сообщений
(для 275 пользователей)
Вопрос Проблема с переменной


Graphics 800,600
SetBuffer BackBuffer()
Global gert=LoadAnimImage("hero.bmp",296,214,0,11)
MaskImage gert,255,255,255
ScaleImage gert,0.2,0.2
Global speed=5
Global x=1
Global y=1
Global timer=MilliSecs()
Global frames

Function UpdatePlayer()
DrawImage gert,x,y,frames
If KeyDown(200) y=y-speed
If KeyDown(208) y=y+speed
If KeyDown(205) x=x+speed
If KeyDown(203) x=x-speed

If MilliSecs()-timer=1000 Then
frames=frames+1
timer=MilliSecs()
EndIf
If frames=11 Then frames=0
Print MilliSecs()+"   "+timer
End Function

While Not KeyHit(1)
Cls
UpdatePlayer()
Flip
Wend
Почему-то переменная "timer" не обновляется. Я новичок и, возможно, многого не знаю, но мне кажется что всё должно работать. Пожалуйста, можете объяснить в чём ошибка?
(Offline)
 
Ответить с цитированием
Старый 28.12.2011, 14:35   #2
Nerd
Чудо-кот
 
Аватар для Nerd
 
Регистрация: 22.02.2011
Сообщений: 901
Написано 480 полезных сообщений
(для 1,471 пользователей)
Ответ: Проблема с переменной

If MilliSecs()-timer>1000 Then
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Nikich (28.12.2011)
Старый 28.12.2011, 14:39   #3
Nikich
Бывалый
 
Регистрация: 22.12.2011
Сообщений: 844
Написано 150 полезных сообщений
(для 275 пользователей)
Ответ: Проблема с переменной

Огромное спасибо!
(Offline)
 
Ответить с цитированием
Старый 28.12.2011, 14:40   #4
FireOwl
Бывалый
 
Аватар для FireOwl
 
Регистрация: 16.09.2009
Адрес: Sun system
Сообщений: 831
Написано 442 полезных сообщений
(для 1,836 пользователей)
Ответ: Проблема с переменной

Очевидно, MilliSecs()-timer=1000 никак не наступает.

Упд. Опоздал.
__________________
N"Gasta! Kvata! Kvakis!
Ahkstas so novajxletero (oix jhemile) so Ranetauw.
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Nikich (28.12.2011)
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


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


vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com