Hilfe gesucht :D

08/02/2010 13:48 FreundBlase#1
Hey hey,
ich wollte mir mit Autoit son kleinen Bot basteln. Selbst angreifen und die gedroppten Sachen aufheben hab ich ja schon, nur eine Funtkion würde ich gern noch haben das er erkennt wann mein Begleiter gefüttert oder geheilt werden muss.

PHP Code:
 #cs----------------------------------------------------------------------------

 
AutoIt Version3.3.6.1
 Author
:         ...

 
Script Function:
    
Template AutoIt script.

#ce ----------------------------------------------------------------------------
#include <GUIConstantsEx.au3>

GUICreate("... Bot"335100)    

GUICtrlCreateLabel("Stein"810)
$key1 GUICtrlCreateInput(""35880)
GUICtrlCreateLabel("Blatt"844)
$time1 GUICtrlCreateInput(""354080)

$startbutton GUICtrlCreateButton("Start"190860)

GUISetState(@SW_SHOW)

While 
1
    $msg 
GUIGetMsg()
    
    
Select
        
        
Case $msg $startbutton
                
                $send1 
GUICtrlRead($key1)
                
$sleep1 GUICtrlRead($time1)
                
            While 
1    
                Send
($send1)
                
Sleep($sleep1)
            
WEnd
            
        
Case $msg $GUI_EVENT_CLOSE
            GUIDelete
()
            
ExitLoop
            
    EndSelect
        
WEnd

While True
    Send
("{TAB}") ; drückt TAB
    Sleep
(1000) ; wartet 1 Sekunde
    Send
("1") ; sendet 1
    Sleep
(1000) ; wartet 1 Sekunde
    Send
("2") ; sendet 2
    Sleep
(1000) ; Zeit in Millisekunden bis der Vorgang wiederholt wird
WEnd

Func _exit
()
    Exit
EndFunc

#Region Globale Variablen:
Global $petheilen_bei
Global $petfuettern_bei
Global $PetHP
Global $petfutteroffset[2] = [00x10A2B4]
Global 
$PetFutter
#EndRegion

Func Funktion_Createini ()
IniWrite("tools.ini" "Daten" "webbersteintaste" GUICtrlRead($tb8))
IniWrite("tools.ini" "Daten" "blaublatttaste" GUICtrlRead($tb6) )
IniWrite("tools.ini" "Daten" "petfuettern_bei" GUICtrlRead($tb7))
IniWrite("tools.ini" "Daten" "petheilen_bei" GUICtrlRead($tb5))
EndFunc

$PetHP 
_MemoryPointerRead($Pointer1 $Memory $pethpoffset "float")
If @
error Then
TrayTip
("Fehler!" "Das Programm funktioniert nicht, wenn LC beendet ist. Das Programm wird sich in 10 Sekunden beenden" 10)
Sleep(10000)
Exit 
0
EndIf
$PetFutter _MemoryPointerRead($Pointer1 $Memory $petfutteroffset "float")
If @
error Then
TrayTip
("Fehler!" "Das Programm funktioniert nicht, wenn LC beendet ist. Das Programm wird sich in 10 Sekunden beenden" 10)
Sleep(10000)
Exit 
0
EndIf

If 
$c 1 Then
If $pethpgrenze $PetHP[1Then
UseKey
(GUICtrlRead($tb6) , $hlc)
Sleep(100)
EndIf
EndIf

If 
$d 1 Then
If $petfuttergrenze $PetFutter[1Then
UseKey
(GUICtrlRead($tb8) , $hlc)
Sleep(100)
EndIf
EndIf

While 
1
    sleep
(1)
WEnd 


Währe gut wenn mir jemand mal sagen könnte was davon Müll und was davon stehen bleiben könnte des währe schon mal ne super Sache. :D

MfG
08/02/2010 13:55 HardCore.1337#2
Set doch den Code bitte in Code oder PHP Tags.
Das steigert die Lesbarkeit nämlich enorm. ;)
08/02/2010 14:05 FreundBlase#3
So is glaube besser. :D
08/02/2010 14:08 luckkylooser#4
Wäre klasse wenn du das ganze Script mal posten könntest.
08/02/2010 14:45 FreundBlase#5
Das ist alles was ich habe, bitte hab Verständinss hab gestern Abend erst angefangen mich mit sowas zu beschäftigen, also nicht meckern, wenn da teilweise nur Müll steht. :D

Das was ich jetzt neu hinzugefügt habe ist Kopiert. Wenn ich das vieleicht irgendwann mal fertig habe, ist er eh nur für Eigenbedarf.