var_info = false
var_unlock = false
var_tap = 0
var_chms = 0
var_hide=false
tweens.fadeH=100
tweens.fadeM=100
tweens.fadeS=100
tweens.fadeT=0
var_tt=0
ct=-1
play=false
count=0

var_lang = 1  -- Default language
var_c = 1  -- Default colour profile



-- ===============================
--            Play info
-- ===============================

function on_second()
if var_tt>0 and ct==-1 then ct=0 end
if ct>-1 then ct=ct+1 end
if ct==4 then var_t=var_tt ct=-1 var_tt=0 end
if play then
   if count%2==0 then
      cc()
      if var_t==1 then count=count+1 end
   end
   count=count+1
   if count>17 then play=false count=0 end
end
end


-- ===============================
--              Animations
-- ===============================

function var_tween(n,f,t,d)
wm_schedule { 
   {action='tween', tween=n, from=f, to=t, duration=d, easing=outQuad}
}
end

function var_showlock()
var_tween('fade',200,0,3)
end

function hidehands()
if {ds}>20 and {ds}<40 then var_tween('fadeS',-300,100,5) end
if {dm}>20 and {dm}<40 or var_info then var_tween('fadeM',-300,100,5) end
if {dh}>3 and {dh}<9 or var_info then var_tween('fadeH',-300,100,5) end
end



-- ===============================
--              Chime
-- ===============================

function var_chimes(m,s)
   if m == 0 and s < 10 and ring == true then
--      wm_sfx('ns121')
      wm_vibrate(100,{dh})
      ring = false
    else
      ring = true
      return({dh})
   end
end

-- ===============================
--           Display text
-- ===============================

var_t = 1

function cc()
var_t = var_t%9 +1
if not play then wm_transition('Fade') end
end

function var_s_mode(a)
if play then hidehands() end
if a == 6 then
   var_w = {ddw0}
   return(var_week[(var_w + 1)%7 +1] .. "    " .. var_week[(var_w + 2)%7 +1] .. "    " .. var_week[(var_w +3)%7 +1])
 else
   if a == 9 then 
      return ((10000 - {ssc}) .. var_mode[9]) 
    else
      return (var_mode[a])
   end
end
end



-- ===============================
--     Extra dimmed night mode
-- ===============================

var_d = 0

function dim()
var_d = (var_d + 1)%2
wm_transition('Fade')
end



-- ===============================
--           Second hand
-- ===============================

function var_ns(msec)
if msec > 58500 then return (0) end
sec = msec * 1.025
if sec%1000 < 200 then
   return (math.floor (sec / 1000) * 6)
 else
   if sec % 1000 < 500 then
      return (math.floor (sec / 1000) * 6) + ((sec%1000)-200)/100
    else
      return ((sec * 6 / 1000))
   end
end
end


-- ===============================
--           Timer code
-- ===============================

var_timerOn = false
var_timer = 0

var_stopwOn = false
var_stopw = 0

var_autorepeat = false

var_hour1 = 0
var_hour2 = 0
var_minute1 = 0
var_minute2 = 0
var_second1 = 0
var_second2 = 0


function var_show(hand)
if var_timer==2 then
   var_newtime = oldtime - ({dh24}*3600 + {dm} *60 + {ds})
   if var_newtime < 1 then
      wm_vibrate(100,10)
      wm_sfx('ns121')
      if var_autorepeat ~= false then 
         if var_autorepeat == 2 then var_autorepeat = false end
         timer(2)
       else
         var_timer = 0
         if var_timerOn == true then var_second = 0 end
      end
    else
      if var_timerOn == true then
      var_second = (math.floor(var_newtime%60) * 6)
      var_ms_minute = (math.floor((var_newtime%3600)/60)) * 6
      var_ms_hour = (math.floor(var_newtime/3600) * 30) + (var_ms_minute / 12)
      end
   end
end

if var_stopwOn == true then
   var_second = {swrs}
   var_ms_minute = var_smin() * 6
   var_ms_hour = var_shr() * 30
end

if var_timerOn == false and var_stopwOn == false then
if {dsps} > 80 and {dsps} <160 then shake = -1.1 else shake = 0 end
   var_ms_minute = {dm} * 6 + shake
   var_ms_hour = {drh}
end
return(hand)
end


function timer(var_timer)
oldtime = {dh24}*3600 + {dm} *60 + {ds} + countdown
end



-- ===============================
--            Stopwatch
-- ===============================


function var_smin()
return var_zero((math.floor({swsst}/60000)%60))
end

function var_shr()
return var_zero((math.floor({swsst}/3600000)%3600))
end


