Porte Clés Act 2
#1
Posté 10 March 2013 - 14:02
j'ai testé toutes les manip décrite dans le post Act2 oasis Dahlgur, et malgrés tout je n'arrive pas le faire taper le porte clé. Pouvez vous m'aider ?
Merci
#2
Posté 10 March 2013 - 21:20
yop !
Dans la fonction Attack() (dans le toolkit.au3 ^^)
Rajoutez or StringInStr($item[1],"dunedervish_") Then dans la ligne avec If checkFromList
donc cette ligne:If checkFromList($monsterList, $item[1]) And $item[6] <> -1 And $item[9] < $range Or (checkFromList($monsterList, $item[1]) And (StringInStr($item[1], "brickhouse_") Or StringInStr($item[1], "goblin") Or StringInStr($item[1], "woodwraith_")) And $item[9] < $range) Then
devient:If checkFromList($monsterList, $item[1]) And $item[6] <> -1 And $item[9] < $range Or (checkFromList($monsterList, $item[1]) And (StringInStr($item[1], "brickhouse_") Or StringInStr($item[1], "goblin") Or StringInStr($item[1], "woodwraith_") Or StringInStr($item[1],"dunedervish_")) And $item[9] < $range) Then
Enjoy
P.S:j'ai ajouté ça dans ma monsterlist=SnakeMan|DuneDervish_B_Unique_Uber|DuneDervish_|DuneDervish_A|DuneDervish-B|DuneDervish_C
J'imagine qu'ils sont pas tous nécessaire mais j'ai pas eu le temps de tester lequel suffisait.
Et voilà.
#3
Posté 11 March 2013 - 11:18
#4
Posté 11 March 2013 - 11:40
tu as essayé de rajouter "dunedervish_" dans le specialmonsterList du fichier settings.ini
(qui semble être consulté dans la fonction Is_Mob($item) de toolkit.au3)
++Mathieu
#5
Posté 11 March 2013 - 21:44
merci
#6
Posté 12 March 2013 - 16:34
gmsMath, oui je l'ai mis mais sans effet. je comprends pas.
merci
bonjour,
question bête sorry, lances-tu l'application via l'exe (pas bien)? ou bien un run sur le fichier .au3 pour que les modifs de code soient prises en compte (bien)?
#7
Posté 12 March 2013 - 19:10
il n'attaque aucun dervish bien que tous soient dans le settings.
si qq'un a un settings qui marche svp?
#8
Posté 12 March 2013 - 19:57
ben je lance la 7.2 via une compilation du script (main) que j'ai fait en x64. du coup je lance le main Application. le reste me fait une erreur de ce genre line 2673 file c:\Users etc Endfunc Erroe: "If" statement has no matching "Endif" statement.
ça vient de ça ? O
#9
Posté 12 March 2013 - 20:07
Pour une meilleure lisibilité des posts, merci de poster vos settings et grablist entre spoiler !
[spoiler]Votre Texte ici[/spoiler]
Si un commentaire vous est utile, pensez à cliquer le bouton (+)
#10
Posté 12 March 2013 - 21:14
#11
Posté 13 March 2013 - 08:03
#12
Posté 13 March 2013 - 12:38
voila
ce toolkit est d'origine, j'ai touché a quelque truc pour faire des essaies, mais j'ai ce message depuis que je l'ai téléchargé. si je remet un complètement d'origine je peux pas lancer le programme sans creer un script comme dit plus haut.
merci de m'aider
EndIf
EndFunc ;==>Attack <---- c'est la ligne 2673
Func DetectElite($Guid)
Return _MemoryRead(GetACDOffsetByACDGUID($Guid) + 0xB8, $d3, 'int')
EndFunc ;==>DetectElite
;;--------------------------------------------------------------------------------
;; KillMob()
;;--------------------------------------------------------------------------------
Func KillMob($name, $offset, $Guid)
$return = True
$begin = TimerInit()
#13
Posté 14 March 2013 - 21:55
merci
#14
Posté 14 March 2013 - 23:39
#15
Posté 17 March 2013 - 09:33
Func Attack()
If _playerdead_revive() Then
Return
EndIf
If _playerdead() Or ($GameFailed = 1) Then
$GameFailed = 1
_log("Return Cuz : If _playerdead or gamefailed ")
Return
EndIf
Local $IgnoreList = ""
Local $item[10]
Dim $test_iterateallobjectslist = IterateFilterAttack($IgnoreList)
If IsArray($test_iterateallobjectslist) Then
While IsArray($test_iterateallobjectslist)
If _playerdead_revive() Then
ExitLoop
EndIf
If _playerdead() Or ($GameFailed = 1) Then
$GameFailed = 1
_log("Return Cuz : If _playerdead or gamefailed ")
ExitLoop
EndIf
For $i = 0 To 9
$item[$i] = $test_iterateallobjectslist[0][$i]
Next
If Is_Interact($item, $IgnoreList) Then
If Is_Shrine($item) Then
handle_Shrine($item)
ElseIf Is_Mob($item) Then
handle_Mob($item, $IgnoreList, $test_iterateallobjectslist)
ElseIf Is_Loot($item) Then
handle_Loot($item, $IgnoreList, $test_iterateallobjectslist)
EndIf
EndIf
Dim $buff_array = UpdateArrayAttack($test_iterateallobjectslist, $IgnoreList)
Dim $test_iterateallobjectslist = $buff_array
WEnd
EndIf
EndFunc ;==>Attack
Func DetectElite($Guid)
Return _MemoryRead(GetACDOffsetByACDGUID($Guid) + 0xB8, $d3, 'int')
EndFunc ;==>DetectElite
;;--------------------------------------------------------------------------------
;; KillMob()
;;--------------------------------------------------------------------------------
Func KillMob($name, $offset, $Guid)
$return = True
$begin = TimerInit()
Dim $pos = UpdateObjectsPos($offset)
$Coords = FromD3toScreenCoords($pos[0], $pos[1], $pos[2])
MouseMove($Coords[0], $Coords[1], 3)
$elite = DetectElite($Guid)
;loop the attack until the mob is dead
_log("Attacking : " & $name & "; Type : " & $elite);
While IterateActorAtribs($Guid, $Atrib_Hitpoints_Cur) > 0
$myposs_aff = getcurrentpos()
If _playerdead_revive() Then
$return = False
ExitLoop
EndIf
If $gestion_affixe = "true" Then maffmove($myposs_aff[0], $myposs_aff[1], $myposs_aff[2])
Dim $pos = UpdateObjectsPos($offset)
$Coords = FromD3toScreenCoords($pos[0], $pos[1], $pos[2])
MouseMove($Coords[0], $Coords[1], 3)
GestSpellcast($pos[3], 1, $elite)
If TimerDiff($begin) > $a_time Then
$killtimeout += 1
; after this time, the mob should be dead, otherwise he is probly unkillable
$return = False
ExitLoop
EndIf
WEnd
Return $return
EndFunc ;==>KillMob
;;--------------------------------------------------------------------------------
;; Grabit()
;;------------------------------------
bon dimanche a tous
#16
Posté 20 March 2013 - 09:50
Pourrais tu ouvrir Scite en tant qu'administrateur ouvrir le fichier main.au3 et lancer le bot par là (en appuyant sur F5 - tu l'arrètes en appuyant sur F2)
Tu devrais avoir des logs plus détaillés.
++Mathieu
#17
Posté 12 April 2013 - 13:53
yop !
Dans la fonction Attack() (dans le toolkit.au3 ^^)
Rajoutez or StringInStr($item[1],"dunedervish_") Then dans la ligne avec If checkFromList
donc cette ligne:If checkFromList($monsterList, $item[1]) And $item[6] <> -1 And $item[9] < $range Or (checkFromList($monsterList, $item[1]) And (StringInStr($item[1], "brickhouse_") Or StringInStr($item[1], "goblin") Or StringInStr($item[1], "woodwraith_")) And $item[9] < $range) Then
devient:If checkFromList($monsterList, $item[1]) And $item[6] <> -1 And $item[9] < $range Or (checkFromList($monsterList, $item[1]) And (StringInStr($item[1], "brickhouse_") Or StringInStr($item[1], "goblin") Or StringInStr($item[1], "woodwraith_") Or StringInStr($item[1],"dunedervish_")) And $item[9] < $range) Then
Enjoy
P.S:j'ai ajouté ça dans ma monsterlist=SnakeMan|DuneDervish_B_Unique_Uber|DuneDervish_|DuneDervish_A|DuneDervish-B|DuneDervish_C
J'imagine qu'ils sont pas tous nécessaire mais j'ai pas eu le temps de tester lequel suffisait.
Et voilà.
bonjour je ne trouve pas ces ligne dans mon toolkit malgré la fonction recherche, quelqu'un sait a quel numéro de ligne je dois rajouté sa ? j'utilise la version 7.2
#18
Posté 12 April 2013 - 15:05
#19
Posté 12 April 2013 - 15:18
#20
Posté 12 April 2013 - 15:23
Pour les poiler c'est [*spoiler] tu ecrit ton texte [*/spoiler] mais tu enleve les * sinon tu peux me l'envoyé par MP
Merci alors malheuresement je viens de verifier et les modif ne marche pas pour l'acte 2 mais seulement pour l'acte 1 etrange ... je crois que c'est parce qu'il "vol" du coup il faut rajouter quelque chose desolee ...


Ce sujet est fermé

