Diese frage hatte ich schon mal in einen andren Forum^^ Also ich bräuchte einen Bot zum Abbauen also so solte es aussehen: auf platz 1 sind die booster und auf den andren plätzen im inventar sind z.b die messer max. von platz 2 bis 50( man braucht ja im invenar auch noch platz für anderes^^) Dann legt er ein >messer an und boostert es. Dass immmer so weiter bis die Bosster alle sind. Man soolte so viele Bosster wie Messer im Inventar haben. Wenn das alles fertig ist z. einen bot öffnen oder im bot eine funktion die man dann Aktiviert, die sollte so aussehen: Man steht vor den Magischen Kräutern, dann legt er vom 2. Inventar platz das erste messer ab, dann klickt er auf den magischen kräuter, dann auf ausgewählte Produktion dann Auf Blaublatt dann wartet er ca. 10 sekunden, weil dann ist Abgebaut und dann nächsten Messer anlegen und wieder weiter machen.. Wäre gut wenn wer so was machen könnte, so weit ich weiß ist es möglich aber denke nicht so leicht.Wie einige schon wissen ich kenne mich mit AutoIT leider nicht aus:(^^
edit:Der Code der in meinen ersten Beitrag ist ist nur ein teil davon er sucht nur die booster im inventar mehr nicht! Das soll nur dafür sein, falls mir wer den Bot fertigstellt, er weniger arbeit hat!
mfg
edit: sorry wegen der Rechtschreibung, habe wenig zeit
hab editiert so er such im inventar nach booster ist aber etwas ungenau wenn man bosster an erster stelle hat
edit: die messer sollen von platz 4-50 sein und die booster auf platz 3 da sonst der booster nicht angeklickt wird mit dem script der im code ist! Und wenn der booster angeklickt werden soll darf er vorher noch nicht markiert sein mit linken mausklick also, also keinen grünen rand haben
edit:Der Code der in meinen ersten Beitrag ist ist nur ein teil davon er sucht nur die booster im inventar mehr nicht! Das soll nur dafür sein, falls mir wer den Bot fertigstellt, er weniger arbeit hat!
mfg
edit: sorry wegen der Rechtschreibung, habe wenig zeit
Code:
AutoItSetOption("MouseCoordMode",2)
AutoItSetOption("CaretCoordMode",2)
AutoItSetOption("PixelCoordMode",2)
AutoItSetOption("MouseClickDownDelay",50)
AutoItSetOption("SendKeyDownDelay",50)
Dim $state, $search, $inventarfarbe1, $a, $b, $c, $check, $invopen, $i, $booster, $m, $boosterfarbe
$inventarfarbe1="0x556633"
$Boosterfarbe="0x999777"
$state=WinGetState("LastChaos")
WinMove("LastChaos","",0,0)
Sleep(100)
WinActivate("LastChaos")
inventaropen()
boost2()
Func inventaropen()
Send("e")
Sleep(100)
$search = PixelSearch(1, 1, 1000, 700, $inventarfarbe1) ;left top -> right bottom
If Not @error Then
farbcheck($search[0], $search[1])
If $check = "1983678581" Then
MouseMove($search[0]+20, $search[1]+230, 0)
MouseClick("left")
Sleep(200)
$invopen = 1
EndIf
Else
MsgBox(0,"boo", "open inventory not found")
$invopen = 0
EndIf
EndFunc
Func Booster()
$i = 0
Do
$i = $i + 1
If $invopen Then
Select
Case $i = 1
boost2()
If $c Then ExitLoop
Case $i = 2
MouseMove($search[0]+20, $search[1]+270, 0)
MouseClick("left")
Sleep(200)
boost2()
If $c Then ExitLoop
Case $i = 3
MouseMove($search[0]+20, $search[1]+310, 0)
MouseClick("left")
Sleep(200)
boost2()
If $c Then ExitLoop
Case $i = 4
MouseMove($search[0]+20, $search[1]+350, 0)
MouseClick("left")
Sleep(200)
boost2()
If $c Then ExitLoop
EndSelect
EndIf
Until $i = 4
EndFunc
Func boost2()
$Booster = PixelSearch($search[0]+35, $search[1]+215, $search[0]+210, $search[1]+390, $Boosterfarbe) ;left top -> right bottom
If Not @error Then
farbcheck($Booster[0], $Booster[1])
If $check = "2033039290" Then
MouseMove($booster[0]+10, $booster[1]+10,0)
$c = 1
EndIf
EndIf
EndFunc
Func farbcheck($a, $b)
$check = PixelChecksum($a, $b, $a+20, $b+20)
EndFunc
hab editiert so er such im inventar nach booster ist aber etwas ungenau wenn man bosster an erster stelle hat
edit: die messer sollen von platz 4-50 sein und die booster auf platz 3 da sonst der booster nicht angeklickt wird mit dem script der im code ist! Und wenn der booster angeklickt werden soll darf er vorher noch nicht markiert sein mit linken mausklick also, also keinen grünen rand haben
