-Drunken Master- Säufertitel-Bot

09/11/2008 18:05 Azunai#106
-.-
eigeninitiative!!!!

im help file nach guicreate gucken,
beispielskript angucken, includes kopieren!
09/19/2008 17:29 Dimmo94#107
Ich hab jetzt einiges versucht, hab mir das auf der ersten Seite runterladen, hab die au3-Datei ein paar mal geändert wie es hier steht aber jetz steh ich leider an dieser Stelle:
der Bot trinkt am Anfang 1 Flasche
jetzt trinkt er jede Minute eine neue Flasche...

er soll eigentlich nur alle 3 Minuten trinken... was mach ich falsch?

EDIT: Es hat offensichtlich was damit zu tun das ich wirklich zu blöd bin das ganze auch richtig auszuführen^^ wie kann ich das denn von der .au3-Datei zur ausführbaren Datei machen? oder brauch ich da noch ein Extraprog? Wenn ja welches?

nochn Edit^^: Ich weis jetz das ich AutoIt3 brauche^^ ich lads mir grad runter damit geht das dann oder?

und NOCH ein edit: ich hab jetz eure Sourcecodes in einer .au3-Datei gespeichert. Wenn ich jetzt aber das Ding compiled habe kommt immer ein Fehler:
Line -1:

Error: Variable used without being declared.

ich hab leider GAR KEINE ahnung von autoit sonst würd ich wahrscheinlich nur halb soviele blöde Fragen stellen^^

