Войти
NeoBooker.ru
Добро пожаловать к нам в гости!
Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
  • Страница 1 из 1
  • 1
Модератор форума: Peter, DEMBEL, YURIY  
Форум NeoBook » Всё о программе NeoBook » Общие вопросы по NeoBook » Таймер обратного отсчета
Таймер обратного отсчета
Noobi_66Дата: Пт, 05 Ноября 2010, 14:31 | Сообщение # 1
Любопытный
Всем здрасти :)
На этом форуме я нашел статью про таймер обратного отсчета, прочитав его я понял что он был не доделан, и я решил сделать свой, немного другим способом.

Таймер был сделан и работает на ура :)
Вот только он я думаю подойдет не всем, но суть его я понял как сделать, мне осталось только сделать так что бы он не выводил отрицательные значения, а так вот прошу.

З.Ы. Просьба не обижать :D

Прикрепления: 223.rar (5.1 Kb)
 
СообщениеВсем здрасти :)
На этом форуме я нашел статью про таймер обратного отсчета, прочитав его я понял что он был не доделан, и я решил сделать свой, немного другим способом.

Таймер был сделан и работает на ура :)
Вот только он я думаю подойдет не всем, но суть его я понял как сделать, мне осталось только сделать так что бы он не выводил отрицательные значения, а так вот прошу.

З.Ы. Просьба не обижать :D

Автор - Noobi_66
Дата добавления - 05 Ноября 2010 в 14:31
AlienДата: Пт, 05 Ноября 2010, 15:03 | Сообщение # 2
что-то я там не заметил таймер обратного отсчета %)
 
Сообщениечто-то я там не заметил таймер обратного отсчета %)
Автор - Alien
Дата добавления - 05 Ноября 2010 в 15:03
Noobi_66Дата: Пт, 05 Ноября 2010, 15:12 | Сообщение # 3
Любопытный
3 ползунка, в них выбераешь время тебе нужное, наводишь на 3 текстовых поля и тебе просчитываеться время через сколько этот момент наступит :D

Мне осталось только разобраться как сделать так что бы ненужно было наводить каждый раз..

 
Сообщение3 ползунка, в них выбераешь время тебе нужное, наводишь на 3 текстовых поля и тебе просчитываеться время через сколько этот момент наступит :D

Мне осталось только разобраться как сделать так что бы ненужно было наводить каждый раз..

Автор - Noobi_66
Дата добавления - 05 Ноября 2010 в 15:12
СергейДата: Пт, 05 Ноября 2010, 15:34 | Сообщение # 4
Необукер
Quote (Noobi_66)
прочитав его я понял что он был не доделан
это в одной теме, а в другой есть пример простого таймера обратного отсчета в 5 части

Добавлено (05 Ноябрь 2010, 15:34)
---------------------------------------------

Quote (Noobi_66)
Таймер был сделан и работает на ура
больше на секундомер похож :D
 
Сообщение
Quote (Noobi_66)
прочитав его я понял что он был не доделан
это в одной теме, а в другой есть пример простого таймера обратного отсчета в 5 части

Добавлено (05 Ноябрь 2010, 15:34)
---------------------------------------------

Quote (Noobi_66)
Таймер был сделан и работает на ура
больше на секундомер похож :D
Автор - Сергей
Дата добавления - 05 Ноября 2010 в 15:34
СергейДата: Пт, 05 Ноября 2010, 15:41 | Сообщение # 5
Необукер
Quote (Noobi_66)
Мне осталось только разобраться как сделать так что бы ненужно было наводить каждый раз
посмотри пример
Прикрепления: hor.rar (2.6 Kb)
 
Сообщение
Quote (Noobi_66)
Мне осталось только разобраться как сделать так что бы ненужно было наводить каждый раз
посмотри пример
Автор - Сергей
Дата добавления - 05 Ноября 2010 в 15:41
Noobi_66Дата: Пт, 05 Ноября 2010, 15:52 | Сообщение # 6
Любопытный
Quote (Сергей)
больше на секундомер похож :D

знаю :D
Quote (Сергей)
посмотри пример

Спасибо за пример :) разобрался..)
 
Сообщение
Quote (Сергей)
больше на секундомер похож :D

знаю :D
Quote (Сергей)
посмотри пример

Спасибо за пример :) разобрался..)
Автор - Noobi_66
Дата добавления - 05 Ноября 2010 в 15:52
mishemДата: Пт, 05 Ноября 2010, 16:24 | Сообщение # 7
Эксперт форума
Noobi_66, а почему секунды тикают постоянно? И отсчет секунд идет не в обратном порядке? :)
Не хочешь читать хелп?

