Gracias por el aporte
Gracias por el aporte
Hola.
De la macro de domar que consta de 2 partes no me funciona bien ya que siempre se queda corriendo y no doma, alguna solucion por favor.
Gracias
set %tiempo 180 ; Cada cuántos segundos va a comprobar si tiene hambre.
set %comida RGG_NRD_QSD_ZBG_WLI_QRD_END_FUD_YLI_WLI_HGI_KGI_EG I_QLI_KLI_MLI_KRD_HQD_AQD_MQE_VQE_TQE_JQE_IQE_GQE_ SPE_ZPE_OQE_BDF_KPE_RQE_YSD_SQD_YWI_AXI_PQD_QQD_
set %tiempo_actual #SCNT
set %proxima_vez %tiempo_actual + %tiempo
;
; ****************** MACRO ******************
;
event SysMessage TammingGenius by Nilaween
event SysMessage Intentando acudir a la ultima posicion. Por favor, ayudame a llegar.
chooseskill Anim real
ignoreitem *bloqueados
goto movimiento
INICIO:
set *posicion *posicion + 1
nuevotarget:
if #hits < #maxhits
{
msg guards $
wait 5s
}
set %fail 0
set %intentos 3
set %distancia 19
set #LTARGETID #CHARID
finditem * G_25
for #FINDINDEX 1 #FINDCNT
{
if #FINDREP <> 3 2
ignoreitem #FINDID
set *bloqueados *bloqueados , _ , #FINDID
if #FINDREP = 3 && #FINDID notIn %recientameados && #FINDDIST < %distancia && #FINDX < 755 2
set #LTARGETID #FINDID
set %distancia #FINDDIST
}
if #LTARGETID = #CHARID
goto movimiento
event PROPERTY #LTARGETID
if ( OSO in #PROPERTY && #SKILL < 601 ) || SERPIENTE in #PROPERTY || HORRENDO in #PROPERTY 2
set %recientameados %recientameados , _ , #LTARGETID
goto nuevotarget
set #LTARGETKIND 1
finditem #LTARGETID
repitiendotarget:
if #hits < #maxhits
{
msg guards $
wait 5s
}
event macro 13 35
target
event macro 22 0
set %tiempoespera #SYSTIME + 16000
set %jEnd #JINDEX
escaneando:
repeat
if #hits < #maxhits
{
msg guards $
wait 5s
}
if %tiempoespera < #SYSTIME
goto repitiendotarget
gosub seguir
until %jEnd <> #JINDEX
set %jStart %jEnd + 1
set %jEnd #JINDEX
for %i %jStart %jEnd
{
scanjournal %i
if TE_ACEPTA in #JOURNAL || TU_HABILIDAD_EN_LA_DOMA_NO_ES in #JOURNAL || %fail > 5 3
msg all release$
set %recientameados %recientameados , _ , #LTARGETID
goto nuevotarget
if YA_ESTA in #JOURNAL || NO_PUEDE_SER in #JOURNAL || NO_PUEDES_DOMAR in #JOURNAL || GET_THERE in #JOURNAL || %intentos <= 0 3
set *bloqueados *bloqueados , _ , #LTARGETID
ignoreitem #LTARGETID
goto nuevotarget
if NO_PUEDES_VER in #JOURNAL || SEE_THE_TARGET in #JOURNAL || UNEXPECTED_TARGET in #JOURNAL || FUERA_DE_TU in #JOURNAL 3
set %fail %fail + 1
gosub seguir
goto repitiendotarget
if ESTAS_DEMASIADO_LEJOS in #JOURNAL 3
gosub seguir
wait 10
goto repitiendotarget
if NO_CONSIGUES_DOMAR_EL in #JOURNAL 2
set %intentos %intentos + 1
goto repitiendotarget
}
goto escaneando
;************************************************************************************************* *******
; Rutina para, en caso de hambre, comer hasta saciarse
;************************************************************************************************* *******
sub comprobarcomida
{
wait 2s
set %jrnl #jindex
msg .hungry $
wait 2s
while #true
{
if #jindex > %jrnl
{
set %jrnl %jrnl + 1
scanjournal %jrnl
if Estas_en_inanicion in #journal || Estas_hambriento in #journal || Sientes_mucho in #journal || Estas_con_hambre in #journal || Estas_parcialmente in #journal || Estas_bien_lleno in #journal || Te_sientes_casi_lleno in #journal
{
event sysmessage Comiendo...
finditem %comida C_ , #backpackid
set #lobjectid #findid
event macro 17
wait 2s
gosub comprobarcomida
}
}
else
{
set %proxima_vez %tiempo_actual + %tiempo
return
}
}
return
}
sub seguir
if #hits < #maxhits
{
msg guards $
wait 5s
}
if %tiempopathfind > #SYSTIME && %tiempopathfind <> N/A
return
set %tiempopathfind #SYSTIME + 2000
finditem #LTARGETID
if #FINDKIND <> -1 && #FINDDIST > 4
event pathfind #FINDX #FINDY #FINDZ
return
MOVIMIENTO:
if #hits < #maxhits
{
msg guards $
wait 5s
}
set %tiempo_actual #SCNT
if %proxima_vez <= %tiempo_actual
{
gosub comprobarcomida
}
set %nuevaronda 1
goto *posicion
0:
move 636 866
set * . #TIME #TIME
goto INICIO
1:
move 646 915
goto INICIO
2:
move 568 919
goto INICIO
3:
move 547 875
goto INICIO
4:
move 510 838
goto INICIO
5:
move 450 860
goto INICIO
6:
move 439 894
goto INICIO
7:
move 366 957
goto INICIO
8:
move 306 1000
goto INICIO
9:
move 343 1030
goto INICIO
10:
move 408 1024
goto INICIO
11:
move 491 963
goto INICIO
12:
move 536 984
goto INICIO
13:
move 514 1065
goto INICIO
14:
move 484 1102
goto INICIO
15:
move 506 1153
goto INICIO
16:
move 538 1130
goto INICIO
17:
move 552 1065
goto INICIO
18:
move 576 1037
goto INICIO
19:
move 615 1017
goto INICIO
20:
move 636 963
goto INICIO
21:
move 602 934
goto INICIO
22:
move 682 907
move 721 925
set *posicion -1
deletevar recientameados
goto INICIO
yo subi con esta,prueba suerte
Twitter: @Nevil_Gamer
Gracias Nevil.
No se que le sucede que tamea uno y se vuelve a la posición inicial y se queda parado.