need help with showing a counter

[bassben]

i am new to Autoit, but have been building a script to "open" a file "Save" the file "Close" it then move on to the next one.

i am using the Calculator at the moment to give me a running number but its not that great. any ideas of a nice display thing i can use to show the counter number on the loop.

also i get it to tun a stop watch so i can keep an eye on the time it has been running.

expandcollapse popup

; Script Function:
;   Auto open save and close the show count number in Calc
;
Opt("WinTitleMatchMode", 2) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase

Run("C:\Program Files\FreeStopwatch\FreeStopwatch.exe")
WinWaitActive("Free Stopwatch")

Send("{ENTER}")

Run("calc.exe")

WinWaitActive("Calculator")

Send("{ALTDOWN}")
Send("{TAB}")
Send("{TAB}")
SEND("{ALTUP}")

WinWaitActive("Search Results")
; Set the counter
Local $count = 0

; Execute the loop "until" the counter is greater than 5
Do

    ; Run the File
    Send("{ENTER}")
    ; Sleep(800)
    WinWaitActive("Paint")
    
    Send("{CTRLDOWN}")
    Send("{s}")
    Send("{CTRLUP}")
    
    Sleep(1)

    Send("{ALTDOWN}")
    SEND("{F4}")
    Send("{ALTUP}")
    
    WinWaitActive("Search Results")
    
    Send("{ALTDOWN}")
    Send("{TAB}")
    SEND("{ALTUP}")
    
    WinWaitActive("Calculator")
    
    Send("{+}1=")
    
    Send("{ALTDOWN}")
    Send("{TAB}")
    SEND("{ALTUP}")
    
    WinWaitActive("Search Results")

    Send("{DOWN}")
    
    ; Increase the count by one
    $count = $count + 1
    

Until $count > 199

Send("{ALTDOWN}")
Send("{TAB}")
Send("{TAB}")
SEND("{ALTUP}")

Send("{ENTER}")

; MsgBox(0, "Ben's Auto Paint", "DONE 100 OF THEM!")
MsgBox(0, "Ben's Auto Paint", "I Have Done: " & $count)
; Finished!

Edited May 28, 2013 by bassben

[BrewManNH]

Here's a way of creating a timer inside your script, if you're going to use a GUI, which is MUCH better than using the calculator to do it.

 

#include <GUIConstantsEx.au3>
$hGUI = GUICreate("timer")
$cLabel = GUICtrlCreateLabel("00:00", 10, 10, 150, 100)
GUICtrlSetFont(-1, 35)
GUISetState()
$Timer = TimerInit()
Global $Count = 0
While GUIGetMsg() <> $GUI_EVENT_CLOSE
    If TimerDiff($Timer) >= 1000 Then
        $Minutes = Int($Count/60)
        $Seconds = Int((($Count/60) - $Minutes) * 60)
        GUICtrlSetData($cLabel, StringFormat("%02u:%02u", $Minutes,$Seconds))
        $Count += 1
        $Timer = TimerInit()
    EndIf
    Sleep(10)
WEnd

As to the rest of your code, I have no idea what you're doing in it, but I'm sure there's a lot better way of doing it without using Send.

[bassben]

the timer looks good.

what i am trying to do is reduce the size of around 30,000 photos i have, and i have found that if you open them in paint, and then save it reduces the size buy around 50%. so trying to get some much needed space back. 

is there a way of making the GUI a free floating window with the counter (Loop counter) in it as well?

sorry if these seam like really thick questions but i have no experience with scripting. 

[BrewManNH]

Not sure what you mean by free floating window.

Adding the loop counter to the GUI would just require another label and another GUICtrlSetData pointing to that label.

[water]

To reduce the size of photos I would use IrfanView. The resulting photos have better quality, it runs faster and supports batch processing.