[SOLVED] Add progressive number?

[johnmcloud]

Hi,

I have searching in the forum but i don't have find nothing. How to add a progressive number to a ConsoleWrite? Example:

Func Test()
Local $Position = MouseGetPos()
While
$Final = MouseGetPos()
If _IsPressed("01") Then
ConsoleWrite("X Pos: " & $Final[0] & @CRLF & "Y Pos: " & $Final[1] & @CRLF)
EndIf
Sleep(100)
WEnd
EndFunc ;==>Test

The output is:

X Pos: 488
Y Pos: 345
X Pos: 674
Y Pos: 9
etc.

I'd like to add a progressive number, like:

X Pos_001: 488
Y Pos_001: 345
X Pos_002: 674
Y Pos_002: 9
etc.

Hope everything is clear, thanks

Edited July 9, 2012 by johnmcloud

[Melba23]

johnmcloud,

StringFormat is your friend here:

#include <Misc.au3>

Global $hDLL = DllOpen("user32.dll")

HotKeySet("{ESC}", "On_Exit")

Test()

Func Test()

    ;Local $Position = MouseGetPos()
    Static $iCount = 0
    While 1
        $Final = MouseGetPos()
        If _IsPressed("01", $hDLL) Then
            $iCount += 1
            ConsoleWrite("X Pos_" & StringFormat("%03i", $iCount) & ": " & $Final[0] & @CRLF & _
                         "Y Pos_" & StringFormat("%03i", $iCount) & ": " & $Final[1] & @CRLF & @CRLF)
        EndIf
        Sleep(100)
    WEnd
EndFunc   ;==>Test

Func On_Exit()
    DllClose($hDLL)
    Exit
EndFunc   ;==>On_Exit

All clear?

M23

[johnmcloud]

You are always clear, thanks Melba