mới ra job4 . Back VMS chơi cho vui . Mới viết ra cái tool này anh em nhà nghèo ko có pet thì down về xài tạm đi
file exe : [Only registered and activated users can see links. ]
File sạch nếu sợ virus thì down autoit về combine thành file exe mà dùng
code :
$list=ProcessList(@ScriptName)
if $list[0][0]>=2 Then Exit

#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
;design by 67qt
Opt("TrayMenuMode",1)
HotKeySet("{NUMPADMULT}","_Get_HP_POINT")
HotKeySet("{NUMPADSUB}", "_Get_MP_POINT")
Global $ENABLE_AUTOHP=False, $ENABLE_AUTOMP=False
Global $xHP=292, $xMP=340

$_TRAY_SETTING = TrayCreateItem("setting")
TrayCreateItem("")
$_TRAY_AutoHP = TrayCreateItem("Auto HP")
$_TRAY_AutoMP = TrayCreateItem("Auto MP")
TrayCreateItem("")
$_TRAY_HELP = TrayCreateItem("Help")
$_TRAY_EXIT = TrayCreateItem("Exit")
TraySetState()
TraySetClick(16)

While 1
$tMSG=TrayGetMsg()
Switch $tMSG
Case $_TRAY_EXIT
TrayItemSetState($_TRAY_EXIT, 4) ; uncheck
ExitLoop
Case $_TRAY_SETTING
TrayItemSetState($_TRAY_SETTING, 4) ; uncheck
case $_TRAY_AutoHP
$ENABLE_AUTOHP = not $ENABLE_AUTOHP
case $_TRAY_AutoMP
$ENABLE_AUTOMP = not $ENABLE_AUTOMP
case $_TRAY_HELP
TrayItemSetState($_TRAY_SETTING, 4) ; uncheck
MsgBox(0,""," Cong cu tu dong bom HP/MP cho GAME MapleStory"&@CRLF&@crlf&"Chon Auto POTS ma ban can tu menu khay he thong "&@CRLF&@crlf&"Vao game "&@CRLF&" - Dat HP pots len phim 1"&@CRLF&" - Dat MP pots len phim END"&@CRLF&" - Re chuot den vi tri can bom tren thanh mau roi bam phim * ben phai ban phim de danh dau vi tri bom mau "&@CRLF&" - Re chuot den vi tri can bom tren thanh mana roi bam phim - ben phai ban phim de danh dau vi tri bom mana "&@CRLF&@crlf&@crlf&" Design by 67QT - Chuc cac ban vui ve")
EndSwitch
trainning()
WEnd

func trainning()
if Not WinActive("MapleStory") then return -1
if (PixelGetColor( $xHP, 588)==0xBDBEBD or PixelGetColor( $xHP-1, 588)==0xBDBEBD or PixelGetColor( $xHP+1, 588)==0xBDBEBD) and $ENABLE_AUTOHP Then
Send("1")
sleep(5)
EndIf
if (PixelGetColor( $xMP, 588)==0xBDBEBD or PixelGetColor( $xMP-1, 588)==0xBDBEBD or PixelGetColor( $xMP+1, 588)==0xBDBEBD) and $ENABLE_AUTOMP Then
send("{END}")
sleep(5)
EndIf
EndFunc

func _Get_HP_POINT()
$pos=MouseGetPos()
$xHP = $pos[0]
EndFunc

func _Get_MP_POINT()
$pos=MouseGetPos()
$xMP = $pos[0]
EndFunc