Jump to content

Small Script problem


DarkHo
 Share

Recommended Posts

Hi :D i have a small problem. The Script sends 1 to 9 but i want to enter a send 0 but send 0 Should be sent every 50sec...

Hmm i have no idea to add that one :S

Case $Start
            $Keys = ""

            If GUICtrlRead($Checkbox1) = 1 Then $Keys &= "1|"
            If GUICtrlRead($Checkbox2) = 1 Then $Keys &= "2|"
            If GUICtrlRead($Checkbox3) = 1 Then $Keys &= "3|"
            If GUICtrlRead($Checkbox4) = 1 Then $Keys &= "4|"
            If GUICtrlRead($Checkbox5) = 1 Then $Keys &= "5|"
            If GUICtrlRead($Checkbox6) = 1 Then $Keys &= "6|"
            If GUICtrlRead($Checkbox7) = 1 Then $Keys &= "7|"
            If GUICtrlRead($Checkbox8) = 1 Then $Keys &= "8|"
            If GUICtrlRead($Checkbox9) = 1 Then $Keys &= "9|"
                        If GUICtrlRead($Checkbox0) = 1 Then $Keys &= "0|"
            $KeysEx = StringTrimRight($Keys, 1)
            $KeysSplit = StringSplit($KeysEx, "|")

            Sleep(2000) ; 2 Sec Sleep

            If $Feed Then
                $Feed = False
            Else
                $Feed = True
            EndIf

Func _Feed()
    $Feed = Not $Feed

    If $Feed Then
        For $i = 1 To $KeysSplit[0]
            Send($KeysSplit[$i])
            Sleep(300000) ; 5 Min
        Next
    EndIf
EndFunc
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...