so, das hoffentlich letzte Edit^^ ich habs endlich geschafft :D
09/21/2008 23:05 ziff#108
Quote:
Originally Posted by ziff View Post
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=dataEierlikör.ico
#AutoIt3Wrapper_outfile=DrunkenMaster.exe
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_UseAnsi=y
#AutoIt3Wrapper_Res_LegalCopyright=www.4n7hr4x.de
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
;-------------------------------------------------------------------------------------------;
;                 ___ __                                            __                           ;
;          ___  / (_) /____  ____ _   ______  ___  __________ ____/ /__                         ;
;         / _ / / / __/ _ / __  | / / __ / _ / ___/ ___// __  / _                         ;
;        /  __/ / / /_/  __/ /_/ / |/ / /_/ /  __/ /  (__  )/ /_/ /  __/                        ;
;        ___/_/_/__/___/ .___/|___/ .___/___/_/  /____(_)__,_/___/                         ;
;                        /_/        /_/                                                         ;
;                                                                                            ;
;                                                                                            ;
;                       © exclusively released on epvpers.de                                ;
;-------------------------------------------------------------------------------------------;
;AutoIt Version: 3.1.1.0                                                                    ;
;Author:                                                                                     ;
;                                   _   _                                                    ;
;                       /         | | | |                                                   ;
;                      /     _ __ | |_| |__  _ __ __ ___  __                                :    
;                     / /  | '_ | __| '_ | '__/ _`  / /                                ;    
;                    / ____ | | | | |_| | | | | | (_| |>  <                                 ;
;                   /_/    __| |_|__|_| |_|_|  __,_/_/_                                ;
;                                                                                            ;
;                                                                                            ;
;                                                                                            ;
;-------------------------------------------------------------------------------------------;
; Script generated by AutoBuilder 0.6 Prototype
;
;                        THX @ Azunai for help with GUI
;
#include <GuiConstants.au3>
#include <Sound.au3>
#include <GuiComboBoxEx.au3>
#include <GuiImageList.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
    Func exitit()
    exit 0
    EndFunc

HotKeySet("{F8}","exitit")
HotKeySet("{PAUSE}", "TogglePause")
Global 
Global 
Global 
Global 
Global 
Global 
Global 
Global =Random(150,550)
Global =Random(9000,11000)
Global =Random(150,550)
=Random(0,1500)
=Random(0,1,1)
Opt("GUICoordMode", 1)


Func TogglePause()
     = NOT 
    While 
        sleep(100)
        ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
EndFunc


 = GuiCreate("- Drunken Master V 0.1 -", 300, 341,-1, -1 , BitOR(, ))
GUISetBkColor ( 0xFFFFFF )
 = _GUICtrlComboBoxEx_Create (, "", 10, 110,150)
 = _GUIImageList_Create (16, 16, 5,3)
 = GuiCtrlCreateLabel("Alkoholart :", 10, 95)
; = GUICtrlCreateCombo ( "Jägerbier", 10, 110,150)
;GUICtrlSetData(-1,"Zwergenbier|Reiswein|Vaabi-Wein|Wacholderbeer-Gin|Apfelwein|Eierflip|Absinth|Hexensud|Kleeblattbier|Zehtukas Krug|Eierlikör|Altes Zwergenbier|Feuerwasser")
=GUICtrlCreatePic(@ScriptDir & "/data/header.jpg",0,0, 300,90)
 = GuiCtrlCreateLabel("by Anthrax", 200, 310, 50, 20)
 = GuiCtrlCreateButton("Trink !", 10, 310, 60, 20)
 =GuiCtrlCreateLabel("Wie viele Flaschen? :", 10,240)
=GUICtrlCreateInput("25" ,10,260,60,20)
GuiSetState()
$1=_GUIImageList_AddIcon (, @ScriptDir & "dataAbsinth.ico" )
$2=_GUIImageList_AddIcon (, @ScriptDir & "dataAltes_Zwergenbier.ico" )
$3=_GUIImageList_AddIcon (, @ScriptDir & "dataApfelwein.ico" )
$4=_GUIImageList_AddIcon (, @ScriptDir & "dataEierflip.ico" )
$5=_GUIImageList_AddIcon (, @ScriptDir & "dataEierlikör.ico" )
$6=_GUIImageList_AddIcon (, @ScriptDir & "dataFeuerwasser-Flasche.ico" )
$7=_GUIImageList_AddIcon (, @ScriptDir & "dataHexensud.ico" )
$8=_GUIImageList_AddIcon (, @ScriptDir & "dataJägerbier.ico" )
$9=_GUIImageList_AddIcon (, @ScriptDir & "dataVaabi-Wein.ico" )
$10=_GUIImageList_AddIcon (, @ScriptDir & "dataWacholderbeer-Gin.ico" )
$11=_GUIImageList_AddIcon (, @ScriptDir & "dataZehtukas_Krug.ico" )
$12=_GUIImageList_AddIcon (, @ScriptDir & "dataZwergenbier.ico" )
$13=_GUIImageList_AddIcon (, @ScriptDir & "dataKleeblattbier.ico" )
_GUICtrlComboBoxEx_AddString (, "Absinth" ,$1,$1)
_GUICtrlComboBoxEx_AddString (, "Altes Zwergenbier" ,$2,$2)
_GUICtrlComboBoxEx_AddString (, "Apfelwein" ,$3,$3)
_GUICtrlComboBoxEx_AddString (, "Eierflip" ,$4,$4)
_GUICtrlComboBoxEx_AddString (, "Eierlikör" ,$5,$5)
_GUICtrlComboBoxEx_AddString (, "Feuerwasser" ,$6,$6)
_GUICtrlComboBoxEx_AddString (, "Hexensud" ,$7,$7)
_GUICtrlComboBoxEx_AddString (, "Jägerbier" ,$8,$8)
_GUICtrlComboBoxEx_AddString (, "Vaabi-Wein" ,$9,$9)
_GUICtrlComboBoxEx_AddString (, "Wacholderbeer-Gin" ,$10,$10)
_GUICtrlComboBoxEx_AddString (, "Zethukas Krug" ,$11,$11)
_GUICtrlComboBoxEx_AddString (, "Zwergenbier" ,$12,$12)
_GUICtrlComboBoxEx_AddString (, "Kleeblattbier" ,$13,$13)
_GUICtrlComboBoxEx_SetImageList (, )

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.")
    =InputBox ( "Bitte nun die Koordinaten eintragen", "Bitte nun die X-Koordinate eintragen", "0" )
    =InputBox ( "Bitte nun die Koordinaten eintragen", "Bitte nun die Y-Koordinate eintragen", "0" )
    ProcessClose("Windowinfo.exe")

 = ProcessExists("windowinfo.exe") ; Will return the PID or 0 if the process isn't found.
If  Then ProcessClose()

    EndFunc

func weitertrinken()
        WinActivate("Guild Wars")
        sleep(500)
        Do
            MouseClick("left" ,,,2)    
            =(+1)
            Sleep(Random(57900,59000))
        Until =
    EndFunc    
    
    func weitertrinken2()
        WinActivate("Guild Wars")
        sleep(500)
        Do
            MouseClick("left" ,,,2)    
            =(+1)
            sleep(random(1000*60*3,1005*60*3,1))
        Until =
EndFunc    

func trink()   
        Global  = _GUICtrlComboBoxEx_GetCurSel()
        Global  = _GUICtrlComboBoxEx_GetItem(,)
        
            WinActivate("Guild Wars")
            position()
            sleep(3000)
            Global =1
            sleep (5000)
if = "Absinth" Or = "Apfelwein" Or = "Eierflip"  Or = "Hexensud" Or  = "Jägerbier" Or = "Vaabi-Wein" Or = "Wacholderbeer-Gin" Or = "Zethukas Krug" Or = "Zwergenbier" Or ="Kleeblattbier" Then
                MouseClick("left" ,,,2)
                sleep(random(1200,1500))
                =(+1)
                MouseClick("left" ,,,2)
                sleep(random(1200,1500))
                =(+1)
                MouseClick("left" ,,,2)
                sleep(random(1200,1500))
                =(+1)
                MouseClick("left" ,,,2)
                sleep(random(1200,1500))
                =(+1)
                MouseClick("left" ,,,2)
                sleep(random(175000,179000))
                weitertrinken()
            Else 
weitertrinken2()            
            EndIf
    
    
EndFunc


While 1
     
Global  = (GUICtrlRead())  
 = GuiGetMsg()
    Select
    Case  = 
        Exit
    Case  =  
        call("trink")
    Case Else
        ;;;
    EndSelect
WEnd
Exit
...
09/21/2008 23:50 kknb#109
man leute es gibt ne vorschau funktion, ja da kann man seine posts vor dem abschicken nochmal anschauen...
09/22/2008 11:48 Azunai#110
ziff... variablen ...
09/22/2008 22:18 ziff#111
ich wollte auch nur auf meinen post ca. 20cm weiter oben hinweisen, der das Problem von Dimmo94 behebt, wenn er das immer noch nich auf die reihe kriegt gehört er geschlagen.
09/25/2008 07:24 Spiker No Way#112
der bot trinkt kein grog :D
09/25/2008 17:58 Borega#113
generell trinkt er lvl 56 alc zu schnell..
aber statt grog kann man ja auch feuerwasser oder so anwählen
naja er wartet auf jeden keine 3 min. vll kann man das ja verändern
09/25/2008 18:06 Azunai#114
AUA!!!
evtl erst lesen bevor ihr so ein comment abgebt... die 10 seiten vorher enthalten alle das selbe!!!!
aber nein, bloß nicht lese, ist ja zu anstrengend, lieber sinnlose posts klopfen
09/25/2008 22:17 Spiker No Way#115
grog trinkt er nicht sobald der bot gestartet wird und die koordinaten wo der alk liegt eingibt und es handelt sich um grog meldet er nen error in line 131

und ja azunai ich habe alles angepasst und ja ich hab ebereits alle 11 seiten davor gelesen -.-
09/26/2008 07:26 candyman91#116
Quote:
grog trinkt er nicht sobald der bot gestartet wird und die koordinaten wo der alk liegt eingibt und es handelt sich um grog meldet er nen error in line 131

und ja azunai ich habe alles angepasst und ja ich hab ebereits alle 11 seiten davor gelesen -.-
Ich denke Azuni hat sich da auf Borega bezogen :)
09/26/2008 12:30 Spiker No Way#117
wenns so is gut... aber mein fehler in line 131 mit dem linksklick is bissel doof O.o
09/27/2008 00:43 Borega#118
nungut aber er nimmt ja bilder für die datei die ich net hab also wo her nehmen bzw da erscheint bei mir nen fehler
09/30/2008 10:48 -Anthrax-#119
dann lad mein archiv ausm erstn post da sindse drin .,.
10/03/2008 12:42 Spiker No Way#120
hab allesumgeschreiben das er nach 3 min den alk trinken soll denn kommt aber in line 131 fehler: linksklick error :/