µTorrent script

[fastnick1oo]

v0.1:

#NoTrayIcon

$hWin = WinGetHandle("[TITLE:µTorrent 1.8.1]")
If $hWin == "" Then
    MsgBox(16, Default, "Couldn't find µTorrent window.", 5)
    Exit
EndIf
$hControl = ControlGetHandle($hWin, "", "[CLASS:SysListView32; INSTANCE:2]")
ControlClick($hWin, "", $hControl, "left", 1, 5, 5); all
$hControl = ControlGetHandle($hWin, "", "[CLASS:SysListView32; INSTANCE:3]")

Do
    $shutDown = 1
    $count = ControlListView($hWin, "", $hControl, "GetItemCount")
    If $count == 0 Then
        MsgBox(48, Default, "List is empty.", 5)
        Exit
    EndIf
    For $i = 0 To $count-1
        If Number(ControlListView($hWin, "", $hControl, "GetText", $i, 3)) < 100 Then $shutDown = 0; procent
        If Number(ControlListView($hWin, "", $hControl, "GetText", $i, 11)) < 1.5 Then $shutDown = 0; ratio
    Next
    If Not $shutDown Then Sleep(Random(1, 2, 1)*1000)
Until $shutDown
If Not @Compiled Then
    MsgBox(0, Default, "Cya!", 5)
    Exit
EndIf

$PID = WinGetProcess($hWin)
Do 
    ProcessClose($PID)
    Sleep(250)
Until Not ProcessExists($PID)
Shutdown(1)

Now... let's get some sleep, shall we? ; )

edit: I've added more user-friendly version as attachment.

_Torrent_script_v0.2.au3

Edited January 15, 2009 by fastnick1oo

[Manko]

Nice idea!

'Tis what scripting is all about.

But, uTorrent comes with this functionality, doesn't it?

So you might not get many comments.

Keep scripting!

/Manko

[iHonda]

mm tell us about it?