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

c0mrad · 30.12.2006, 18:35

Может вопрос и глупый,но как сделать паузу на некоторое время?

impersonalis · 30.12.2006, 19:02

сохранить текущее время.
проверять разность между текущим на данный момент и сохранённым.

30.12.2006, 19:40

Delay sometime

impersonalis · 30.12.2006, 19:59

jimon читай сабж!

moka · 01.01.2007, 23:06

Попробуй при нажатии пнопки которая вызывает паузу, делать снимок текущего экрана, затем его отображать, но уже сдесь:
Repeat
Сдесь
Until KeyHit(1)

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

HolyDel · 02.01.2007, 02:10

А че так пересложнять?
If keyhit(25) then pause=1
while pause
drawtext 400,300,"ПАУЗА, БЛИН",1,1
flip
if keyhit(25) then pause=0
wend

ето надо всунуть в главный цикл

moka · 02.01.2007, 06:31

HolyDel "Переусложнять"? Ты о скрине? Да эт для того, что-бы после твоего флипа, небыл чёрным экран, а оставалась замершая картинка позади. "Усложнять"...

Diplomat wrote: Пост поправил. Выраженное в матерной форме признание аффтара в плохом настроении не готово стать достоянием общественности.

Diplomat · 02.01.2007, 13:17

MoKa: Именно так, батенька, переусложнять. Причем по-адски.

HolyDel: Фон затирается. Нужно просто убрать цикл и Флип. А текст выводить сразу в ФронтБуффер с помощью Locate и Print.

Nord · 02.01.2007, 17:56

HolyDel
А зачем переменную создавать? Например при игре вызываешь меню:

If KeyHit(1) Then
Repeat
;Код меню
Until KeyHit(1)
EndIf

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

Diplomat · 02.01.2007, 18:52

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

Есть такое слово: WaitKey()

Nord · 02.01.2007, 19:05

Чисто для паузы WaitKey() - как вариант, но если мне нужно во время паузы вызывать меню - без цикла никак не обойтись, ведь так?

Diplomat · 02.01.2007, 19:52

HolyDel · 03.01.2007, 01:30

упс. точно дергается. тогда так:

If KeyHit(25)
pause=1
Text 400,300,"ПАУЗА, БЛИН",1,1
Flip
EndIf
While pause
If KeyHit(25) Then pause=0
If KeyDown(1) Then End
Wend

Diplomat · 03.01.2007, 12:44

[blitz]If KeyHit(Key_Pause) Then
FlushKeys()
Locate 10,10
Print "PAUSE"
WaitKey()
FlushKeys()
FlushMouse()
End If[/blitz]

c0mrad · 03.01.2007, 13:20

O_o
Господи....Че вы курите?
Пасибо,конечно,всем,но
imperу
+1
за понимание вопроса.