hi, bin zwar leider noch nicht zum testen gekommen, jedoch erstmal ein grosses Lob,
ist super geworden :-)
Jedoch hätte ich nen kleineren (oder evtl auch größeren? :P ) Verbesserungsvorschlag.
Und zwar gehts dabei ein bisschen ums sparen und eventuell auch schnellem hochziehen des Titels :P
Es sollten mehrere Alkohol-sorten bzw auch mehrere Slots genutzt werden könnten,
sodass ich z.B. folgendes angeben kann:
1x Altes Zwergenbier
250x Zwergenbier
250x Zwergenbier
das hätte dann zum einen den Vorteil, dass man nicht mit Stufe 1 Alkohol anfangen braucht (wobei man bei jedem Start 2 verschwenden würde) und zum Anderen könnte man auch mal ne nacht über in der Gildenhalle rumstehen und seinen titel hochziehen, ohne alle 248 Minuten wieder Nachzuschmeissen. ^^
Sprich, wenn im Fenster die Flaschenanzeige direkt neben der Alkoholart angezeigt würde und man das 5 mal untereinander setzt (was dann auch nacheinander abgearbeitet wird) sollte das auch ausreichen ^^
Ich habe zwar absolut keine Ahnung von AutoIt, aber was mir beim lesen des Scripst aufgefallen ist, ist das du ihn bei der Auswahl von hartem Alk an die
func weitertrinken()
WinActivate("Guild Wars")
sleep(500)
Do
MouseClick("left" ,$x,$y,2)
$i8=($i8+1)
Sleep(Random(57900,59000))
Until $i8=$i
leitest.
Das bringt ihn dann aber dazu, alle 1 min harten Alk zu trinken, was bei hartem Alk ja eine Verschwendung darstellt.
Ich denke, dafür müsste eine eigene Funktion her, die Ihn nur alle 3 mins trinken lässt.
Zur selbigen Funktion (weitertrinken) wird er auch bei allen anderen Alksorten verwiesen, außer dem
Jägerbier, da läuft er perfekt.
Da ich wie gesagt, keine Erfahrung mit AutoIt habe, schaffe ich es auch nicht, das Script dahingehend zu ändern.
HotKeySet("{F8}","exitit")
HotKeySet("{PAUSE}", "TogglePause")
Global $Paused
Global $i
Global $x
Global $y
Global $sleep
Global $ausruhen
Global $random
Global $i1=Random(150,550)
Global $i2=Random(9000,11000)
Global $i3=Random(150,550)
$z=Random(0,1500)
$func=Random(0,1,1)
Opt("GUICoordMode", 1)
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script is "Paused"',0,0)
WEnd
ToolTip("")
EndFunc
Func position()
Run ("Windowinfo.exe",@ScriptDir )
Sleep(1500)
MsgBox ( 0, "Positionsfinder", "Um die Koordinaten des Alkohols zu bestimmen öffnet das Inventar und haltet die Maus über die Alkoholsorte die ihr Trinken möchtet.")
$x=InputBox ( "Bitte nun die Koordinaten eintragen", "Bitte nun die X-Koordinate eintragen", "0" )
$y=InputBox ( "Bitte nun die Koordinaten eintragen", "Bitte nun die Y-Koordinate eintragen", "0" )
ProcessClose("Windowinfo.exe")
$PID = ProcessExists("windowinfo.exe") ; Will return the PID or 0 if the process isn't found.
If $PID Then ProcessClose($PID)
EndFunc
func weitertrinken()
WinActivate("Guild Wars")
sleep(500)
Do
MouseClick("left" ,$x,$y,2)
$i8=($i8+1)
Sleep(Random(57900,59000))
Until $i8=$i
EndFunc
func weitertrinken2()
WinActivate("Guild Wars")
sleep(500)
Do
MouseClick("left" ,$x,$y,2)
$i8=($i8+1)
Sleep(Random(57900,59000)*3)
Until $i8=$i
EndFunc
func trink()
Global $count = _GUICtrlComboBoxEx_GetCurSel($hCombo)
Global $bier = _GUICtrlComboBoxEx_GetItem($hCombo,$count)
WinActivate("Guild Wars")
position()
sleep(3000)
Global $i8=1
sleep (5000)
if $bier[0]= "Absinth" Or $bier[0]= "Apfelwein" Or $bier[0]= "Eierflip" Or $bier[0]= "Hexensud" Or $bier[0]= "Jägerbier" Or $bier[0]= "Vaabi-Wein" Or $bier[0]= "Wacholderbeer-Gin" Or $bier[0]= "Zethukas Krug" Or $bier[0]= "Zwergenbier" Or $bier="Kleeblattbier" Then
MouseClick("left" ,$x,$y,2)
sleep(random(1200,1500))
$i8=($i8+1)
MouseClick("left" ,$x,$y,2)
sleep(random(1200,1500))
$i8=($i8+1)
MouseClick("left" ,$x,$y,2)
sleep(random(1200,1500))
$i8=($i8+1)
MouseClick("left" ,$x,$y,2)
sleep(random(1200,1500))
$i8=($i8+1)
MouseClick("left" ,$x,$y,2)
sleep(random(175000,179000))
weitertrinken()
Else
weitertrinken2()
EndIf
EndFunc
While 1
Global $i = (GUICtrlRead($Input_3))
$msg = GuiGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $Button_11
call("trink")
Case Else
;;;
EndSelect
WEnd
Exit
Drunken BoT Projekt[helpfix] by N.ick 02/11/2009 - GW Exploits, Hacks, Bots, Tools & Macros - 17 Replies Hey :]
I have this i've been playing with learning my way around AutoItv3 for a yearish now
and.
there is a few problems i've encountered.
Ill start and run bot but it stops at the point to click the bottles.
i plan on working on this till you can use it for multiple types of alcohol.
but all im worried about now is Lvl3
Heres code.
if you and offer any help i'd appreciate it :]
drunken post tiopic 01/31/2008 - Off Topic - 31 Replies WTF drubnken like pieche of shit
:confused::confused::confused::confused::confused ::confused:
