state = Start
st = 0
time = 0
Array := Object()
Gui Add, Button, gRestart, Restart
Gui Add, Button, gStart, Start
Gui Add, Button, gadd, add
Gui Add, Button, gStop, Pause
Gui, Add, Text,vVar w30,0
Gui, Add, Text,vVax w30,none
Gui Show, w300, Press It!
data = ""

bumpclock:
    time+=1
    GuiControl,,Var,%time%
Return


add:
	Array.Insert(time)
    data =
    for index, element in Array ; Recommended approach in most cases.
    {
        data =  % data . element . " "
    }
    GuiControl,,Vax,%data%
Return

Restart:
    WinGetActiveTitle, MyWin
    FormatTime, TimeString,, HH-mm-s-ddMMyyyy
    FileAppend, "",   %A_ScriptDir%\%TimeString%.txt
    FileAppend, `n------, %A_ScriptDir%\%TimeString%.txt
    for index, element in Array ; Recommended approach in most cases.
    {
        FileAppend,`n, %A_ScriptDir%\%TimeString%.txt
        FileAppend,% index . " : ", %A_ScriptDir%\%TimeString%.txt
        FileAppend, % element, %A_ScriptDir%\%TimeString%.txt
    }
    FileAppend, `n------, %A_ScriptDir%\%TimeString%.txt
    Array := Object()
    time = 0
    SetTimer, bumpclock, off
	state = Stop
    GuiControl,,Var,%time%
    GuiControl,,Vax,%data%
Return

Start:
    st = 0
    SetTimer, bumpclock, 1000
	state = Start
    GuiControl,,Var,%time%
Return


Stop:

    if (st = 0) {
        SetTimer, bumpclock, off
        st = 1
        GuiControl,,Var,%time%
    }
    else {
        SetTimer, bumpclock, 1000
        st = 0
        GuiControl,,Var,%time%
    }

Return