GWCA Script frage

02/03/2010 15:52 Thompsen#1
Arbeite grade an einem mini-script um Sweets zu benutzen, die Sterbemalus entfernen.
Es soll nur während dem "deathleveln" überprüfen ob ich am Leben bin und wenn das der Fall ist, eine Zuckerstange verwenden.

Code:
$SweetModel = 21488

#include <GWCAConstants.au3>
#include <NomadMemory.au3>
$cGUI = GUICreate("GWCA ")
GUIRegisterMsg(0x500, "WndCallback")


While 1
$cbType = "int"
CmdCB($CA_GETDEAD)
	If $cbVar[0] = 1 Then
Sleep(500)
Else 
	$cbType = "int"
	$ItemId = CmdCB($CA_FindItemByModelId, $SweetModel)	
	CmdCB($CA_UseItemById , $ItemId)
	sleep(50)
	CmdCB($CA_UseItemById , $ItemId)
EndIf
WEnd
Script wird zwar ausgeführt, tut aber im Endeffekt nichts, es wird angezeigt, dass es bei sleep(50) steht und das dauerhaft.

Bin nicht grade erfahren mit Autoit und Gwca

Was ist falsch?

Danke
02/03/2010 22:55 kknb#2
bin mir net sicher ob es so geht, hab kein gw zum testen und hab auch kein plan von gwca.

Code:
$SweetModel = 21488

#include <GWCAConstants.au3>
#include <NomadMemory.au3>
$cGUI = GUICreate("GWCA ")
GUIRegisterMsg(0x500, "WndCallback")


While 1
$cbType = "float"
CmdCB($CA_GetMyMaxHP)
	If $cbVar[1] = 0 Then
		do
			sleep(50)
			CmdCB($CA_GetMyMaxHP)
			$hp = $CBVar[1]
		until $hp <> 0
		$cbType = "int"
		$ItemId = CmdCB($CA_FindItemByModelId, $SweetModel)
		if $ItemId[0] <> 0 Then
			Cmd($CA_UseItemById , $ItemId[0])
			sleep(50)
		EndIf
	EndIf
sleep(500)
WEnd
02/04/2010 07:02 Neon™#3
Code:
$SweetModel = 21488

#include <GWCAConstants.au3>
#include <NomadMemory.au3>
$cGUI = GUICreate("GWCA ")
GUIRegisterMsg(0x500, "WndCallback")


While 1
$cbType = "float"
CmdCB($CA_GetHP, -2)
	If $cbVar[0] = 0 Then
		do
			sleep(50)
			CmdCB($CA_GetHP, -2)
		until $cbVar[0]<> 0
		$cbType = "int"
		$ItemId = CmdCB($CA_FindItemByModelId, $SweetModel)
		if $ItemId[0] <> 0 Then
			Cmd($CA_UseItemById , $ItemId[0])
			sleep(50)
		EndIf
	EndIf
sleep(500)
WEnd
So sollte es eigentlich laufen...
02/04/2010 16:18 Thompsen#4
Klappt.
Danke für die Hilfe