Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 07/09/2013 in all areas

  1. JohnOne

    Volume Leveler?

    That's a lovely story. Please keep us updated with your progress.
    1 point
  2. BTW: Could you please give your threads a meaningful title? Everyone on this forum is searching for help The better you describe your problem the more help you will get.
    1 point
  3. water

    Need help please

    BTW: Could you please give your threads a meaningful title? Everyone on this forum is searching for help The better you describe your problem the more help you will get.
    1 point
  4. Looks like we came up with the same basic idea for this. #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #region ### START Koda GUI section ### Form= Global $sendkeysCBVar, $JiggleMouseCBVar $Form1 = GUICreate("Form1", 143, 178, 192, 124) $JiggleMouseCB = GUICtrlCreateCheckbox("Jiggle Mouse", 24, 48, 97, 17) $SendKeysCB = GUICtrlCreateCheckbox("SendKeys", 24, 72, 97, 17) $RunBT = GUICtrlCreateButton("RunBT", 32, 112, 75, 25) GUISetState(@SW_SHOW) #endregion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $RunBT If GUICtrlRead($JiggleMouseCB) = $GUI_CHECKED Then Adlibregister("mouseJigllo", 10000) ; move the mouse every 10 seconds Else AdlibUnRegister("mouseJigllo") ; stop moving the mouse EndIf If GUICtrlRead($SendKeysCB) = $GUI_CHECKED Then SendKeys() EndIf EndSwitch WEnd Func mouseJigllo() MouseMove(50, 50, 100) MouseMove(80, 60, 100) EndFunc ;==>mouseJigllo Func SendKeys() WinActivate("LDEP") WinWait("", "", 10) Send("!f") WinWait("", "", 10) Send("p") WinWait("", "", 10) EndFunc ;==>SendKeys
    1 point
  5. ControlSetText() is no slouch either.
    1 point
×
×
  • Create New...