Если хелп и форум не помогли, тогда все ответы здесь



Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.
 
СообщениеNoobi_66, а почему секунды тикают постоянно? И отсчет секунд идет не в обратном порядке? :)
Автор - mishem
Дата добавления - 05 Ноября 2010 в 16:24
Noobi_66Дата: Пт, 05 Ноября 2010, 16:27 | Сообщение # 8
Любопытный
mishem, Потому что там идут секунды которые у тебя на компьютеры стоят :)
Если вести отчет в обратную сторону то тот вариант который я предложил вообше не подойдет :) потому что секунды при вводи например 60 будут идти от 999 :D

Это есть есть TextEntry, а я делал через ползунок, идея немного другая, но отсчет действительно производит))

 
Сообщениеmishem, Потому что там идут секунды которые у тебя на компьютеры стоят :)
Если вести отчет в обратную сторону то тот вариант который я предложил вообше не подойдет :) потому что секунды при вводи например 60 будут идти от 999 :D

Это есть есть TextEntry, а я делал через ползунок, идея немного другая, но отсчет действительно производит))

Автор - Noobi_66
Дата добавления - 05 Ноября 2010 в 16:27
mishemДата: Пт, 05 Ноября 2010, 16:34 | Сообщение # 9
Эксперт форума
Quote (Noobi_66)
идея немного другая

Идея одна и та же. Отсчет обратного времени. :D
Не хочешь читать хелп?

Если хелп и форум не помогли, тогда все ответы здесь



Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.
 
Сообщение
Quote (Noobi_66)
идея немного другая

Идея одна и та же. Отсчет обратного времени. :D
Автор - mishem
Дата добавления - 05 Ноября 2010 в 16:34
Noobi_66Дата: Пт, 05 Ноября 2010, 16:44 | Сообщение # 10
Любопытный
Идея исполнения :D
а в целом ты прав :D
 
СообщениеИдея исполнения :D
а в целом ты прав :D
Автор - Noobi_66
Дата добавления - 05 Ноября 2010 в 16:44
DoXeRДата: Вт, 18 Октября 2011, 07:37 | Сообщение # 11
Участник
Подскажите плиз, можно ли чем-либо таймер заменить, если нужна пауза в 10 секунд?
Если нет, то как можно тут правильно сделать:
Code

While "[Start]" ">" "100"
SetVar "[Start]" "([Start])-1"

.TimerStart "Timer2" "20000"

EndWhile

Чтобы число в переменной менялось каждые 20 секунд на 1 ниже
 
СообщениеПодскажите плиз, можно ли чем-либо таймер заменить, если нужна пауза в 10 секунд?
Если нет, то как можно тут правильно сделать:
Code

While "[Start]" ">" "100"
SetVar "[Start]" "([Start])-1"

.TimerStart "Timer2" "20000"

EndWhile

Чтобы число в переменной менялось каждые 20 секунд на 1 ниже
Автор - DoXeR
Дата добавления - 18 Октября 2011 в 07:37
СергейДата: Вт, 18 Октября 2011, 08:12 | Сообщение # 12
Необукер
ставишь таймер на 20 сек. и в нем код
Quote
If "[Start]" ">" "100"
SetVar "[Start]" "[Start]-1"
Else
TimerStop "Timer1"
EndIf


Добавлено (18 Октябрь 2011, 08:12)
---------------------------------------------
Quote (DoXeR)
если нужна пауза в 10 секунд
дык, и ставь таймер на 10 сек. будет тебе пауза. А в таймере код, который будет выполнятся каждые 10 сек.
Прикрепления: tim.rar (2.0 Kb)


Сообщение отредактировано
Сергей - Вт, 18 Октября 2011, 09:02
 
Сообщениеставишь таймер на 20 сек. и в нем код
Quote
If "[Start]" ">" "100"
SetVar "[Start]" "[Start]-1"
Else
TimerStop "Timer1"
EndIf


Добавлено (18 Октябрь 2011, 08:12)
---------------------------------------------
Quote (DoXeR)
если нужна пауза в 10 секунд
дык, и ставь таймер на 10 сек. будет тебе пауза. А в таймере код, который будет выполнятся каждые 10 сек.
Автор - Сергей
Дата добавления - 18 Октября 2011 в 08:12
ВадимДата: Вт, 18 Октября 2011, 12:54 | Сообщение # 13
Генератор идей
Есть еще плагин npTime (платный).
Бесплатный онлайн курс программирования в VisualNEO Win (NeoBook)
 
СообщениеЕсть еще плагин npTime (платный).
Автор - Вадим
Дата добавления - 18 Октября 2011 в 12:54
mishemДата: Вт, 18 Октября 2011, 19:53 | Сообщение # 14
Эксперт форума
DoXeR, есть еще GotoLine ""
Не хочешь читать хелп?

