Mouselogger, how to optimize?

[Wb-FreeKill]

Ive made this small program, witch is loggin the mouse position, and then moves it, by looking at the log file..

It quite slow, can i optimize it in any way?

OBS: Run the program again, if you try more than once, or else the mouse.ini wont be deleted!

MouseLog.exe

mouselog.au3

mouse.ini

PLACE THE MOUSE.INI in C:\

Edited February 17, 2005 by Wb-FreeKill

[zcoacoaz]

i don't know if it will help but you can try looking at my remote mouse program

edit: added attachments

au3xtra.dll

Edited February 17, 2005 by Xenogis

[Wb-FreeKill]

i don't know if it will help but you can try looking at my remote mouse program

edit: added attachments

<{POST_SNAPBACK}>

were do i have to put the dll file?

[zcoacoaz]

(i posted this a little late, i bet you already figured it out)

in the same folder as the 2 autoit scripts

[Wb-FreeKill]

At line 118, it says that the variable hasen't been declared

$ConnectedSocket

[zcoacoaz]

thats because it didnt work right when you did it, just look at the source of the files. because i dont like explaining au3xtra.dll or using it

edit: i dont think this post makes sence

Edited February 23, 2005 by Xenogis

[Guest Guidosoft]

i don't know if it will help but you can try looking at my remote mouse program

edit: added attachments

<{POST_SNAPBACK}>

Cool. That's pretty neat. I wish I knew how to use the power of Au3xtra.dll.

Can you help me?

[upnorth]

optimize

Ok.

expandcollapse popup

#include <GUIConstants.au3>
Opt ("GUIOnEventMode", 1)

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


Global $ini_name = @HomeDrive & "\mouse.ini", $start , $count

GUICreate("Mouse move GUI", 300, 200)
GUISetOnEvent($GUI_EVENT_CLOSE, "quit")

$record = GUICtrlCreateLabel("Record", 50, 10, 120, 20)
GUICtrlSetFont($record, 14)
$tart_record = GUICtrlCreateButton("Start", 43, 50, 70, 25)
$top_record = GUICtrlCreateButton("Stop", 43, 80, 70, 25)
$label = GUICtrlCreateLabel(IniRead($ini_name, "mouse", "count", 0), 43, 120, 120, 20)
GUICtrlCreateGroup("", 20, 30, 120, 150)

$Play = GUICtrlCreateLabel("Play", 200, 10, 120, 20)
GUICtrlSetFont($Play, 14)
$tart_play = GUICtrlCreateButton("Start", 185, 50, 70, 25)
$top_play = GUICtrlCreateButton("Stop", 185, 80, 70, 25);lol
GUICtrlCreateGroup("", 160, 30, 120, 150)

GUICtrlSetOnEvent($tart_record, "_msgs")
GUICtrlSetOnEvent($top_record, "_msgs")
GUICtrlSetOnEvent($tart_play, "_msgs")
GUISetState()

While 1
   If $start = 1 Then
      $count = $count + 1
      $pos = MouseGetPos()
      IniWrite($ini_name, "mouse", "posx" & $count, $pos[0])
      IniWrite($ini_name, "mouse", "posy" & $count, $pos[1])
      GUICtrlSetData($label, $count)
  Else
      Sleep(10)
  EndIf
WEnd



Func _msgs()
   $msg = @GUI_CtrlId
   
   Select
      Case $msg = $tart_record
         $start = 1
         $count = 0
      Case $msg = $top_record
         $start = 0
         IniWrite($ini_name, "mouse", "count", $count);inportant if you dont delete the log...
      Case $msg = $tart_play
         For $i = 1 To IniRead($ini_name, "mouse", "count", 2)
            MouseMove( IniRead($ini_name, "mouse", "posx" & $i, ""), IniRead($ini_name, "mouse", "posy" & $i, ""), 0)
         Next
   EndSelect
EndFunc  ;==>_msgs

Func quit()
  ;FileDelete($ini_name)
   Exit
EndFunc  ;==>quit