Double variabele

[mark309]

Hello,

Trying to make an autoit script that starts applications and benchmarks them, there is only one thing i am stuck on (maybe because its monday )

I am trying to make a function that times how long an application is running: for instance msword

$appname=msword
Start_timer($appname)

Func start_timer()
$msword=timerinit() <-- here is the problem
EndFunc

As you see, I would like the timer to start the count in $msword but I really cant figure out how to make it variable

Hope one of you knows a good trick!

Thanks, Mark

[goldenix]

Maybe this helps

$count = 1
While 1
;~  sleep(1000)
    If $appname = Running Then  $count =+ 1 for example adds +1 each second the proces is running
    MsgBox(0,'',$count)
WEnd

Edited March 3, 2008 by goldenix

[FreeFry]

Using mark's original idea is the best way to go, as it's accurate to the ms.

$appname=”msword”
Start_timer($appname)

Func start_timer()
$msword=timerinit() <-- here is the problem
EndFunc

You almost had it right there. (but if you're gonna run and test several programs you might want to have a look at arrays):

#include <Array.au3>
Dim $AppArray[3][3]; Contains 3 programs, 3 elements about each: its Path on the harddrive, its timer, and its process id(as returned when started)

; Programs: (change these to whatever apps you wanna test)
$AppArray[0][0] = @WindowsDir & "\Notepad.exe"; Program #1
$AppArray[1][0] = @WindowsDir & "\Notepad.exe"; Program #2
$AppArray[2][0] = @WindowsDir & "\Notepad.exe"; Program #3

Dim $ProgramCount = 0

For $i = 0 To UBound($AppArray)-1
    _StartTimer($AppArray[$i][0], $AppArray[$i][1], $AppArray[$i][2])
Next

While $ProgramCount
    
    For $i = 0 To UBound($AppArray)-1
        If Not ProcessExists($AppArray[$i][2]) And $AppArray[$i][2] <> 0 Then
            $AppArray[$i][2] = 0
            $AppArray[$i][1] = Round(TimerDiff($AppArray[$i][1])/1000, 3); Returns result in milliseconds with 3 decimals
            $ProgramCount -= 1
;~          MsgBox(0, StringTrimRight($AppArray[$i][0], StringInStr($AppArray[$i][0], "\", 0, -1)) & " closed", "Time Run: " & $AppArray[$i][1] & " ms")
        EndIf
    Next
    
WEnd

_ArrayDisplay($AppArray); Displays our result

Func _StartTimer($s_AppPath, ByRef $i_AppTimer, ByRef $i_AppPID)
    
    $i_AppPID = Run($s_AppPath)
    $i_AppTimer = TimerInit()
    $ProgramCount += 1
    
EndFunc

I took the liberty, I hope you understand it, or perhaps might even learn something from it.

Edit:

Whops, forgot to include the function.

Edited March 3, 2008 by FreeFry

[mark309]

Using mark's original idea is the best way to go, as it's accurate to the ms.

Ill definently look into arrays!

The final result wil be someting like this:

timer start(total)
timer_start(msword)
word_start()
word_typeletter()
timer_stop(msword)
timer_stop(total)

So ill be busy for a while, thanks for youre help so far!

[FreeFry]

Good Luck.