function var_zero(n)
if n < 10 then
   return ("0" .. n)
 else
   return (n)
end
end


-- ===============================
--             Language
-- ===============================

var_langs = {"English", "Nederlands", "Deutsch", "Français", "По-русский"}


function var_language(nr)
--                           (English)
if nr == 1 then
   var_mode = {" ","Date", "Week", "Temp", "Min     Max", "Next 3 days", "Watch     Phone", "Heart rate", " to go", " steps"}
   var_week = {"Su", "Mo", "Tu", "We", "Th", "Fr", "Sa"}
   var_word = {"Set timer", "Start", "Stop", "Autorepeat", "ON", "OFF", "Colour profiles", "Reset face", "Night mode", "Multiple" .. string.char(10) .. "info", "Timer", "Stopwatch", "Languages", "Lock /" ..string.char(10) .. "Unlock (3x)" , "Chime"}
end

--                          (Nederlands)
if nr == 2 then
   var_mode = {" ","Datum", "Week", "Temp", "Min     Max", "Volgende dagen", "Horloge   Telefoon", "Hartslag", " te gaan", " stappen"}
   var_week = {"Zo", "Ma", "Di", "Wo", "Do", "Vr", "Za"}
   var_word = {"Stel timer in", "Start", "Stop", "Autorepeat", "AAN", "UIT", "Kleurprofielen", "Originele" .. string.char(10) .. "wijzerplaat", "Nachtmodus", "Diverse info", "Eierwekker", "Stopwatch", "Talen", "Lock /" ..string.char(10) .. "Unlock (3x)", "Uuralarm"}
end

--                             (Deutsch)
if nr == 3 then
   var_mode = {" ","Datum", "Woche", "Temp", "Min     Max", "Nächste Tage", "     Uhr   Telefon", "Herzschlag", " zu gehen", " Schritte"}
   var_week = {"So", "Mo", "Di", "Mi", "Do", "Fr", "Sa"}
   var_word = {"Timer einstellen", "Start", "Stopp", "Autorepeat", "AN", "AUS", "Farbeprofilen", "Reset" .. string.char(10) .. "Zifferblatt", "Nachtmodus", "Mehrere Infos", "Timer", "Stoppuhr", "Sprachen", "Sperren /" ..string.char(10) .. "entsperren (3x)", "Läuten"}
end

--                             (Français)
if nr == 4 then
   var_mode = {" ","Date", "Semaine", "Temp", "Min     Max", "Next days", "     Montre   Telephone", "Ritme cardiaque", " à franchir", " pas"}
   var_week = {"Di", "Lu", "Ma", "Me", "Je", "Ve", "Sa"}
   var_word = {"Réglez le minuteur", "Démarez", "Arrêtez", "Autorepeat", "ALLUMÉ", "ÉTEINT", "Profiles des" .. string.char(10) .. "couleurs", "Réinitialisez" .. string.char(10) .. "montre", "Mode de nuit", "Infos diverses", "Minuteur", "Chrono", "Langues", "Bloquer /" ..string.char(10) .. "débloquer (3x)", "Carillon"}
end

--                          (По-русский)
if nr == 5 then
   var_mode = {" ","Дата", "Неделя", "Темп", "Мин  Макс", "Volgende dagen", "     Часы   Телефон", "Сердцебиение", " до финиша", " шаги"}
   var_week = {"Во", "По", "Вт", "Ср", "Че", "Пя", "Су"}
   var_word = {"Установите таймер", "Старт", "Стоп", "Авто-повторение", "ВКЛ", "ВЫКЛ", "Цветовые" .. string.char(10) .. "профили", "Сброс" .. string.char(10) .. "циферблат", "Ночной модус", "Различное" .. string.char(10) .. "инфо", "Таймер  ", "      Секундомер", "Языки", "Запирать  " ..string.char(10) .. "отпирать (3x)", "Перезвон"}
end
wm_transition('Fade')
end

var_language(var_lang)


-- ===============================
--         Colour presets
-- ===============================

var_back = {"ffffff", "000000", "1f249d", "ff8735", "ffffff", "ffffff", "291644", "145432"}

var_face = {"1f249d", "a4a4a4", "ffffff", "4c35ff", "358341", "dc1103", "b2c4d5", "000000"}

var_hand = {"313d63", "a4a4a4", "ffffff", "000000", "000000", "000000", "b2c4d5",  "000000"}

var_sec = {"ab241b", "ff1500", "e21801", "007512", "7379ff", "1f249d", "ff1500", "cf1c49"}

function col()
var_c = var_c%8 +1
wm_transition('Fade')
end