1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Speedlink

Beiträge von Speedlink

  • (Kleiner Bot) Checkbox Problem.

    • Speedlink
    • 2. April 2015 um 15:49

    Servus Leute,
    Ich bin neu hier und hoffe mir kann geholfen werden :D

    Nach langer zeit beschäftige ich mich mal wieder mit Autoit.
    Und zwar habe ich folgende Frage/Problem.

    Ich arbeite derzeit mit imagesearch an einem Bot für stronghold Kindoms
    (Farmbot)

    Das funktioniert auch soweit aber eben nur mit Obst.
    Jetzt habe ich mir eine kleine gui geschrieben und wollte dies nun so regeln.
    Das ich aussuchen kann was ich Farmen möchte.

    Sprich ist Checkbox 1 Obst ausgewählt und ich drücke start farmt er Apfel.
    Ist Checkbox 2 ausgewählt Holz etc...

    Nun weiß ich aber nich wie ich das ganze so richtig realisieren soll.
    Sprich ich benötige ein Denkanstoß.


    EDIT BugFix: CLOSED -- Bot!!

    C
    #include <ImageSearch.au3>
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    
    
    $Form1 = GUICreate("Form1", 625, 443, 204, 174)
    $Group1 = GUICtrlCreateGroup("FarmBot", 16, 8, 289, 425)
    $Pic1 = GUICtrlCreatePic("C:ImageSearch.au3 + SourceCode\apple.jpg", 32, 32, 41, 41, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    $Checkbox1 = GUICtrlCreateCheckbox("Apfel Bot", 88, 40, 65, 25)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group2 = GUICtrlCreateGroup("TradeBot", 312, 8, 297, 361)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Button1 = GUICtrlCreateButton("Pause Bot", 480, 384, 129, 41, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Start Bot", 312, 384, 129, 41, $WS_GROUP)
    GUISetState(@SW_SHOW)
    
    
    
    
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    
    
    EndSwitch
    WEnd
    $x = 0
    $y = 0
    
    
    $xd = @DesktopHeight
    $yd = @DesktopWidth
    
    
    ;MsgBox(0,"", $xd & "@" & $yd)
    
    
    HotKeySet("{ESC}", "Close")
    HotKeySet("{F1}", "Start")
    HotKeySet("{F2}", "Pause")
    _Startup()
    
    
    
    
    Func _Startup()
       ToolTip("Startup",0,0)
       While 1
    	  Sleep(100)
    	  WEnd
       EndFunc
    
    
    Func Close()
       Exit
    EndFunc
    
    
    Func Pause()
       ToolTip("Pause",0,0)
       While 1
    	  Sleep(100)
    	  WEnd
       EndFunc
    
    
       Func Start()
    	   ToolTip("",0,0)
    	   While 1
    		  $pos = MouseGetPos()
    		  $IS = _ImageSearch("Start.png",1,$x,$y,50)
    		  If $IS = 1 Then
    			 MouseClick("left",$x,$y,5,20)
    			 MouseMove($pos [0], $pos [1], 20)
    			 Adlibregister ("Start", 300000)
    			 IMR()
    			 EndIf
    			 WEnd
    		  EndFunc
    
    
    		  Func IMR()
    			 While 1
    			 $pos = MouseGetPos()
    			   $IMR = _ImageSearch("IMR.png",1,$x,$y,50)
    			   If $IMR = 1 Then
    			   MouseClick("left",$x,$y,5,20)
    			   MouseMove($pos [0], $pos [1], 20)
    			   Else
    				  Sleep(100)
    				  BOX()
    			   EndIf
    			   WEnd
    			EndFunc
    
    
    			Func BOX()
    			 While 1
    			 $pos = MouseGetPos()
    			 $BOX = _ImageSearch("BB.png",1,$x,$y,50)
    			   If $BOX = 1 Then
    			   MouseClick("left",$x,$y,5,20)
    			   MouseMove($pos [0], $pos [1], 20)
    			   Else
    				  Sleep(100)
    			   EndIf
    			   WEnd
    			EndFunc
    Alles anzeigen

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™