|
You last visited: Today at 20:50
Advertisement
Suche Hilfe!!
Discussion on Suche Hilfe!! within the AutoIt forum part of the Coders Den category.
06/15/2010, 18:49
|
#31
|
elite*gold: 0 
Join Date: Jan 2010
Posts: 622
Received Thanks: 262
|
Quote:
Originally Posted by huberhans
Variante 2 sieht vielversprechend aus!
So hab ich das gemeint, mit Buttons ins Switch in der Schleife mit rein nehmen
|
klappt nur leider nicht xD
was ist eigentlich mit dem Exit in der Switch muss das da bleiben oder wie is das
(ich hab immernoch nicht ganz durchschaut warum das überhaupt da ist xD)
|
|
|
|
06/15/2010, 20:37
|
#32
|
elite*gold: 0
Join Date: Nov 2009
Posts: 927
Received Thanks: 1,317
|
Quote:
Originally Posted by Hitchens
klappt nur leider nicht xD
was ist eigentlich mit dem Exit in der Switch muss das da bleiben oder wie is das
(ich hab immernoch nicht ganz durchschaut warum das überhaupt da ist xD)
|
Case $Gui_event_close
Exit
Ist dafür da, daß du per X-Button das Fenster schließen kannst... Ich schau später nochmal rein wegen deiner Buttons
|
|
|
|
|
06/15/2010, 20:54
|
#33
|
elite*gold: 0
Join Date: Jan 2010
Posts: 622
Received Thanks: 262
|
Quote:
Originally Posted by huberhans
Case $Gui_event_close
Exit
Ist dafür da, daß du per X-Button das Fenster schließen kannst... Ich schau später nochmal rein wegen deiner Buttons
|
ok THx
|
|
|
|
|
06/15/2010, 21:20
|
#34
|
elite*gold: 0
Join Date: Nov 2009
Posts: 927
Received Thanks: 1,317
|
Quote:
Originally Posted by Hitchens
ok THx
|
Du könntest mir dein Script per PN schicken, dann schau ich mal
Edit: zu spät gesehen, aber das muß ich am PC machen
|
|
|
|
|
06/15/2010, 21:42
|
#35
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
|
Ich hab das mal soweit verbessert, dass es funktioniert.
PHP Code:
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <NomadMemory.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
$LC = "LastChaos -"
Opt("SendKeyDownDelay" , 200) ;Erzwingt, dass jeder Tastendruck midestens 200 millisek lang ist
HotKeySet("{ESC}","_ESC")
#Region GUI
$Form1_1 = GUICreate("Hitchens Bot", 463, 329)
GUISetBkColor(0xB9D1EA)
$Tab1 = GUICtrlCreateTab(32, 8, 401, 305)
$TabSheet1 = GUICtrlCreateTabItem("Trainer")
$Angriffstempo = GUICtrlCreateCheckbox("Angriffsgeschwindigkeit", 45, 56, 145, 33)
$Geschwindigkeit = GUICtrlCreateCheckbox("Laufgeschwindigkeit", 45, 81, 153, 33)
$Input_AT = GUICtrlCreateInput("10", 198, 61, 57, 22, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$Input_GS = GUICtrlCreateInput("10", 198, 84, 57, 22, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$labelHP = GUICtrlCreateLabel("0 / 0", 45, 211, 162, 33)
$HPLeiste = GUICtrlCreateProgress(45, 226, 250, 15)
$progressHP = GUICtrlCreateProgress(45, 261, 250, 15)
$labelTG = GUICtrlCreateLabel("0 / 0", 45, 245, 162, 33)
$Eigene = GUICtrlCreateLabel("Eigene HP", 136, 211, 52, 18)
$Label9 = GUICtrlCreateLabel("Target HP", 136, 245, 51, 18)
$TabSheet2 = GUICtrlCreateTabItem("Bot")
$Checkbox1 = GUICtrlCreateCheckbox("F1 Angriff", 52, 95, 73, 33)
$Checkbox2 = GUICtrlCreateCheckbox("F2 Aufsammeln", 52, 127, 97, 33)
$tb_min = GUICtrlCreateInput("10", 146, 71, 49, 22, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$tb_max = GUICtrlCreateInput("10", 237, 71, 49, 22, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$bis = GUICtrlCreateLabel("bis", 208, 71, 18, 18)
$Monsterlevel = GUICtrlCreateLabel("Monsterlevel von", 52, 71, 86, 18)
$btn_Start = GUICtrlCreateButton("Start", 320, 56, 97, 33, $WS_GROUP)
$btn_Stop = GUICtrlCreateButton("Stop", 320, 95, 97, 33, $WS_GROUP)
GUICtrlSetState(-1, $GUI_DISABLE)
$TabSheet3 = GUICtrlCreateTabItem("Thanks")
$Label1 = GUICtrlCreateLabel("Spezial Thanks to", 39, 63, 400, 28)
$Label2 = GUICtrlCreateLabel("KillerDeluxe,", 40, 119, 400, 31)
$Label3 = GUICtrlCreateLabel("Endtothenight,", 40, 146, 189, 31)
$Label4 = GUICtrlCreateLabel("OldLucieN und", 40, 173, 400, 31)
$Label5 = GUICtrlCreateLabel("huberhans", 39, 199, 400, 31)
$Label6 = GUICtrlCreateLabel("für ihre tatkräftige Unterstützung", 39, 223, 400, 27)
$TabSheet4 = GUICtrlCreateTabItem("Info")
$Label7 = GUICtrlCreateLabel("Diese GUI ist erst einmal rein spartanisch", 40, 82, 368, 93)
GUICtrlSetFont(-1, 14, 800, 0, "Cambria Math")
GUICtrlCreateTabItem("")
For $Font = $Label1 To $Label6
GUICtrlSetFont($Font, 16, 800, 2, "Comic Sans MS")
Next
GUISetState(@SW_SHOW)
#EndRegion GUI
Global $iv_Address = 0x1063F2E8 ;_pnetwork
Global $av_OffsetHPCur[2] = [0 ,0x1076E8]
Global $av_OffsetHPMax[2] = [0 , 0x1076EC]
Global $av_OffsetHP[2] = [0, 0x107324]
Global $av_OffsetHPM[2] = [0, 0x107320]
Global $av_OffsetMobLVL[2] = [0,0x107328]
Global $av_OffsetAT[5] = [0, 0x1C , 0x10 , 0x4 , 0xDDC]
Global $av_OffsetGS[5] = [0, 0x1C, 0x10, 0x4, 0xDD4]
Global $sv_Type4 = "dword"
Global $sv_TypeF = "float"
Global $iv_Pid = WinGetProcess($LC)
Global $ah_Handle = _MemoryOpen($iv_Pid)
Global $HPCur, $HPMax, $Moblvl, $Bot
While True
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btn_Start
If GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
MsgBox(48, "Fehler", "Wähle erst F1 zum angreifen aus!")
Else
GUICtrlSetState($btn_Stop, $GUI_ENABLE)
GUICtrlSetState($Checkbox1, $GUI_DISABLE)
GUICtrlSetState($btn_Start, $GUI_DISABLE)
$Bot = True
EndIf
Case $btn_Stop
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($btn_Start, $GUI_ENABLE)
GUICtrlSetState($btn_Stop, $GUI_DISABLE)
$Bot = False
EndSwitch
If WinExists($LC) Then
If $Bot Then Bot()
Hacks()
HPLabel()
HPTarget()
Else
MsgBox(48, "Fehler", "Starte zuerst LastChaos!")
Exit
EndIf
WEnd
Func Hacks()
$v_DataAT = GUICtrlRead($Input_AT)
$v_DataGS = GUICtrlRead($Input_GS)
If GUICtrlRead($Angriffstempo) = $GUI_CHECKED Then
_MemoryPointerWrite($iv_Address, $ah_Handle, $av_OffsetAT, $v_DataAT, $sv_Type4)
EndIf
If GUICtrlRead($Geschwindigkeit) = $GUI_CHECKED Then
_MemoryPointerWrite($iv_Address, $ah_Handle, $av_OffsetGS, $v_DataGS, $sv_TypeF)
EndIf
EndFunc
Func HPLabel()
$HPCur = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPCur, $sv_Type4)
$HPMax = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPMax, $sv_Type4)
$label = $HPCur[1] & " / " & $HPMax[1]
If GUICtrlRead($labelHP) <> $label Then GUICtrlSetData($labelHP, $label)
GUICtrlSetData($HPLeiste, $HPcur[1]* 100 / $HPmax[1])
EndFunc
Func HPTarget()
$HP = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHP, $sv_TypeF)
$HPM = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPM, $sv_TypeF)
$label = $HP[1] & " / " & $HPM[1]
$progress = $HP[1] * 100 / $HPM[1]
If GUICtrlRead($labelTG ) <> $label Then GUICtrlSetData($labelTG , $label)
GUICtrlSetData($progressHP, $progress)
EndFunc
Func Bot ()
$Moblvl = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetMobLVL, $sv_Type4)
If $Moblvl[1] >= GUICtrlRead($tb_min) And $Moblvl[1] <= GUICtrlRead($tb_max) Then
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then ControlSend($LC, "", "", "{F1}")
Sleep(100)
If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then ControlSend($LC, "", "", "{F2}")
Else
ControlSend($LC, "", "", "{TAB}")
EndIF
EndFunc
Func _ESC()
Exit
EndFunc
Ich kann dir nur mal empfehlen eine Ordnung einzubringen.
|
|
|
|
|
06/28/2010, 02:39
|
#36
|
elite*gold: 0
Join Date: Jan 2010
Posts: 622
Received Thanks: 262
|
PHP Code:
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <NomadMemory.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
$LC = "LastChaos -"
Opt("SendKeyDownDelay" , 200) ;Erzwingt, dass jeder Tastendruck midestens 200 millisek lang ist
HotKeySet("{ESC}","_ESC")
#Region GUI
$Form1_1 = GUICreate("Hitchens Bot", 463, 329)
GUISetBkColor(0xB9D1EA)
$Tab1 = GUICtrlCreateTab(32, 8, 401, 305)
$TabSheet1 = GUICtrlCreateTabItem("Trainer")
$Angriffstempo = GUICtrlCreateCheckbox("Angriffsgeschwindigkeit", 45, 56, 145, 33)
$Geschwindigkeit = GUICtrlCreateCheckbox("Laufgeschwindigkeit", 45, 81, 153, 33)
$Input_AT = GUICtrlCreateInput("10", 198, 61, 57, 22, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$Input_GS = GUICtrlCreateInput("10", 198, 84, 57, 22, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$labelHP = GUICtrlCreateLabel("0 / 0", 45, 211, 162, 33)
$HPLeiste = GUICtrlCreateProgress(45, 226, 250, 15)
$progressHP = GUICtrlCreateProgress(45, 261, 250, 15)
$labelTG = GUICtrlCreateLabel("0 / 0", 45, 245, 162, 33)
$Eigene = GUICtrlCreateLabel("Eigene HP", 136, 211, 52, 18)
$Label9 = GUICtrlCreateLabel("Target HP", 136, 245, 51, 18)
$TabSheet2 = GUICtrlCreateTabItem("Bot")
$Checkbox1 = GUICtrlCreateCheckbox("F1 Angriff", 52, 95, 73, 33)
$Checkbox2 = GUICtrlCreateCheckbox("F2 Aufsammeln", 52, 127, 97, 33)
$tb_min = GUICtrlCreateInput("1", 146, 71, 49, 22, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$tb_max = GUICtrlCreateInput("200", 237, 71, 49, 22, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$bis = GUICtrlCreateLabel("bis", 208, 71, 18, 18)
$Monsterlevel = GUICtrlCreateLabel("Monsterlevel von", 52, 71, 86, 18)
$btn_Start = GUICtrlCreateButton("Start", 320, 56, 97, 33, $WS_GROUP)
$btn_Stop = GUICtrlCreateButton("Stop", 320, 95, 97, 33, $WS_GROUP)
GUICtrlSetState(-1, $GUI_DISABLE)
$TabSheet3 = GUICtrlCreateTabItem("Charakter/Pet")
$TabSheet4 = GUICtrlCreateTabItem("Thanks")
$Label1 = GUICtrlCreateLabel("Spezial Thanks to", 39, 63, 400, 28)
$Label2 = GUICtrlCreateLabel("KillerDeluxe,", 40, 119, 400, 31)
$Label3 = GUICtrlCreateLabel("Endtothenight,", 40, 146, 189, 31)
$Label4 = GUICtrlCreateLabel("OldLucieN und", 40, 173, 400, 31)
$Label5 = GUICtrlCreateLabel("huberhans", 39, 199, 400, 31)
$Label6 = GUICtrlCreateLabel("für ihre tatkräftige Unterstützung", 39, 223, 400, 27)
$TabSheet5 = GUICtrlCreateTabItem("Info")
$Label7 = GUICtrlCreateLabel("Diese GUI ist erst einmal rein spartanisch", 40, 82, 368, 93)
GUICtrlSetFont(-1, 14, 800, 0, "Cambria Math")
GUICtrlCreateTabItem("")
For $Font = $Label1 To $Label6
GUICtrlSetFont($Font, 16, 800, 2, "Comic Sans MS")
Next
GUISetState(@SW_SHOW)
#EndRegion GUI
Global $iv_Address = 0x10640528 ;_pnetwork
Global $av_OffsetHPCur[2] = [0 ,0x1076E8]
Global $av_OffsetHPMax[2] = [0 , 0x1076EC]
Global $av_OffsetHP[2] = [0, 0x107324]
Global $av_OffsetHPM[2] = [0, 0x107320]
Global $av_OffsetMobLVL[2] = [0,0x107328]
Global $av_OffsetAT[5] = [0, 0x1C , 0x10 , 0x4 , 0xDDC]
Global $av_OffsetGS[5] = [0, 0x1C, 0x10, 0x4, 0xDD4]
Global $sv_Type4 = "dword"
Global $sv_TypeF = "float"
Global $iv_Pid = WinGetProcess($LC)
Global $ah_Handle = _MemoryOpen($iv_Pid)
Global $HPCur, $HPMax, $Moblvl, $Bot
While True
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btn_Start
If GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
MsgBox(48, "Fehler", "Wähle erst F1 zum angreifen aus!")
Else
GUICtrlSetState($btn_Stop, $GUI_ENABLE)
GUICtrlSetState($Checkbox1, $GUI_DISABLE)
GUICtrlSetState($btn_Start, $GUI_DISABLE)
$Bot = True
EndIf
Case $btn_Stop
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($btn_Start, $GUI_ENABLE)
GUICtrlSetState($btn_Stop, $GUI_DISABLE)
$Bot = False
EndSwitch
If WinExists($LC) Then
If $Bot Then Bot()
Hacks()
HPLabel()
HPTarget()
Else
MsgBox(48, "Fehler", "Starte zuerst LastChaos!")
Exit
EndIf
WEnd
Func Hacks()
$v_DataAT = GUICtrlRead($Input_AT)
$v_DataGS = GUICtrlRead($Input_GS)
If GUICtrlRead($Angriffstempo) = $GUI_CHECKED Then
_MemoryPointerWrite($iv_Address, $ah_Handle, $av_OffsetAT, $v_DataAT, $sv_Type4)
EndIf
If GUICtrlRead($Geschwindigkeit) = $GUI_CHECKED Then
_MemoryPointerWrite($iv_Address, $ah_Handle, $av_OffsetGS, $v_DataGS, $sv_TypeF)
EndIf
EndFunc
Func HPLabel()
$HPCur = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPCur, $sv_Type4)
$HPMax = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPMax, $sv_Type4)
$label = $HPCur[1] & " / " & $HPMax[1]
If GUICtrlRead($labelHP) <> $label Then GUICtrlSetData($labelHP, $label)
GUICtrlSetData($HPLeiste, $HPcur[1]* 100 / $HPmax[1])
EndFunc
Func HPTarget()
$HP = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHP, $sv_TypeF)
$HPM = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPM, $sv_TypeF)
$label = $HP[1] & " / " & $HPM[1]
$progress = $HP[1] * 100 / $HPM[1]
If GUICtrlRead($labelTG ) <> $label Then GUICtrlSetData($labelTG , $label)
GUICtrlSetData($progressHP, $progress)
EndFunc
Func Bot ()
$Moblvl = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetMobLVL, $sv_Type4)
If $Moblvl[1] >= GUICtrlRead($tb_min) And $Moblvl[1] <= GUICtrlRead($tb_max) Then
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then ControlSend($LC, "", "", "{F1}")
Sleep(100)
If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then ControlSend($LC, "", "", "{F2}")
Else
ControlSend($LC, "", "", "{TAB}")
EndIF
EndFunc
Func _ESC()
Exit
EndFunc
So da bin ich mal wieder
Hab nun endlich Zeit weiter zu machen und darum nun folgendes...
Das Script das Killer da zusammengetüftelt hat, funktioniert einwandfrei bis auf die Tatsache das ich die Gui nicht erweitern kann 
wenn ich das Gui script einlese kommt aus irgend einem grund (den ich nicht ganz verstehe) folgende Meldung im Output Window
Warning: Unknown property "Enabled" in control "btn_Stop" (TAButton)
Weiß jemand was das bedeutet?
EDIT:
Hat sich erledigt ich hab die Gui erweitert bekommen (auch wenns 4 Stunden gedauert hat >.<)
|
|
|
|
|
06/28/2010, 08:24
|
#37
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
|
Erstell dir das nächste mal lieber eine neue Form mit Koda.
|
|
|
|
|
06/28/2010, 08:48
|
#38
|
elite*gold: 0
Join Date: Jan 2010
Posts: 622
Received Thanks: 262
|
Quote:
Originally Posted by KillerDeluxe
Erstell dir das nächste mal lieber eine neue Form mit Koda.
|
hehe^^ wenn ich jedes mal eine neue Form erstellen muss werd ich nie fin weil ich die meißte Zeit damit verbringen müsste
aber jetzt hab ichs ja und kann mich an das nächste Problem setzen
Folgende Frage im Voraus
wie ermittle ich die Offsets für aktive HP bzw Manatränke (ich weiß nicht wo nach ich suchen soll)
wenn ich das weiß kann ich mich hier dran setzen
Momentan habe ich nur die Funktion für die HP Heilung des Chars aber da ich nicht weiß ob der Offset stimmt kann ich nicht testen Obs funktioniert
es öffnet sich zwar alles ohne Fehlermeldung aber die Funktion klappt noch nicht
PHP Code:
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <NomadMemory.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
$LC = "LastChaos -"
Opt("SendKeyDownDelay", 200) ;Erzwingt, dass jeder Tastendruck midestens 200 millisek lang ist
HotKeySet("{ESC}", "_esc")
#Region GUI
$Form1_1 = GUICreate("Hitchens Bot", 463, 329)
GUISetBkColor(0xB9D1EA)
$Tab1 = GUICtrlCreateTab(32, 8, 401, 305)
$TabSheet1 = GUICtrlCreateTabItem("Trainer")
$Angriffstempo = GUICtrlCreateCheckbox("Angriffsgeschwindigkeit", 45, 56, 145, 33)
$Geschwindigkeit = GUICtrlCreateCheckbox("Laufgeschwindigkeit", 45, 81, 153, 33)
$Input_AT = GUICtrlCreateInput("10", 198, 61, 57, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$Input_GS = GUICtrlCreateInput("10", 198, 84, 57, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$labelHP = GUICtrlCreateLabel("0 / 0", 45, 211, 162, 33)
$HPLeiste = GUICtrlCreateProgress(45, 226, 250, 15)
$progressHP = GUICtrlCreateProgress(45, 261, 250, 15)
$labelTG = GUICtrlCreateLabel("0 / 0", 45, 245, 162, 33)
$Eigene = GUICtrlCreateLabel("Eigene HP", 136, 211, 52, 18)
$Label9 = GUICtrlCreateLabel("Target HP", 136, 245, 51, 18)
$TabSheet2 = GUICtrlCreateTabItem("Bot")
$Checkbox1 = GUICtrlCreateCheckbox("F1 Angriff", 52, 95, 73, 33)
$Checkbox2 = GUICtrlCreateCheckbox("F2 Aufsammeln", 52, 127, 97, 33)
$tb_min = GUICtrlCreateInput("1", 146, 71, 49, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$tb_max = GUICtrlCreateInput("200", 237, 71, 49, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$bis = GUICtrlCreateLabel("bis", 208, 71, 18, 18)
$Monsterlevel = GUICtrlCreateLabel("Monsterlevel von", 52, 71, 86, 18)
$btn_Start = GUICtrlCreateButton("Start", 320, 56, 97, 33, $WS_GROUP)
$btn_Stop = GUICtrlCreateButton("Stop", 320, 95, 97, 33, $WS_GROUP)
GUICtrlSetState(-1, $GUI_DISABLE)
$TabSheet3 = GUICtrlCreateTabItem("Charakter/Pet")
$CBX_Heilen = GUICtrlCreateCheckbox("Heiltrank benutzen bei", 42, 58, 129, 33)
$CBX_Mana = GUICtrlCreateCheckbox("Manatrank benutzen bei", 42, 82, 137, 33)
$HP_Verloren = GUICtrlCreateInput("10", 182, 62, 57, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$MP_Verloren = GUICtrlCreateInput("10", 182, 88, 57, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$HPVerlust = GUICtrlCreateLabel("HP Verlust", 248, 62, 58, 18)
$MPVerlust = GUICtrlCreateLabel("MP Verlust", 248, 88, 56, 18)
$CBX_PetHP = GUICtrlCreateCheckbox("Pet Heilen bei", 42, 116, 137, 33)
$CBX_PetMP = GUICtrlCreateCheckbox("Pet Füttern bei", 42, 141, 137, 33)
$PetHP_verloren = GUICtrlCreateInput("10", 182, 124, 57, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$Futter_verloren = GUICtrlCreateInput("10", 182, 147, 57, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$PetHP = GUICtrlCreateLabel("HP Verlust", 248, 124, 55, 18)
$Futter = GUICtrlCreateLabel("Futter Verlust", 248, 149, 70, 18)
$CBX_Peteinpacken = GUICtrlCreateCheckbox("Pet einpacken bei", 42, 164, 137, 33)
$RestHP = GUICtrlCreateLabel("Rest HP", 248, 176, 42, 18)
$Rest_HP = GUICtrlCreateInput("10", 182, 170, 57, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$F_Fuettern = GUICtrlCreateInput("12", 378, 147, 33, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$Taste_F_4 = GUICtrlCreateLabel("Taste F", 321, 149, 40, 18)
$Taste_F_1 = GUICtrlCreateLabel("Taste F", 321, 62, 40, 18)
$Taste_F_2 = GUICtrlCreateLabel("Taste F", 321, 88, 40, 18)
$Taste_F_3 = GUICtrlCreateLabel("Taste F", 321, 124, 40, 18)
$Taste_F_5 = GUICtrlCreateLabel("Taste F", 321, 176, 40, 18)
$F_Heilen = GUICtrlCreateInput("12", 378, 62, 33, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$F_Petheilen = GUICtrlCreateInput("12", 378, 124, 33, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$F_Mana = GUICtrlCreateInput("12", 378, 88, 33, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$F_einpacken = GUICtrlCreateInput("12", 378, 170, 33, 22, BitOR($ES_CENTER, $ES_AUTOHSCROLL))
$TabSheet4 = GUICtrlCreateTabItem("Thanks")
$Label1 = GUICtrlCreateLabel("Spezial Thanks to", 39, 63, 400, 28)
$Label2 = GUICtrlCreateLabel("KillerDeluxe,", 40, 119, 400, 31)
$Label3 = GUICtrlCreateLabel("Endtothenight,", 40, 146, 189, 31)
$Label4 = GUICtrlCreateLabel("OldLucieN und", 40, 173, 400, 31)
$Label5 = GUICtrlCreateLabel("huberhans", 39, 199, 400, 31)
$Label6 = GUICtrlCreateLabel("für ihre tatkräftige Unterstützung", 39, 223, 400, 27)
$TabSheet5 = GUICtrlCreateTabItem("Info")
$Label7 = GUICtrlCreateLabel("Diese GUI ist erst einmal rein spartanisch", 40, 82, 368, 93)
GUICtrlSetFont(-1, 14, 800, 0, "Cambria Math")
GUICtrlCreateTabItem("")
For $Font = $Label1 To $Label6
GUICtrlSetFont($Font, 16, 800, 2, "Comic Sans MS")
Next
GUISetState(@SW_SHOW)
#EndRegion GUI
Global $iv_Address = 0x10640528 ;_pnetwork
Global $av_OffsetHPCur[2] = [0, 0x1076E8]
Global $av_OffsetHPMax[2] = [0, 0x1076EC]
Global $av_OffsetHP[2] = [0, 0x107324]
Global $av_OffsetHPM[2] = [0, 0x107320]
Global $av_OffsetMobLVL[2] = [0, 0x107328]
Global $av_OffsetAT[5] = [0, 0x1C, 0x10, 0x4, 0xDDC]
Global $av_OffsetGS[5] = [0, 0x1C, 0x10, 0x4, 0xDD4]
Global $sv_Type4 = "dword"
Global $sv_TypeF = "float"
Global $iv_Pid = WinGetProcess($LC)
Global $ah_Handle = _MemoryOpen($iv_Pid)
Global $HPCur, $HPMax, $Moblvl, $Bot
Global $Off_Trank_Aktiv[2] = [0, 0x107829]
While True
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btn_Start
If GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
MsgBox(48, "Fehler", "Wähle erst F1 zum angreifen aus!")
Else
GUICtrlSetState($btn_Stop, $GUI_ENABLE)
GUICtrlSetState($Checkbox1, $GUI_DISABLE)
GUICtrlSetState($btn_Start, $GUI_DISABLE)
$Bot = True
EndIf
Case $btn_Stop
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($btn_Start, $GUI_ENABLE)
GUICtrlSetState($btn_Stop, $GUI_DISABLE)
$Bot = False
EndSwitch
If WinExists($LC) Then
If $Bot Then Bot()
Hacks()
HPLabel()
HPTarget()
Heilen()
Else
MsgBox(48, "Fehler", "Starte zuerst LastChaos!")
Exit
EndIf
WEnd
Func Hacks()
$v_DataAT = GUICtrlRead($Input_AT)
$v_DataGS = GUICtrlRead($Input_GS)
If GUICtrlRead($Angriffstempo) = $GUI_CHECKED Then
_MemoryPointerWrite($iv_Address, $ah_Handle, $av_OffsetAT, $v_DataAT, $sv_Type4)
EndIf
If GUICtrlRead($Geschwindigkeit) = $GUI_CHECKED Then
_MemoryPointerWrite($iv_Address, $ah_Handle, $av_OffsetGS, $v_DataGS, $sv_TypeF)
EndIf
EndFunc ;==>Hacks
Func HPLabel()
$HPCur = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPCur, $sv_Type4)
$HPMax = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPMax, $sv_Type4)
$label = $HPCur[1] & " / " & $HPMax[1]
If GUICtrlRead($labelHP) <> $label Then GUICtrlSetData($labelHP, $label)
GUICtrlSetData($HPLeiste, $HPCur[1] * 100 / $HPMax[1])
EndFunc ;==>HPLabel
Func HPTarget()
$HP = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHP, $sv_TypeF)
$HPM = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetHPM, $sv_TypeF)
$label = $HP[1] & " / " & $HPM[1]
$progress = $HP[1] * 100 / $HPM[1]
If GUICtrlRead($labelTG) <> $label Then GUICtrlSetData($labelTG, $label)
GUICtrlSetData($progressHP, $progress)
EndFunc ;==>HPTarget
Func Bot()
$Moblvl = _MemoryPointerRead($iv_Address, $ah_Handle, $av_OffsetMobLVL, $sv_Type4)
If $Moblvl[1] >= GUICtrlRead($tb_min) And $Moblvl[1] <= GUICtrlRead($tb_max) Then
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then ControlSend($LC, "", "", "{F1}")
Sleep(100)
If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then ControlSend($LC, "", "", "{F2}")
Else
ControlSend($LC, "", "", "{TAB}")
EndIf
EndFunc ;==>Bot
Func _esc()
Exit
EndFunc ;==>_ESC
Func Heilen()
$Trank_aktiv = _MemoryPointerRead($iv_Address, $ah_Handle, $Off_Trank_Aktiv)
If $Trank_aktiv[1] = 2 Or $Trank_aktiv[1] = 6 Then
$HP_Pot = True
Else
$HP_Pot = False
EndIf
If GUICtrlRead($CBX_Heilen) = $GUI_CHECKED AND $HPCur[1] < $HPMax - GUICtrlRead($HP_Verloren) And $HP_Pot = False Then
ControlSend($LC, "", "", "!{1}") ; Mußt mal probieren ob mit {} oder ohne
ControlSend($LC, "", "", "{"& GUICtrlRead($F_Heilen) &"}")
EndIf
EndFunc
|
|
|
|
|
06/28/2010, 09:13
|
#39
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
|
Wenn du nicht weißt, wonach du suchen musst, wie kommst du dann auf diese Zeile:
PHP Code:
If $Trank_aktiv[1] = 2 Or $Trank_aktiv[1] = 6 Then
Base = _pNetwork (Stand 28.06.10: 10640528)
Du hast die Values und die Base, die Offsets zu finden ist nicht schwer, du hast doch schon ein paar (außer du hast sie nur kopiert, dann frag ich mich aber immer noch, wie du auf die obige Zeile gekommen bist).
|
|
|
|
|
06/28/2010, 10:28
|
#40
|
elite*gold: 0
Join Date: Jan 2010
Posts: 622
Received Thanks: 262
|
Quote:
Originally Posted by KillerDeluxe
Wenn du nicht weißt, wonach du suchen musst, wie kommst du dann auf diese Zeile:
PHP Code:
If $Trank_aktiv[1] = 2 Or $Trank_aktiv[1] = 6 Then
Base = _pNetwork (Stand 28.06.10: 10640528)
Du hast die Values und die Base, die Offsets zu finden ist nicht schwer, du hast doch schon ein paar (außer du hast sie nur kopiert, dann frag ich mich aber immer noch, wie du auf die obige Zeile gekommen bist). |
Das kann ich dir sagen durch unseren guten alten huberhans
Quote:
|
Originally Posted by huberhans
PHP Code:
Func Heilen()
$Trank_aktiv[1] = _MemoryPointerRead($Pointer, $Prozess, $Off_Trank_Aktiv)
If $Trank_aktiv[1] = 2 Or $Trank_aktiv[1] = 6 Then
$HP_Pot = True
Else
$HP_Pot = False
EndIf
If GUICtrlRead($CBX_Heilen) = $GUI_CHECKED AND $Akt_HP[1] < $Max_HP - GUICtrlRead($HP_Verloren) And $HP_Pot = False Then
ControlSend($Windowname, "", "", "!{1}") ; Mußt mal probieren ob mit {} oder ohne
ControlSend($Windowname, "", "", "{"& GUICtrlRead($F_Heilen) &"}")
EndIf
EndFunc
|
er hat mir bei nem Fehler geholfen und das war sein Ergebnis mir fehlt halt nur noch der Offset um alles zum laufen zu bringen
Die Funktion an sich war ja schon fertig bis auf den von dir angesprochenen Zusatz nur weiß ich immernoch nicht wonach ich für den Offset suchen muss
Edit: grad erst aufgefallen das ich Base geschrieben habe >.< ich meine natürlich den Offset dafür das ein Trank aktiv ist
|
|
|
|
|
06/28/2010, 11:05
|
#41
|
elite*gold: 0
Join Date: Nov 2009
Posts: 927
Received Thanks: 1,317
|
Wenn ich mich recht entsinne, hab ich dir aber die Values der Tränke geschrieben:
kein Trank: 0
HP-Trank: 2
Mana-Trank: 4
HP- und Mana-Trank: 6
damit sollte es kein Problem sein, die Adresse und damit dann den Offset zu finden.
Gruß
|
|
|
|
|
06/28/2010, 11:28
|
#42
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
|
Hätte man ja aus dem Script lesen können. Ich rate dir aber noch einmal, etwas Ordnung einzubringen. Darunter gehört z. B. auch eine einheitliche Benennung der Variablen.
Z.B.:
Code:
$B_xxx → Button
$I_xxx → Input
$C_xxx → Checkbox
"tb" Soll wohl für textBox stehen, ist aber in AutoIt nicht geläufig (textBox = Input).
Du musst wissen, was was bewirkt, auswendig lernt sich das niemand und das nach schauen kostet einfach zu viel Zeit (auf Dauer).
|
|
|
|
|
06/28/2010, 12:53
|
#43
|
elite*gold: 0
Join Date: Jan 2010
Posts: 622
Received Thanks: 262
|
Soweit komm ich jetzt aber das wars dann auch wieder >.< mir platzt der Kopf drei Tage ohne Schlaf sind eindeutig nicht gut
Quote:
Originally Posted by KillerDeluxe
Hätte man ja aus dem Script lesen können. Ich rate dir aber noch einmal, etwas Ordnung einzubringen. Darunter gehört z. B. auch eine einheitliche Benennung der Variablen.
Z.B.:
Code:
$B_xxx → Button
$I_xxx → Input
$C_xxx → Checkbox
"tb" Soll wohl für textBox stehen, ist aber in AutoIt nicht geläufig (textBox = Input).
Du musst wissen, was was bewirkt, auswendig lernt sich das niemand und das nach schauen kostet einfach zu viel Zeit (auf Dauer). |
was das angeht will ich erstmal alles zum Laufen bringen und dann bennen ich alles so um wie es für MICH am verständlichsten und simpelsten ist aber wenn ich das jetzt zuerst mache komme ich mit den Functions nicht voran und deswegen mach ich das zuerst
|
|
|
|
|
06/28/2010, 13:41
|
#44
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
|
Ich leg dir ein bisschen Mathematik nahe. Wenn du das nicht im Kopf rechnen kannst:
Start → Zubehör → Rechner - Ansicht → Programmierer → Hex + Dword
Meistens sind es aber nur kleine Kopfrechenaufgaben.
Damit du auch weißt, was du rechnen sollst:
|
|
|
|
|
06/28/2010, 15:03
|
#45
|
elite*gold: 0
Join Date: Jan 2010
Posts: 622
Received Thanks: 262
|
Quote:
Originally Posted by KillerDeluxe
Ich leg dir ein bisschen Mathematik nahe. Wenn du das nicht im Kopf rechnen kannst:
Start → Zubehör → Rechner - Ansicht → Programmierer → Hex + Dword
Meistens sind es aber nur kleine Kopfrechenaufgaben.
Damit du auch weißt, was du rechnen sollst:
|
Soviel hab ich jetzt verstanden aber wie kamst du auf den gegeben wert?
das ist das was mich interessiert
wenn ich weiß wie ichs rechnen muss dann kann ichs auch berechnen
|
|
|
|
 |
|
Similar Threads
|
[Hilfe] Suche Guten Patcher und seine hilfe
05/28/2010 - Metin2 PServer Guides & Strategies - 5 Replies
Hallo Liebe community suche einen patcher der von http://ytsf2.netai.net/
alle datein runterladet die drauf sind aber ohne den ganzen client raufzuladen auf den webspace z.b ich mein das so
webspace is leer tuhe item.txt raufladen
soll er die datei ruter laden kann mir bitte wer helfen were supper :D
|
Hilfe!!!Hae Root angebot aber wie Server eröffnen...Suche Hilfe und ein TEAM!!!!!
04/19/2010 - Metin2 Private Server - 3 Replies
Hey,ich habe ein wundervolles Angebot ein Root zu kriegen,und wollte fragen,wie stelle ich das ein,das ich ein Root Server habe,wie eröffne ich ihn???Und noch viel mehr
Suche ein Team!!!
Hp Designer
Datenbank helfen undso
"entbugger"
und und und
Meldet euch oder schreibts in den Thread
Danke!!!!!!!!
|
HILFE: Wegen PlaySpan IP Change suche hilfe mit teamviewer
02/04/2010 - WarRock - 5 Replies
Hi,
ich habe mir schon ätliche tuts angesehen und ohne virustotal gedownloadet aber bei mir klappt es nicht kann mir jemand einen genauen link der Klappt und mir helfen`??? pls wäre nett
|
All times are GMT +1. The time now is 20:52.
|
|
