Nunja, schonmal die Checkarea ueberprueft?
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.0.0
Author: eF_Hacks
Script Function: Waypointer for ToniTusch666 MoveTo Engine [Guild Wars]
#ce ----------------------------------------------------------------------------
#include <NomadMemory.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include-once
Const $Pos_X = IniRead("update.ini", "SECTION D", "POSX", "Not Found")
Const $Pos_Y = IniRead("update.ini", "SECTION D", "POSY", "Not Found")
$hWnd = IniRead("WPT.ini", "Misc", "WinName", "Guild Wars")
Global $hprocess = _MemoryOpen(WinGetProcess($hWnd))
Const $CurPos_X = _MemoryRead($Pos_X, $hprocess, 'float')
Const $CurPos_Y = _MemoryRead($Pos_Y, $hprocess, 'float')
Global $CheckBox, $Mode1, $Mode2, $Mode3, $WindowName, $Delete
HotKeySet("{End}", "_Exit")
HotKeySet("{Ins}", "_GetCurPos")
Func _GetCurPos()
Select
Case $Mode1 And BitAND(GUICtrlRead($Mode1), $GUI_CHECKED) = $GUI_CHECKED
ConsoleWrite(StringFormat("MoveTo(1, %d, %d)\n", $CurPos_X, $CurPos_Y))
FileWriteLine("Waypoints.txt", StringFormat("MoveTo(1, %d, %d)\n" & @CRLF, $CurPos_X, $CurPos_Y))
Case $Mode2 And BitAND(GUICtrlRead($Mode2), $GUI_CHECKED) = $GUI_CHECKED
ConsoleWrite(StringFormat("MoveTo(2, %d, %d)\n", $CurPos_X, $CurPos_Y))
FileWriteLine("Waypoints.txt", StringFormat("MoveTo(2, %d, %d)\n" & @CRLF, $CurPos_X, $CurPos_Y))
Case $Mode3 And BitAND(GUICtrlRead($Mode3), $GUI_CHECKED) = $GUI_CHECKED
ConsoleWrite(StringFormat("MoveTo(3, %d, %d)\n", $CurPos_X, $CurPos_Y))
FileWriteLine("Waypoints.txt", StringFormat("MoveTo(3, %d, %d)\n" & @CRLF, $CurPos_X, $CurPos_Y))
EndSelect
EndFunc ;==>_GetCurPos
Func _Exit()
If GUICtrlRead($CheckBox) = 1 Then
$Delete = True
EndIf
If $Delete = True Then
FileDelete("Waypoints.txt")
EndIf
Exit
EndFunc ;==>_Exit
Func _Save()
If GUICtrlRead($CheckBox) = 1 Then
IniWrite("WPT.ini", "Misc", "0xFFFFFF", 1)
Else
IniWrite("WPT.ini", "Misc", "0xFFFFFF", 0)
EndIf
IniWrite("WPT.ini", "Misc", "WinName", GUICtrlRead($WindowName))
EndFunc ;==>_Save
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("TT6 Waypointer | <eF_Hacks>", 290, 315, 193, 125)
$Mode1 = GUICtrlCreateRadio("Mode 1", 112, 136, 113, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
$Mode2 = GUICtrlCreateRadio("Mode 2", 112, 160, 113, 17)
$Mode3 = GUICtrlCreateRadio("Mode 3", 112, 184, 113, 17)
$Label1 = GUICtrlCreateLabel("Hotkeys:", 128, 24, 62, 17)
$Label2 = GUICtrlCreateLabel("End = Exit", 120, 48, 100, 17)
$Label3 = GUICtrlCreateLabel("Insert = Write Position", 100, 72, 171, 17)
$Group2 = GUICtrlCreateGroup("", 16, 120, 257, 89)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group1 = GUICtrlCreateGroup("", 16, 15, 257, 97)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Save = GUICtrlCreateButton("Save Settings", 104, 280, 75, 25, 0)
$WindowName = GUICtrlCreateInput(IniRead("WPT.ini", "Misc", "WinName", "Window Name"), 88, 248, 121, 21)
$CheckBox = GUICtrlCreateCheckbox("Delete File after Exit?", 88, 216, 185, 17)
If IniRead("WPT.ini", "Misc", "0xFFFFFF", "0") = 1 Then
GUICtrlSetState(-1, $GUI_CHECKED)
EndIf
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
_Exit()
Case $Save
_Save()
EndSwitch
WEnd
6.3.2009 ; update.ini [Gw.exe] - __wadim ; 6.3.2009 - 7:18 [SECTION 9-A] AX = 0xa05710 AY = 0xa05714 TOWN_OUT_ID = 0xa06558 NO_NPC = 0xa072f4 DEATH = 0xa05794 MOUSE_COORDX = 0xa05da0 MOUSE_COORDY = 0xa05da4 CAMCOURSE = 0x00A05638 EX_AREA_ID = 0xa03038 EXPANDERA = 0xa05643 EXPANDERB = 0xa05642 LVL = 0xa03078 PVP_PVE = 0xa03084 PING = 0xa0049c INTERFACE = 0xa01af0 LOGIN = 0xa057b0 EMAIL = 0xa01af4 MOVETO_TARGET = 0xa05d84 MAPPLAYER = 0xa05d8c MAPTIME = 0xa05678 PNAME = 0xa004e8 STORAGE = 0xa02064 SELLBAGX = 0xa01fe8 MOUSEACTION = 0xa13100 MESSAGE = 0xa05de7 ; +4=y, +8=sizex, +12=sizey INVENTAR = 0xa02554 HERO = 0xa024c8 MMAP = 0xa025a4 PARTY = 0xa0261c CHEST = 0xa02568 ALLBAG = 0xa0257c GUILD = 0xa02534 SKILL = 0xa024f0 TRADE = 0xa02770 PARTYSEARCH = 0xa02638 MERCHANT = 0xa02798 MOVECHAR = 0xa05d6c ;+4=back, +8=left, +C=right, +10=tleft, +14=tright [SECTION D] POSX = 0xd28d1c POSY = 0xd28d20 CHECK_MAP = 0xd289b8 NPC_ID_NEAR = 0xd285c8 NPC_ID_SELECT = 0xd285a8 NPC_ID_MOUSE_SELECT = 0xd285b4 CLIENTPATH = 0xd29590