tool tự bơm máu + mana

A

anonymouse

Youtube Master Race
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 : http://www.megaupload.com/?d=OXDLF9HX
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
Click to expand...

Hạn chế : Chương trình chỉ chạy khi của sổ Maplestory được Activate, nếu bị deactivate thì chết toi ráng chịu nha :))
 
đã bị ban mấy cái nick rồi thế bạn trẻ :-?

chỉ cách bypass hackshield luôn nhé
 
sặc !
hack đâu mà ban .............
Hook đâu mà bị Hshied nó kill .......
.
___________Auto Merge________________

.
fix lỗi kẹt phím alt, shift, ctrl
exe file : http://megaupload.com

Mã: 
$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_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)
			ExitLoop
		case $_TRAY_AutoHP
			$ENABLE_AUTOHP = not $ENABLE_AUTOHP
		case $_TRAY_AutoMP
			$ENABLE_AUTOMP = not $ENABLE_AUTOMP
		case $_TRAY_HELP
			TrayItemSetState($_TRAY_HELP, 4)
			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"+"{LCTRL UP}"+"{LSHIFT UP}"+"{LALT UP}"+"{RCTRL UP}"+"{RSHIFT UP}"+"{RALT UP}")
		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}"+"{LCTRL UP}"+"{LSHIFT UP}"+"{LALT UP}"+"{RCTRL UP}"+"{RSHIFT UP}"+"{RALT UP}")
		sleep(5)
	EndIf
EndFunc

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

func _Get_MP_POINT()
	$pos=MouseGetPos()
	$xMP = $pos[0]
EndFunc
 
Người đi đâu là chú lái tầu\m/
( Đồng chí nào thử đê)
Chuột bạch đâu \m/
 
bỏ tí xiền ra mua pet equip cho nó lành. Mà trên thực tế thì cũng ko cần cái auto này lắm, chỉ có đi Zakum mà có thì cũng tốt hơn tí.
 
He he, hồi trước em cũng có đú đởn bên box thư giãn nên cũng đc tí, nhưng mà giờ thì chán rồi, chả buồn đú nữa :))
kể ra mà chơi từ đấy đến giờ chắc cũng đc vài cái vương miện rùi.
 
You must log in or register to reply here.
Back
Top