///
/// Исходный код текстовой онлайн игры "Текущее время" скачан с сайта https://apero.ru/
/// Пройти онлайн или скачать последнюю версию этой игры можно по адресу:  https://apero.ru/Текстовые-игры/Текущее-время
/// Авторы: StalkerSleem
/// Версия: от 2018-12-27 15:47:06
///
\главная.запуск
[b]"Время - [i]оно тикает![/i]"[/b]
Код на отображение действительного времени, по [b]Москве[/b].
\(начало,Свериться)
Автор: [color=green][b]StalkerSleem[/b][/color]
\(главная.автор,[color=#8d8d8d]От автора[/color]) \(главная.версия,[color=#8d8d8d]v: 1.0.1[/color])
//Начальные переменные:
\(тм=64678500)
\(мн=15)
\(чс=14) // Тут можно изменить в зависимости от часового пояса
\СТОП

\главная.версия
[b]История версий:[/b]
1.0.0 - Релиз примера 07.01.2017.
1.0.1 - Добавлена строчка смены стиля оформления, день-ночь.
\(главная.запуск,На главную) 
\СТОП

\главная.автор
[b]От автора:[/b]
Пример утратил свою значимость после введения команды АПЕРО.время("Y/m/d H i s")
[b]Связаться можно через:[/b]
ВКонтакте: [i]vk.com/stalkersleem[/i]
Почта: [i]hren_ego_znaet@bk.ru[/i]
\(главная.запуск,На главную) 
\СТОП

//Постоянно меняющиеся переменные:
\АПЕРО.события
\(ск=\(АПЕРО.время)-тм) 
\ЕСЛИ (ск>60) \ТО \(мн=мн+ск/60) \(ск=((ск/60)-\(АПЕРО.отбросить(ск/60)))*60) \(тм=\(АПЕРО.отбросить(\(АПЕРО.время)/60))*60)
\ЕСЛИ (мн>60) \ТО \(чс=чс+мн/60) \(мн=((мн/60)-\(АПЕРО.отбросить(мн/60)))*60) 
\ЕСЛИ (чс>24) \ТО \(чс=((чс/24)-\(АПЕРО.отбросить(чс/24)))*24)
\ЕСЛИ (чс<21 И чс>5) \(АПЕРО.стиль="стандарт") \ИНАЧЕ \(АПЕРО.стиль="ночь")
\(часы=\ЕСЛИ (чс<10) \ТО 0\(АПЕРО.отбросить(\(чс))) \ИНАЧЕ \(АПЕРО.отбросить(\(чс))))
\(минуты=\ЕСЛИ (мн<10) \ТО 0\(АПЕРО.отбросить(\(мн))) \ИНАЧЕ \(АПЕРО.отбросить(\(мн))))
\(секунды=\ЕСЛИ (ск<10) \ТО 0\(АПЕРО.отбросить(\(ск))) \ИНАЧЕ \(АПЕРО.отбросить(\(ск))))
\(АПЕРО.режим вывода="добавить")
\СТОП

//Отображение часов:
\начало
[i]~ Тик-так ~[/i]
Время: \ЕСЛИ (чс<1) \ТО (00:\ЕСЛИ (мн<1) \ТО 00:\(секунды) \ИНАЧЕ \(минуты):\(секунды)
    \) \ИНАЧЕ \(часы):\ЕСЛИ (мн<1) \ТО 00:\(секунды) \ИНАЧЕ \(минуты):\(секунды)
\(начало,Обновить)
\ССЫЛКА("apero.ru/Текстовые-игры/Исходный-код-игры-Текущее-время.txt","Скачать исходник")
\(конец,Закончить)
\СТОП

\конец
\(АПЕРО.конец=1)
\СТОП