mouseclickdrag beschleunigen

  • moin ;)

    also ich wollte mir nen kleines lustiges (zugegebenermaßen sinnfreies) "malprogramm" basteln - welches die maus in mspaint steuert;)

    jetzt ist mir allerdings aufgefallen dass die mouseclickdrag funktion ziemlich langsam ist ;) - er zeichnet nen strich, wartet ~1 sekunde, zeichnet den nächsten etc

    kann man das irgendwie beschleunigen? ^^


    hier mal das script:

    [autoit]


    $startx = 550
    $starty = 770
    $speed = 0
    $count = 10
    $distance = 70

    [/autoit][autoit][/autoit][autoit]

    hotkeyset("1", "blubb")
    HotKeySet("{ESC}", "end")

    [/autoit][autoit][/autoit][autoit]

    Func end()
    Exit
    EndFunc

    [/autoit][autoit][/autoit][autoit]

    ;mousemove($startx, $starty, $speed)
    while 1
    sleep(100)
    WEnd

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    func baum($startx, $starty, $speed, $distance, $count)

    $newdist = ($distance / 2)
    $linksx = $startx - $newdist
    $rechtsx = $startx + $newdist
    $mittey = $starty - $distance
    $obeny = $mittey - $newdist

    [/autoit][autoit][/autoit][autoit]

    if ($count <> 0) Then
    MouseClickDrag("left", $startx, $starty, $startx, $mittey, $speed) ;stamm
    MouseClickDrag("left", $startx, $mittey, $linksx, $obeny, $speed) ;ast links
    baum($linksx, $obeny, $speed, $newdist, ($count - 1))
    MouseClickDrag("left", $startx, $mittey, $rechtsx, $obeny, $speed) ;ast rechts
    baum($rechtsx, $obeny, $speed, $newdist, ($count - 1))
    ;mouseclickdrag("button", x1, y1, x2, y3, speed)
    EndIf

    [/autoit][autoit][/autoit][autoit]

    EndFunc

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    func blubb()

    [/autoit][autoit][/autoit][autoit]

    baum($startx, $starty, $speed, $distance, $count)

    EndFunc

    [/autoit]

    ps: irgendwie konnte man doch auch direkt autoit-code posten ^^ also mit farb-markierung - kann mir jemand sagen wie des geht? ^^

    Einmal editiert, zuletzt von sataan1337 (3. Dezember 2008 um 18:15)