Если хелп и форум не помогли, тогда все ответы здесь



Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.
 
СообщениеDoXeR, есть еще GotoLine ""
Автор - mishem
Дата добавления - 18 Октября 2011 в 19:53
MelahorДата: Вс, 04 Августа 2013, 12:19 | Сообщение # 15
Любопытный
Сергей, спасибо за наглядный пример. Таймер обратного отсчёта работает на ура, вот только как придать ему класический формат (00:10, 00:09, 00:08...)?
 
СообщениеСергей, спасибо за наглядный пример. Таймер обратного отсчёта работает на ура, вот только как придать ему класический формат (00:10, 00:09, 00:08...)?
Автор - Melahor
Дата добавления - 04 Августа 2013 в 12:19
MelahorДата: Вс, 04 Августа 2013, 12:19 | Сообщение # 16
Любопытный
Получается либо 00:010, либо 00:9, маска ввода не катит из-за разделителя.
Прикрепления: 6826383.zip (47.9 Kb)


Сообщение отредактировано
Melahor - Вс, 04 Августа 2013, 12:38
 
СообщениеПолучается либо 00:010, либо 00:9, маска ввода не катит из-за разделителя.
Автор - Melahor
Дата добавления - 04 Августа 2013 в 12:19
ponandДата: Вс, 04 Августа 2013, 21:53 | Сообщение # 17
Участник
Цитата (Melahor)
Получается либо 00:010, либо 00:9, маска ввода не катит из-за разделителя.


так будет норм тикать
Код

If "[sek]" ">" "10"
   SetVar "[sek]" "[sek]-1"
Else
   if "[sek]" ">" "0"
     SetVar "[s]" "[sek]-1"
     SetVar "[sek]"  "0[s]"
   EndIf
EndIf
 
Сообщение
Цитата (Melahor)
Получается либо 00:010, либо 00:9, маска ввода не катит из-за разделителя.


так будет норм тикать
Код

If "[sek]" ">" "10"
   SetVar "[sek]" "[sek]-1"
Else
   if "[sek]" ">" "0"
     SetVar "[s]" "[sek]-1"
     SetVar "[sek]"  "0[s]"
   EndIf
EndIf
Автор - ponand
Дата добавления - 04 Августа 2013 в 21:53
MelahorДата: Ср, 14 Августа 2013, 12:50 | Сообщение # 18
Любопытный
Спасибо, ponand. Тикает и вправду норм, хотя и не слышно. thumbs_up




Сообщение отредактировано
Melahor - Ср, 14 Августа 2013, 12:56
 
СообщениеСпасибо, ponand. Тикает и вправду норм, хотя и не слышно. thumbs_up

Автор - Melahor
Дата добавления - 14 Августа 2013 в 12:50
ponandДата: Ср, 14 Августа 2013, 14:26 | Сообщение # 19
Участник
Еще вариант с vbs

nb таймер
Код

if "[sek]" ">" "0"
    Call "Мои\vbs\Формат числа" "[sek]-1" "2" "[sek]"
EndIf


vbs функция
Код

{NeoBook Function}
Version=5,80
Language=VBScript
Param=[%1]|Text|Исходное число
Param=[%2]|Number|Количество разрядов
Param=[%3]|Variable|Переменная результата
{End}
nbSetVar "[%3]", String([%2]-Len([%1]),"0") & [%1]


Сообщение отредактировано
ponand - Ср, 14 Августа 2013, 16:51
 
СообщениеЕще вариант с vbs

nb таймер
Код

if "[sek]" ">" "0"
    Call "Мои\vbs\Формат числа" "[sek]-1" "2" "[sek]"
EndIf


vbs функция
Код

{NeoBook Function}
Version=5,80
Language=VBScript
Param=[%1]|Text|Исходное число
Param=[%2]|Number|Количество разрядов
Param=[%3]|Variable|Переменная результата
{End}
nbSetVar "[%3]", String([%2]-Len([%1]),"0") & [%1]
Автор - ponand
Дата добавления - 14 Августа 2013 в 14:26
MelahorДата: Ср, 14 Августа 2013, 16:31 | Сообщение # 20
Любопытный


Сообщение отредактировано
Melahor - Сб, 17 Августа 2013, 17:08
 
Сообщение
Автор - Melahor
Дата добавления - 14 Августа 2013 в 16:31
Форум NeoBook » Всё о программе NeoBook » Общие вопросы по NeoBook » Таймер обратного отсчета
  • Страница 1 из 1
  • 1
Поиск: