script um ändern@hilfe

  • kann mir jemand bei dem script helfen.

    ich will das script


    Spoiler anzeigen
    [autoit]

    sleep (2000)
    WinActivate("SRO_Client")
    sleep (2000)
    While 1=1
    while PixelGetColor(430,48) = 0x000400
    Send("1")
    sleep (300)
    Send("2")
    sleep (300)
    Send("3")
    sleep (300)
    Send("4")
    sleep (300)
    Send("5")
    sleep (300)
    Send("6")
    sleep (300)
    Send("7")
    sleep (300)
    Send("8")
    sleep (300)
    Send("9")
    sleep (300)
    Send("0")
    sleep (300)
    WEnd
    WEnd

    [/autoit]

    mit diesen verbinden,oder zumindesten umändern, kann mir wer helfen danke

    Spoiler anzeigen
    [autoit]


    #cs ----------------------------------------------------------------------------

    AutoIt Version: 3.2.4.9
    Author: Wesloth & ManuIt

    #ce ----------------------------------------------------------------------------

    #include <GuiConstants.au3>
    #include <Misc.au3>
    HotKeySet ("{DEL}","exit1")
    Const $fenstername="SRO_Client"

    Func exit1()
    Exit
    EndFunc

    GUICreate("",300,185)
    $gui_button_los = GUICtrlCreateButton("Starten", 5,155,100,25)
    $gui_button_end = GUICtrlCreateButton("Beenden",195,155,100,25)
    $gui_check_1 = GUICtrlCreateCheckbox("Taste 1",10,10,55,20)
    $gui_check_2 = GUICtrlCreateCheckbox("Taste 2",10,30,55,20)
    $gui_check_3 = GUICtrlCreateCheckbox("Taste 3",10,50,55,20)
    $gui_check_4 = GUICtrlCreateCheckbox("Taste 4",10,70,55,20)
    $gui_check_5 = GUICtrlCreateCheckbox("Taste 5",10,90,55,20)
    $gui_check_6 = GUICtrlCreateCheckbox("Taste 6",150,10,55,20)
    $gui_check_7 = GUICtrlCreateCheckbox("Taste 7",150,30,55,20)
    $gui_check_8 = GUICtrlCreateCheckbox("Taste 8",150,50,55,20)
    $gui_check_9 = GUICtrlCreateCheckbox("Taste 9",150,70,55,20)
    $gui_check_0 = GUICtrlCreateCheckbox("Taste 0",150,90,55,20)
    $gui_timr_1 = GUICtrlCreateInput("", 80,10,50,20,$ES_NUMBER)
    $gui_timr_2 = GUICtrlCreateInput("", 80,30,50,20,$ES_NUMBER)
    $gui_timr_3 = GUICtrlCreateInput("", 80,50,50,20,$ES_NUMBER)
    $gui_timr_4 = GUICtrlCreateInput("", 80,70,50,20,$ES_NUMBER)
    $gui_timr_5 = GUICtrlCreateInput("", 80,90,50,20,$ES_NUMBER)
    $gui_timr_6 = GUICtrlCreateInput("",220,10,50,20,$ES_NUMBER)
    $gui_timr_7 = GUICtrlCreateInput("",220,30,50,20,$ES_NUMBER)
    $gui_timr_8 = GUICtrlCreateInput("",220,50,50,20,$ES_NUMBER)
    $gui_timr_9 = GUICtrlCreateInput("",220,70,50,20,$ES_NUMBER)
    $gui_timr_0 = GUICtrlCreateInput("",220,90,50,20,$ES_NUMBER)

    GUISetState(@SW_SHOW)

    While 1
    $msg = GUIGetMsg()
    Select
    Case ( $msg = $Gui_Event_Close ) Or ( $msg = $gui_button_end )
    Exit
    Case $msg = $gui_button_los
    Bot()
    EndSelect
    Sleep(10)
    WEnd

    func Bot()
    GUISetState(@SW_HIDE)
    WinActivate($fenstername)
    WinWaitActive($fenstername)
    Local $ac[100],$at[100],$astamp[100]
    $ac[0] = GUICtrlRead($gui_check_0)
    $ac[1] = GUICtrlRead($gui_check_1)
    $ac[2] = GUICtrlRead($gui_check_2)
    $ac[3] = GUICtrlRead($gui_check_3)
    $ac[4] = GUICtrlRead($gui_check_4)
    $ac[5] = GUICtrlRead($gui_check_5)
    $ac[6] = GUICtrlRead($gui_check_6)
    $ac[7] = GUICtrlRead($gui_check_7)
    $ac[8] = GUICtrlRead($gui_check_8)
    $ac[9] = GUICtrlRead($gui_check_9)
    If $ac[0]=1 Then
    $at[0]=GUICtrlRead($gui_timr_0)
    $astamp[0] = TimerInit()
    EndIf
    If $ac[1]=1 Then
    $at[1]=GUICtrlRead($gui_timr_1)
    $astamp[1] = TimerInit()
    EndIf
    If $ac[2]=1 Then
    $at[2]=GUICtrlRead($gui_timr_2)
    $astamp[2] = TimerInit()
    EndIf
    If $ac[3]=1 Then
    $at[3]=GUICtrlRead($gui_timr_3)
    $astamp[3] = TimerInit()
    EndIf
    If $ac[4]=1 Then
    $at[4]=GUICtrlRead($gui_timr_4)
    $astamp[4] = TimerInit()
    EndIf
    If $ac[5]=1 Then
    $at[5]=GUICtrlRead($gui_timr_5)
    $astamp[5] = TimerInit()
    EndIf
    If $ac[6]=1 Then
    $at[6]=GUICtrlRead($gui_timr_6)
    $astamp[6] = TimerInit()
    EndIf
    If $ac[7]=1 Then
    $at[7]=GUICtrlRead($gui_timr_7)
    $astamp[7] = TimerInit()
    EndIf
    If $ac[8]=1 Then
    $at[8]=GUICtrlRead($gui_timr_8)
    $astamp[8] = TimerInit()
    EndIf
    If $ac[9]=1 Then
    $at[9]=GUICtrlRead($gui_timr_9)
    $astamp[9] = TimerInit()
    EndIf
    While 1
    $Mactive = PixelGetColor (560,46)
    While $Mactive = "0xFF3131"
    Do
    If ($ac[0]=1) And (TimerDiff($ac[0]) > $at[0]) Then
    Send("0")
    $astamp[0] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[1]=1) And (TimerDiff($ac[1]) > $at[1]) Then
    Send("1")
    $astamp[1] = TimerInit()
    EndIf
    If ($ac[2]=1) And (TimerDiff($ac[2]) > $at[2]) Then
    Send("2")
    $astamp[2] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[3]=1) And (TimerDiff($ac[3]) > $at[3]) Then
    Send("3")
    $astamp[3] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[4]=1) And (TimerDiff($ac[4]) > $at[4]) Then
    Send("4")
    $astamp[4] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[5]=1) And (TimerDiff($ac[5]) > $at[5]) Then
    Send("5")
    $astamp[5] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[6]=1) And (TimerDiff($ac[6]) > $at[6]) Then
    Send("6")
    $astamp[6] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[7]=1) And (TimerDiff($ac[7]) > $at[7]) Then
    Send("7")
    $astamp[7] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[8]=1) And (TimerDiff($ac[8]) > $at[8]) Then
    Send("8")
    $astamp[8] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[9]=1) And (TimerDiff($ac[9]) > $at[9]) Then
    Send("9")
    $astamp[9] = TimerInit()
    EndIf
    Until $Mactive <> "0xFF3131";not red
    WEnd
    WEnd
    GUISetState(@SW_SHOW)
    WinActivate("LazyBot 2.0")
    WinWaitActive("LazyBot 2.0")
    EndFunc

    [/autoit]

    also ich will das script von oben in das untere rein haben.
    ka was ich raus nehmen miuß


    ich will genau so ein fenster wie im 2script
    wo ich aus suchen kann welche tasten er drückt
    kann mir jemand helfen

    Edit GtaSpider: [15.11.2007 20:31]
    Spoiler und AutoIt Tags eingefügt
    Aufruf:

    Code
    [SPOILER][AUTOIT]
    AutoIt Code
    [/AUTOIT][/SPOILER]
  • 1. Code bitte immer in {Spoiler} und {AutoIt} - Tags setzen
    Wieso was rausnehmen?
    Du willst das scheinbar immer wieder Tasten gedrückt werden. Das macht der Bot bereits. Das einzige was anders zu sein scheint ist die Farbe und die musst du in Zeile

    Spoiler anzeigen
    [autoit]

    GUICreate("LazyBot 2.0",300,185)
    $gui_button_los = GUICtrlCreateButton("Starten", 5,155,100,25)
    $gui_button_end = GUICtrlCreateButton("Beenden",195,155,100,25)
    $gui_check_1 = GUICtrlCreateCheckbox("Taste 1",10,10,55,20)
    $gui_check_2 = GUICtrlCreateCheckbox("Taste 2",10,30,55,20)
    $gui_check_3 = GUICtrlCreateCheckbox("Taste 3",10,50,55,20)
    $gui_check_4 = GUICtrlCreateCheckbox("Taste 4",10,70,55,20)
    $gui_check_5 = GUICtrlCreateCheckbox("Taste 5",10,90,55,20)
    $gui_check_6 = GUICtrlCreateCheckbox("Taste 6",150,10,55,20)
    $gui_check_7 = GUICtrlCreateCheckbox("Taste 7",150,30,55,20)
    $gui_check_8 = GUICtrlCreateCheckbox("Taste 8",150,50,55,20)
    $gui_check_9 = GUICtrlCreateCheckbox("Taste 9",150,70,55,20)
    $gui_check_0 = GUICtrlCreateCheckbox("Taste 0",150,90,55,20)
    $gui_timr_1 = GUICtrlCreateInput("", 80,10,50,20,$ES_NUMBER)
    $gui_timr_2 = GUICtrlCreateInput("", 80,30,50,20,$ES_NUMBER)
    $gui_timr_3 = GUICtrlCreateInput("", 80,50,50,20,$ES_NUMBER)
    $gui_timr_4 = GUICtrlCreateInput("", 80,70,50,20,$ES_NUMBER)
    $gui_timr_5 = GUICtrlCreateInput("", 80,90,50,20,$ES_NUMBER)
    $gui_timr_6 = GUICtrlCreateInput("",220,10,50,20,$ES_NUMBER)
    $gui_timr_7 = GUICtrlCreateInput("",220,30,50,20,$ES_NUMBER)
    $gui_timr_8 = GUICtrlCreateInput("",220,50,50,20,$ES_NUMBER)
    $gui_timr_9 = GUICtrlCreateInput("",220,70,50,20,$ES_NUMBER)
    $gui_timr_0 = GUICtrlCreateInput("",220,90,50,20,$ES_NUMBER)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case ( $msg = $Gui_Event_Close ) Or ( $msg = $gui_button_end )
    Exit
    Case $msg = $gui_button_los
    Bot()
    EndSelect
    Sleep(10)
    WEnd

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

    func Bot()
    GUISetState(@SW_HIDE)
    WinActivate($fenstername)
    WinWaitActive($fenstername)
    Local $ac[100],$at[100],$astamp[100]
    $ac[0] = GUICtrlRead($gui_check_0)
    $ac[1] = GUICtrlRead($gui_check_1)
    $ac[2] = GUICtrlRead($gui_check_2)
    $ac[3] = GUICtrlRead($gui_check_3)
    $ac[4] = GUICtrlRead($gui_check_4)
    $ac[5] = GUICtrlRead($gui_check_5)
    $ac[6] = GUICtrlRead($gui_check_6)
    $ac[7] = GUICtrlRead($gui_check_7)
    $ac[8] = GUICtrlRead($gui_check_cool
    $ac[9] = GUICtrlRead($gui_check_9)
    If $ac[0]=1 Then
    $at[0]=GUICtrlRead($gui_timr_0)
    $astamp[0] = TimerInit()
    EndIf
    If $ac[1]=1 Then
    $at[1]=GUICtrlRead($gui_timr_1)
    $astamp[1] = TimerInit()
    EndIf
    If $ac[2]=1 Then
    $at[2]=GUICtrlRead($gui_timr_2)
    $astamp[2] = TimerInit()
    EndIf
    If $ac[3]=1 Then
    $at[3]=GUICtrlRead($gui_timr_3)
    $astamp[3] = TimerInit()
    EndIf
    If $ac[4]=1 Then
    $at[4]=GUICtrlRead($gui_timr_4)
    $astamp[4] = TimerInit()
    EndIf
    If $ac[5]=1 Then
    $at[5]=GUICtrlRead($gui_timr_5)
    $astamp[5] = TimerInit()
    EndIf
    If $ac[6]=1 Then
    $at[6]=GUICtrlRead($gui_timr_6)
    $astamp[6] = TimerInit()
    EndIf
    If $ac[7]=1 Then
    $at[7]=GUICtrlRead($gui_timr_7)
    $astamp[7] = TimerInit()
    EndIf
    If $ac[8]=1 Then
    $at[8]=GUICtrlRead($gui_timr_cool
    $astamp[8] = TimerInit()
    EndIf
    If $ac[9]=1 Then
    $at[9]=GUICtrlRead($gui_timr_9)
    $astamp[9] = TimerInit()
    EndIf
    While 1
    $Mactive = PixelGetColor (560,46)
    While $Mactive = "0xFF3131"
    Do
    If ($ac[0]=1) And (TimerDiff($ac[0]) > $at[0]) Then
    Send("0")
    $astamp[0] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[1]=1) And (TimerDiff($ac[1]) > $at[1]) Then
    Send("1")
    $astamp[1] = TimerInit()
    EndIf
    If ($ac[2]=1) And (TimerDiff($ac[2]) > $at[2]) Then
    Send("2")
    $astamp[2] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[3]=1) And (TimerDiff($ac[3]) > $at[3]) Then
    Send("3")
    $astamp[3] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[4]=1) And (TimerDiff($ac[4]) > $at[4]) Then
    Send("4")
    $astamp[4] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[5]=1) And (TimerDiff($ac[5]) > $at[5]) Then
    Send("5")
    $astamp[5] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[6]=1) And (TimerDiff($ac[6]) > $at[6]) Then
    Send("6")
    $astamp[6] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[7]=1) And (TimerDiff($ac[7]) > $at[7]) Then
    Send("7")
    $astamp[7] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[8]=1) And (TimerDiff($ac[8]) > $at[8]) Then
    Send("8")
    $astamp[8] = TimerInit()
    EndIf
    $Mactive = PixelGetColor (560,46)
    If ($ac[9]=1) And (TimerDiff($ac[9]) > $at[9]) Then
    Send("9")
    $astamp[9] = TimerInit()
    EndIf
    Until $Mactive <> "0xFF3131";not red
    WEnd
    WEnd
    GUISetState(@SW_SHOW)
    WinActivate("LazyBot 2.0")
    WinWaitActive("LazyBot 2.0")
    EndFunc

    [/autoit]

    edit: Pff grad Unsinn geschrieben sry.
    In Zeile 94 musst du deine Koordinaten ändern.
    Und in der Zeile darunter gegebenenfalls die Farbe.

    2 Mal editiert, zuletzt von Wesloth (15. November 2007 um 18:46)