Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 13:09

  • Please register to post and access all features, it's quick, easy and FREE!


hp/mp taker

Discussion on hp/mp taker within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: May 2010
Posts: 108
Received Thanks: 41
hp/mp taker

Ich bin in Sachen Autoit etwas eingerostet..ok..aber wieso funktioniert das nicht oder komm ich einfach nur nicht drauf ?
Vielleicht habt ihr ne andere Methode das umzusetzten..
der Sinn sollte klar sein; nach den HP/MP bars suchen, ggf. item wechseln und dann nutzen.
Code:
#comments-start

	Author : Pad
	Version : 1.0
	Kommentare :	HP/MP taker

#comments-end

AutoItSetOption("SendKeyDownDelay", 100)
HotKeySet("{NUMPAD5}", "_an_aus")
HotKeySet("{NUMPAD1}", "_register_bars")
HotKeySet("{NUMPAD2}", "_register_item")
HotKeySet("{NUMPAD9}", "_exit")
Global $an_aus = 0
Global $hp_color = 0x622929
Global $hp_item_color = 0xF7F2A5
Global $mp_color = 0x1C1C44
Global $mp_item_color = 0xD4F9FC

While 1
	Sleep(200)
WEnd

Func _an_aus()
	If $an_aus = 0 Then
		AdlibRegister("_main", 250)
		$an_aus = 1
	Else
		AdlibUnRegister("_main")
		$an_aus = 0
	EndIf
EndFunc

Func _register_bars()
	Global $wdw = WinActive("[CLASS:FDPclass]")
	Global $mouse = MouseGetPos()
EndFunc

Func _register_item()
	Global $mouse2 = MouseGetPos()
EndFunc

Func _main()
	#Region 	*** check HP_bar ***
	PixelSearch($mouse[0]-50, $mouse[1]-50, $mouse[0]+50, $mouse[1]+50, $hp_color)
	If @error Then
;					check item
		PixelSearch($mouse2[0]-50, $mouse2[1]-50, $mouse2[0]+50, $mouse2[1]+50, $hp_item_color)
		If @error Then
;						change item
			ControlSend("DARK SOULS III", "", $wdw, "{DOWN}")
			Sleep(500)
;						check item
			PixelSearch($mouse2[0]-50, $mouse2[1]-50, $mouse2[0]+50, $mouse2[1]+50, $hp_item_color)
			If not @error Then
;							take potion
				ControlSend("DARK SOULS III", "", $wdw, "r")
			EndIf
		Else
;						take potion
			ControlSend("DARK SOULS III", "", $wdw, "r")
		EndIf
	EndIf
	#EndRegion 	*** check HP_bar ***
	Sleep(200)
	#Region		*** check MP_bar ***
	PixelSearch($mouse[0]-0, $mouse[1]-0, $mouse[0]+50, $mouse[1]+3, $mp_color)
	If @error Then
;					check item
		PixelSearch($mouse2[0]-50, $mouse2[1]-50, $mouse2[0]+50, $mouse2[1]+50, $mp_item_color)
		If @error Then
;						change item
			ControlSend("DARK SOULS III", "", $wdw, "{DOWN}")
			Sleep(500)
;						check item
			PixelSearch($mouse2[0]-50, $mouse2[1]-50, $mouse2[0]+50, $mouse2[1]+50, $mp_item_color)
			If not @error Then
;							take potion
				ControlSend("DARK SOULS III", "", $wdw, "r")
			EndIf
		Else
;						take potion
			ControlSend("DARK SOULS III", "", $wdw, "r")
		EndIf
	EndIf
	#EndRegion	*** check MP_bar ***
EndFunc

Func _exit()
	Exit
EndFunc
nur [c]Send[/c] geht auch nicht

Edit: komm ich so vielleicht weiter oder lauf ich da auch ins leere ?



checker0899 is offline  
Old 05/16/2019, 18:05   #2
 
elite*gold: 0
Join Date: Apr 2011
Posts: 261
Received Thanks: 90
First you should check if you can send key strokes or mouse click events, if not then input may be blocked by antihack or sth.
Also check if you can perform a pixel search, with autoitwindow info if you search for a color check that isn't black, some antihack prevent pixel search too
elmarcia is offline  
Thanks
1 User
Reply


Similar Threads
Gk Mini Pub v.2.1 - PUBLIC LIFE TAKER - OPK - TELE-KILL - WEAPON SHOP + .DLL!
02/11/2012 - Combat Arms Hacks, Bots, Cheats & Exploits - 34 Replies
Gk Mini Pub v.2.1 - PUBLIC LIFE TAKER - OPK - TELE-KILL - WEAPON SHOP + .DLL! ok guys no fucking loader on this ! Gk Mini Public V.2.1 // News / Updates \\ - We are very sorry about the loader, our system was not 100% working for all OS'S users. We have posted the .dll download it and use recommended injector by Vizod & Try Soul .dll Error Fixer For Free. Thanks For Waiting. ------------------------------------------------------------------
I need life taker hack
10/27/2011 - Combat Arms Hacks, Bots, Cheats & Exploits - 4 Replies
I need life takers hacks. Thanks.
'~[Habbo Taker billiq]~'
04/18/2011 - Trading - 1 Replies
Hei, kurz und knapp: Ich verkaufe meine Habbo Taler und verlange nur 10€ für 180Taler - 200Taler! Das ist das billiqste Angebot was ihr hier finden könnt, also bei Interesse per pn oder hier im Thread melden.



All times are GMT +2. The time now is 13:09.


Powered by vBulletin®
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

BTC: 3KeUpz52VCbhmLwuwydqxu6U1xsgbT8YT5
ETH: 0xc6ec801B7563A4376751F33b0573308aDa611E05

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2019 elitepvpers All Rights Reserved.