Macros Joseph

[Joseph]

Ya sé que muchos no os lo merecéis.. xdd, pero aún así voy a crear este post... Iré colgando las macros que pidáis y que estén dentro de mis posibilidades, voy a empezar por la de alquimia, cualquier duda preguntarla, xdd

;===========================
; Macro: Alquimia
; Autor: JoSePh
; EasyUO 1.5, V.202
; Servidor: Ultima Alianza
; Cliente: 7.0.8.2
;===========================
=========CONFIGURAR=========
set %resistencia 1
set %curacion 1
set %fuerza 1
set %vmenor 1
set %vmortal 1
set %encoger 1
set %invisibilidad 1
set %bolsa_barriles_botellas KGTMTND
set %bolsa_barriles_completos CSFJTND
set %estanteria_regs TPYZUND
=============================
set %comida PQD_MQE_FUD_OQE_YRD_YWI_AXI_VQE_BDF
+_TQE_KPE_QQD_RQE_SQD_SPE_JQE_ZPE_IQE_YSD_GQE_HND
set %regs KZF_WZF_JZF_JUF_RZF_SZF_MZF_KUF_IUF_QZF
set %botellas WUF
set %barril QMJ_YBK_XBK
set %tipo 0
display Comienza la Macro!!
initevents
inicio:
if %curacion = 1
{
gosub comer
gosub ordenar
gosub curacion
}
if %fuerza = 1
{
gosub comer
gosub ordenar
gosub fuerza
}
if %resistencia = 1
{
gosub comer
gosub ordenar
gosub resistencia
}
if %vmenor = 1
{
gosub comer
gosub ordenar
gosub vmenor
}
if %vmortal = 1
{
gosub comer
gosub ordenar
gosub vmortal
}
if %encoger = 1
{
gosub comer
gosub ordenar
gosub encoger
}
if %invisibilidad = 1
{
gosub comer
gosub ordenar
gosub invisibilidad
}
goto inicio
sub comer ;<=========================>
finditem %comida C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
return
sub ordenar ;<========================>
repeat
finditem %barril C_ , #BACKPACKID
if #FINDKIND <> -1
{
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
else
ignoreitem #FINDID
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if frascos in #PROPERTY
{
exevent drag #FINDID #FINDSTACK
exevent dropc %bolsa_barriles_botellas
wait 20
}
}
else
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if curacion in #PROPERTY
{
finditem %barril C_ , %bolsa_barriles_botellas
event property #FINDID
if curacion in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
event property #FINDID
if curacion in #PROPERTY
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
}
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
}
}
else
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if fuerza in #PROPERTY
{
finditem %barril C_ , %bolsa_barriles_botellas
event property #FINDID
if fuerza in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
event property #FINDID
if fuerza in #PROPERTY
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
}
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
}
}
else
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if resistencia in #PROPERTY
{
finditem %barril C_ , %bolsa_barriles_botellas
event property #FINDID
if resistencia in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
event property #FINDID
if resistencia in #PROPERTY
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
}
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
}
}
else
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if Menor in #PROPERTY
{
finditem %barril C_ , %bolsa_barriles_botellas
event property #FINDID
if Menor in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
event property #FINDID
if Menor in #PROPERTY
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
}
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
}
}
else
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if mortal in #PROPERTY
{
finditem %barril C_ , %bolsa_barriles_botellas
event property #FINDID
if mortal in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
event property #FINDID
if mortal in #PROPERTY
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
}
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
}
}
else
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if encoger in #PROPERTY
{
finditem %barril C_ , %bolsa_barriles_botellas
event property #FINDID
if encoger in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
event property #FINDID
if encoger in #PROPERTY
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
}
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
}
}
else
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if invisibilidad in #PROPERTY
{
finditem %barril C_ , %bolsa_barriles_botellas
event property #FINDID
if invisibilidad in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
event property #FINDID
if invisibilidad in #PROPERTY
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
}
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
}
}
else
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
repeat
finditem %botellas C_ , #BACKPACKID
if #FINDKIND <> -1
{
finditem %barril C_ , %bolsa_barriles_botellas
event property #FINDID
if vacio in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
}
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
return
sub regs ;<========================>
regs:
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 335 274
target
finditem %regs C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
finditem %regs C_ , #BACKPACKID
if #FINDSTACK > 0
goto regs
key esc
return
sub barriles ;<========================>
repeat
finditem %barril C_ , #BACKPACKID
if #FINDKIND <> -1
{
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
}
until #FINDKIND = -1
if %tipo = 1
{
repeat
finditem %barril C_ , %bolsa_barriles_botellas
if #FINDKIND <> -1
{
event property #FINDID
if curacion in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
gosub llenar_barril
return
}
}
ignoreitem #FINDID
until #FINDKIND = -1
}
ignoreitem reset
if %tipo = 2
{
repeat
finditem %barril C_ , %bolsa_barriles_botellas
if #FINDKIND <> -1
{
event property #FINDID
if fuerza in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
gosub llenar_barril
return
}
}
ignoreitem #FINDID
until #FINDKIND = -1
}
ignoreitem reset
if %tipo = 3
{
repeat
finditem %barril C_ , %bolsa_barriles_botellas
if #FINDKIND <> -1
{
event property #FINDID
if resistencia in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
gosub llenar_barril
return
}
}
ignoreitem #FINDID
until #FINDKIND = -1
}
ignoreitem reset
if %tipo = 4
{
repeat
finditem %barril C_ , %bolsa_barriles_botellas
if #FINDKIND <> -1
{
event property #FINDID
if menor in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
gosub llenar_barril
return
}
}
ignoreitem #FINDID
until #FINDKIND = -1
}
ignoreitem reset
if %tipo = 5
{
repeat
finditem %barril C_ , %bolsa_barriles_botellas
if #FINDKIND <> -1
{
event property #FINDID
if mortal in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
gosub llenar_barril
return
}
}
ignoreitem #FINDID
until #FINDKIND = -1
}
ignoreitem reset
if %tipo = 6
{
repeat
finditem %barril C_ , %bolsa_barriles_botellas
if #FINDKIND <> -1
{
event property #FINDID
if encoger in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
gosub llenar_barril
return
}
}
ignoreitem #FINDID
until #FINDKIND = -1
}
ignoreitem reset
if %tipo = 7
{
repeat
finditem %barril C_ , %bolsa_barriles_botellas
if #FINDKIND <> -1
{
event property #FINDID
if invisibilidad in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
gosub llenar_barril
return
}
}
ignoreitem #FINDID
until #FINDKIND = -1
}
ignoreitem reset
repeat
finditem %barril C_ , %bolsa_barriles_botellas
if #FINDKIND <> -1
{
event property #FINDID
if vacio in #PROPERTY
{
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
ignoreitem reset
gosub llenar_barril
return
}
}
ignoreitem #FINDID
until #FINDKIND = -1
ignoreitem reset
return
sub llenar_barril ;<========================>
repeat
finditem %botellas C_ , #BACKPACKID
event property #FINDID
if frascos in #PROPERTY
{
exevent drag #FINDID #FINDSTACK
exevent dropc %bolsa_barriles_botellas
wait 20
}
else
{
ignoreitem #FINDID
}
until #FINDKIND = -1
ignoreitem reset
wait 10
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botellas C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 20
scanjournal
if lleno in #JOURNAL
{
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_completos
wait 20
gosub barriles
}
wait 10
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_botellas
wait 20
return
sub curacion ;<========================>
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
;ginseng
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 24 98
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 1
goto ciclo
click 208 108 r
curacion:
wait 10
finditem %botellas C_ , %bolsa_barriles_botellas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %regs C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 190
wait 10
click 270 150
wait 4s
finditem %regs C_ , #BACKPACKID
if #FINDSTACK < 7
{
set %tipo 1
gosub barriles
return
}
goto curacion
sub fuerza ;<========================>
ciclo2:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
;mandrake
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 24 113
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 1
goto ciclo2
click 208 108 r
fuerza:
wait 10
finditem %botellas C_ , %bolsa_barriles_botellas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %regs C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 130
wait 10
click 270 170
wait 4s
finditem %regs C_ , #BACKPACKID
if #FINDSTACK < 5
{
set %tipo 2
gosub barriles
return
}
goto fuerza
sub resistencia ;<========================>
ciclo3:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
;black-pearl
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 24 52
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 1
goto ciclo3
click 208 108 r
resistencia:
wait 10
finditem %botellas C_ , %bolsa_barriles_botellas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %regs C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 150
wait 10
click 270 130
wait 4s
finditem %regs C_ , #BACKPACKID
if #FINDSTACK < 6
{
set %tipo 3
gosub barriles
return
}
goto resistencia
sub vmenor ;<========================>
ciclo4:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
;nigtshade
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 24 132
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 1
goto ciclo4
click 208 108 r
vmenor:
wait 10
finditem %botellas C_ , %bolsa_barriles_botellas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %regs C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 210
wait 10
click 270 110
wait 4s
finditem %regs C_ , #BACKPACKID
if #FINDSTACK < 1
{
set %tipo 4
gosub barriles
return
}
goto vmenor
sub vmortal ;<========================>
ciclo5:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
;nigtshade
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 24 132
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 1
goto ciclo5
click 208 108 r
vmortal:
wait 10
finditem %botellas C_ , %bolsa_barriles_botellas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %regs C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 210
wait 10
click 270 170
wait 4s
finditem %regs C_ , #BACKPACKID
if #FINDSTACK < 8
{
set %tipo 5
gosub barriles
return
}
goto vmortal
sub encoger ;<========================>
ciclo6:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
;alas murcielago
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 24 353
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 1
goto ciclo6
click 208 108 r
encoger:
wait 10
finditem %botellas C_ , %bolsa_barriles_botellas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %regs C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 270
wait 10
click 270 170
wait 4s
finditem %regs C_ , #BACKPACKID
if #FINDSTACK < 2
{
set %tipo 6
gosub barriles
return
}
goto encoger
sub invisibilidad ;<========================>
ciclo7:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
;sangre de dragon
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 24 444
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 1
goto ciclo7
click 208 108 r
invisibilidad:
wait 10
finditem %botellas C_ , %bolsa_barriles_botellas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
finditem %regs C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 270
wait 10
click 270 250
wait 4s
finditem %regs C_ , #BACKPACKID
if #FINDSTACK < 3
{
set %tipo 7
gosub barriles
return
}
goto invisibilidad

Un saludo.

[ser robin]

Joee... reedito x 3ª vez

X gente como tu se pierde la motivacion x aprender a usar Easyuo

Muxisimas gracias x el aporte, la macro va de lujo, me esta sirviendo para entender cosas q no terminaba de entender ala hora de hacer mi macro de alkimia.

Ummm q tal una macro de comprar regs? : O

Un saludo

[ilendul]

Hola muy buenas, No vendria nada mal una macro de escriba, y una macro de poisong..

Un saludo.

p.d. Muy buen aporte la macro de alkimia

[Joseph]

Gracias, de comprar regs no tengo hecha ni de poisong, ya me pondré, xddd
De escriba si:

;==================================
; Macro: Inscripción
; Autor: JoSePh
; EasyUO 1.5, V.202
; Servidor: Última Alianza
; Cliente: 7.0.8.2
;==================================
;===========CONFIGURAR=============
set %debilidad 1
set %reactiva 1
set %proteccion 1
set %envenenar 1
set %trampa 1
set %relampago 1
set %criatura 1
set %mana 1
set %energia 1
set %reflection 1
set %polimorfismo 1
set %llamarada 1
set %demonio 1
set %agua 1
set %recall 1
set %explosion 1
set %meteoros 1
set %teleport 1
set %bolsa_pergaminos_blanco_plumas WTQNTND
set %estanteria_regs TPYZUND
set %bolsa_pergaminos_hechos LAPASND
set %cantidad_pergaminos 100
set %cantidad_plumas 5
====================================
set %comida PQD_MQE_FUD_OQE_YRD_YWI_AXI_VQE_BDF_TQE
+_KPE_QQD_RQE_SQD_SPE_JQE_ZPE_IQE_YSD_GQE_HND
set %regs KZF_WZF_JZF_JUF_RZF_SZF_MZF_KUF
set %plumas PBG
set %pergaminos MMF
set %pergaminos_hechos WXL_GUL_UUL_NUL_FVL_CVL_IUL_BUL
+_EUL_UTL_KYL_STL_JYL_NXL_WTL_FUL_ZUL
display Comienza la Macro!!!
initevents
inicio:
gosub plumas
if %debilidad = 1
gosub debilidad
gosub plumas
if %reactiva = 1
gosub reactiva
gosub plumas
if %proteccion = 1
gosub proteccion
gosub plumas
if %envenenar = 1
gosub envenenar
gosub plumas
if %trampa = 1
gosub trampa
gosub plumas
if %relampago = 1
gosub relampago
gosub plumas
if %criatura = 1
gosub criatura
gosub plumas
if %mana = 1
gosub mana
gosub plumas
if %energia = 1
gosub energia
gosub plumas
if %reflection = 1
gosub reflection
gosub plumas
if %polimorfismo = 1
gosub polimorfismo
gosub plumas
if %llamarada = 1
gosub llamarada
gosub plumas
if %demonio = 1
gosub demonio
gosub plumas
if %agua = 1
gosub agua
gosub plumas
if %recall = 1
gosub recall
gosub plumas
if %explosion = 1
gosub explosion
gosub plumas
if %meteoros = 1
gosub meteoros
gosub plumas
if %teleport = 1
gosub teleport
gosub plumas
goto inicio
sub plumas ;<==============================>
plumas:
finditem %plumas C_ , #BACKPACKID
if #FINDCNT < %cantidad_plumas
{
finditem %plumas C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
goto plumas
}
gosub comer
return
sub regs ;<==============================>
regs:
wait 10
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 10
click 335 274
wait 20
finditem %regs C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDSTACK > 0
goto regs
key esc
wait 10
finditem %pergaminos_hechos C_ , #BACKPACKID
exevent drag #FINDID #FINDSTACK
exevent dropc %bolsa_pergaminos_hechos
wait 20
return
sub meditar ;<==============================>
mana:
event macro 13 46
wait 3s
if #mana = #maxmana
return
goto mana
sub comer ;<=========================>
finditem %comida C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
return
sub debilidad ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
wait 10
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;garlic y nightshade
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 81
wait 20
click 25 130
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 2
goto ciclo
click 208 108 r
debilidad:
if #MANA < 4
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 130
wait 20
click 270 250
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto debilidad
sub reactiva ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;garlic, sulfurous y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 81
wait 20
click 25 145
wait 20
click 25 162
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 3
goto ciclo
click 208 108 r
reactiva:
if #MANA < 4
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 130
wait 20
click 270 230
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto reactiva
sub proteccion ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;garlic, ginseng y sulfurous
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 81
wait 20
click 25 98
wait 20
click 25 145
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 3
goto ciclo
click 208 108 r
proteccion:
if #MANA < 6
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 150
wait 20
click 270 230
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto proteccion
sub envenenar ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;nightshade
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 130
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 1
goto ciclo
click 208 108 r
envenenar:
if #MANA < 9
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 170
wait 20
click 270 170
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto envenenar
sub trampa ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;bloodmoss y sufurous
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 65
wait 20
click 25 145
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 2
goto ciclo
click 208 108 r
trampa:
if #MANA < 6
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 150
wait 20
click 270 210
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto trampa
sub relampago ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;mandrake y sufurous
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 113
wait 20
click 25 145
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 2
goto ciclo
click 208 108 r
relampago:
if #MANA < 11
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 190
wait 20
click 270 210
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto relampago
sub criatura ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;bloodmoss, mandrake y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 65
wait 20
click 25 113
wait 20
click 25 162
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 3
goto ciclo
click 208 108 r
criatura:
if #MANA < 14
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 210
wait 20
click 270 250
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto criatura
sub mana ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;black-pearl, mandrake y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 50
wait 20
click 25 113
wait 20
click 25 162
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 3
goto ciclo
click 208 108 r
mana:
if #MANA < 11
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 190
wait 20
click 270 230
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto mana
sub energia ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;black-pearl y nightshade
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 50
wait 20
click 25 130
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 2
goto ciclo
click 208 108 r
energia:
if #MANA < 20
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 230
wait 20
click 270 130
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto energia
sub reflection ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;garlic, mandrake y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 81
wait 20
click 25 113
wait 20
click 25 162
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 3
goto ciclo
click 208 108 r
reflection:
if #MANA < 14
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 210
wait 20
click 270 170
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto reflection
sub polimorfismo ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;bloodmoss, mandrake y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 65
wait 20
click 25 113
wait 20
click 25 162
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 3
goto ciclo
click 208 108 r
polimorfismo:
if #MANA < 40
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 250
wait 20
click 270 250
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto polimorfismo
sub llamarada ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;sulfurous y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 146
wait 20
click 25 162
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 2
goto ciclo
click 208 108 r
llamarada:
if #MANA < 40
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 250
wait 20
click 270 150
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto llamarada
sub demonio ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;bloodmoss, mandrake, sulfurous y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 65
wait 20
click 25 113
wait 20
click 25 146
wait 20
click 25 162
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 4
goto ciclo
click 208 108 r
demonio:
if #MANA < 50
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 270
wait 20
click 270 190
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto demonio
sub agua ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;bloodmoss, mandrake y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 65
wait 20
click 25 113
wait 20
click 25 162
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 3
goto ciclo
click 208 108 r
agua:
if #MANA < 50
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 270
wait 20
click 270 250
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto agua
sub recall ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;balck-pearl, bloodmoss y mandrake
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 51
wait 20
click 25 65
wait 20
click 25 115
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 3
goto ciclo
click 208 108 r
recall:
if #MANA < 11
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 190
wait 20
click 270 250
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto recall
sub explosion ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;bloodmoss y mandrake
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 65
wait 20
click 25 115
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 2
goto ciclo
click 208 108 r
explosion:
if #MANA < 20
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 230
wait 20
click 270 150
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto explosion
sub meteoros ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;bloodmoss, mandrake, sulfurous y spiders
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 65
wait 20
click 25 115
wait 20
click 25 145
wait 20
click 25 160
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 4
goto ciclo
click 208 108 r
meteoros:
if #MANA < 40
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 250
wait 20
click 270 230
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto meteoros
sub teleport ;<==============================>
wait 10
finditem %pergaminos C_ , %bolsa_pergaminos_blanco_plumas
exevent drag #FINDID %cantidad_pergaminos
exevent dropc #BACKPACKID
wait 20
ciclo:
finditem %regs C_ , #BACKPACKID
if #FINDCNT > 0
gosub regs
wait 10
;bloodmoss, mandrake
finditem %estanteria_regs
set #LOBJECTID #FINDID
event macro 17
wait 20
click 25 65
wait 20
click 25 115
wait 20
finditem %regs C_ , #BACKPACKID
if #FINDCNT <> 2
goto ciclo
click 208 108 r
meteoros:
if #MANA < 11
gosub meditar
wait 10
finditem %pergaminos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 170
wait 20
click 270 210
wait 4s
finditem %pergaminos C_ , #BACKPACKID
if #FINDSTACK = 0
{
gosub regs
return
}
goto meteoros

Un saludo.

[Joseph]

Macro de envenenar recién hecha, xdd

;===========================
; Macro: Envenenar
; Autor: JoSePh
; EasyUO 1.5, V.202
; Servidor: Ultima Alianza
; Cliente: 7.0.8.2
;===========================
=========CONFIGURAR=========
set %bolsa_barriles_botellas GPZMYND
set %bolsa_barriles_vacios KGTMTND
set %arma BPH
============================
set %botella WUF
set %barril QMJ_YBK_XBK
set %comida PQD_MQE_FUD_OQE_YRD_YWI_AXI_VQE_BDF
+_TQE_KPE_QQD_RQE_SQD_SPE_JQE_ZPE_IQE_YSD_GQE_HND
initevents
inicio:
finditem %comida C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
gosub comprobacion
key esc
finditem %barril C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
target
finditem %botella C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
if _barril_con_ in #SYSMSG
{
finditem %barril C_ , #BACKPACKID
exevent drag #FINDID
exevent dropc %bolsa_barriles_vacios
wait 20
finditem %barril C_ , %bolsa_barriles_botellas
exevent drag #FINDID
exevent dropc #BACKPACKID
wait 20
}
event macro 13 30
target
finditem %arma
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
target
repeat
finditem %botella C_ , #BACKPACKID
if #FINDKIND <> -1
{
event property #FINDID
if veneno in #PROPERTY
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
for %i 1 20
{
wait 10
if pones_el_ in #SYSMSG
goto inicio
}
goto inicio
}
else
{
ignoreitem #FINDID
}
}
until #FINDKIND = -1
ignoreitem reset
goto inicio
sub comprobacion <=========================>
finditem %botella C_ , #BACKPACKID
if #FINDSTACK > 30
{
exevent drag #FINDID #FINDSTACK
exevent dropc %bolsa_barriles_botellas
wait 20
}
finditem %botella C_ , #BACKPACKID
if #FINDSTACK < 5
{
finditem %botella C_ , %bolsa_barriles_botellas
exevent drag #FINDID 20
exevent dropc #BACKPACKID
wait 20
}
return

Un saludo.

[ser robin]

subir herreria??: )

[Cabalier]

si eres tan amable de hacer una macro que t haga partes de armor del mineral k dejes en un cofre serias mi idolo

[Sir Bene]

Hola a todos.

Creo q las macros necesitan una leve explicación de como ponerlas en funcionamiento.

En la de alquimia por ejemplo me hago las siguientes preguntas:

¿Dónde están los morteros?
¿Cómo le decimos en q bolsa están las botellas o los kerg,s vacíos?
¿Cómo le digo dónde está la bolsa para dejar el kerg lleno?
¿Cómo le señalo el contenedor de reg,s.
¿Cuántas pociones tiene q hacer?
¿Cómo diferencia entre los tres tipos de pociones de curación o de resistencia?

He sido incapaz de ponerlo a funcionar.

De todas formas, gracias por aportar tu trabajo en beneficio de los demás.

Saludos. Bene.

[Liones]

Josepp skypeee marikaa xD

[bmw330ci]

si puedes poner una macro de artesano k haga engranajes se agradeceria muxisimo

[Joseph]

Hola a todos.

Creo q las macros necesitan una leve explicación de como ponerlas en funcionamiento.

En la de alquimia por ejemplo me hago las siguientes preguntas:

¿Dónde están los morteros?
¿Cómo le decimos en q bolsa están las botellas o los kerg,s vacíos?
¿Cómo le digo dónde está la bolsa para dejar el kerg lleno?
¿Cómo le señalo el contenedor de reg,s.
¿Cuántas pociones tiene q hacer?
¿Cómo diferencia entre los tres tipos de pociones de curación o de resistencia?

He sido incapaz de ponerlo a funcionar.

De todas formas, gracias por aportar tu trabajo en beneficio de los demás.

Saludos. Bene.

La macro no hace morteros ni los coge de ningún sitio, échate en la mochila todos los que puedas.

Para saber los ids usa esta macro:

initevent
display ok Pulsa Aceptar
+ y
+ selecciona
+ el objetivo
SET #TARGCURS 1
WHILE #TARGCURS = 1
WAIT 5
FINDITEM #LTARGETID
wait 5
event property #LTARGETID
DISPLAY OK ID : #LTARGETID $$
+TYPE : #FINDTYPE $$
+COLOR : #FINDCOL $$
+PROPIEDADES : #PROPERTY
stop

El numero de pociones es dependiendo de los regs que tengas en el almacenador y la cantidad de kegs, la macro no para, xdd

No se puede, solo hace un tipo de poción, la mayor.

Un saludo.

[Joseph]

si eres tan amable de hacer una macro que t haga partes de armor del mineral k dejes en un cofre serias mi idolo

Tenía una hecha para hacer armaduras completas, pero al cambiar los menús hay que modificarla ampliamente, estoy en ello.

Un saludo.

[Joseph]

si puedes poner una macro de artesano k haga engranajes se agradeceria muxisimo

Aquí tienes, la macro te hace las herramientas. En la bolsa pon el hierro y ahí mismo te guardará el producto elaborado.

;===========================
; Macro: Artesanía
; Autor: JoSePh
; EasyUO 1.5, V.202
; Servidor: Ultima Alianza
; Cliente: 7.0.8.2
;===========================
=========CONFIGURAR=========
set %producto 1 ; 1.- engranajes 2.- ganzuas
set %bolsa HZUFIQD
set %limite_producto 30
============================
set %producto_guardar RCG_NWH
set %hierro RMK
set %herramienta GTL
set %comida PQD_MQE_FUD_OQE_YRD_YWI_AXI_VQE_BDF
+_TQE_KPE_QQD_RQE_SQD_SPE_JQE_ZPE_IQE_YSD_GQE_HND
initevents
display Comienza la Macro!!
inicio:
gosub Herramientas
gosub HacerProducto
goto inicio
sub Herramientas ;<=========================>
ciclo:
gosub ReponerMaterial
FINDITEM %herramienta C_ , #BACKPACKID
IF #FINDCNT < 3
{
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 170
wait 10
click 430 350
wait 10
click 270 190
wait 5s
goto ciclo
}
return
sub HacerProducto ;<=========================>
FINDITEM %producto_guardar C_ , #BACKPACKID
IF #FINDSTACK >= %limite_producto
{
exevent drag #FINDID #FINDSTACK
exevent dropc %bolsa
wait 20
gosub comer
}
gosub ReponerMaterial
finditem %herramienta C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
if %producto = 1
{
click 70 150
wait 10
click 270 150
wait 4s
}
if %producto = 2
{
click 70 170
wait 10
click 270 150
wait 4s
}
return
sub ReponerMaterial ;<=========================>
finditem %hierro C_ , #BACKPACKID
IF #FINDSTACK < 5
{
finditem %hierro C_ , %bolsa
exevent drag #FINDID 50
exevent dropc #BACKPACKID
wait 20
}
return
sub comer ;<=========================>
finditem %comida C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
return

[Joseph]

subir herreria??: )

Estoy en ello, xdd

Un saludo.

[Draven]

gracias! mil gracias

y por si no te has entereado, GRACIAS!!

[Joseph]

gracias! mil gracias

y por si no te has entereado, GRACIAS!!

jajajajajaja, si men terao, de naaaa xdddd

[ilendul]

Muy buena Joseph por la macro de escriba, lo malo es que no me va, tengo que configurar algo?

[Joseph]

Muy buena Joseph por la macro de escriba, lo malo es que no me va, tengo que configurar algo?

Hombre algo si tienes que configurar, xdd

;===========CONFIGURAR=============
set %debilidad 1
set %reactiva 1
set %proteccion 1
set %envenenar 1
set %trampa 1
set %relampago 1
set %criatura 1
set %mana 1
set %energia 1
set %reflection 1
set %polimorfismo 1
set %llamarada 1
set %demonio 1
set %agua 1
set %recall 1
set %explosion 1
set %meteoros 1
set %teleport 1
set %bolsa_pergaminos_blanco_plumas WTQNTND
set %estanteria_regs TPYZUND
set %bolsa_pergaminos_hechos LAPASND
set %cantidad_pergaminos 100
set %cantidad_plumas 5
====================================

Lo importante es lo escrito en rojo, lo demás puedes dejarlo así, si quieres hacer todos los tipos de pergaminos, si no quita el 1, lo de la cantidad de pergaminos es opcional, máximo 100, igual que la cantidad de plumas, pero como mínimo tienes que poner unas 5 aproximadamente para que no te quedes sin plumas.

Un saludo.

[Joseph]

Macro de herrería:

;===========================
; Macro: Herreria
; Autor: JoSePh
; EasyUO 1.5, V.205
; Servidor: Ultima Alianza
; Cliente: 7.0.8.2
;===========================
=========CONFIGURAR=========
set %bolsa GPZMYND
set %s_recompensas WAMNTPD
=============================
set %pack_dagas CKF
set %numero_dagas 15
set %dagas TSF
set %martillos TLH
set %hierro RMK
display Comienza la Macro!!
initevents
inicio:
gosub hierro
gosub dagas
goto inicio
sub hierro ;<=======================>
finditem %hierro C_ , #BACKPACKID
if #FINDSTACK < 5
{
finditem %hierro C_ , %bolsa
exevent drag #FINDID 50
exevent dropc #BACKPACKID
wait 20
}
return
sub dagas ;<=======================>
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 290
wait 10
click 270 110
wait 10
for %i 1 15
{
wait 10
if Pones_ in #SYSMSG
goto sigue
}
sigue:
finditem %dagas C_ , #BACKPACKID
if #FINDCNT => %numero_dagas
gosub tickets
return
sub tickets ;<=======================>
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 310
wait 10
click 270 110
wait 10
for %i 1 15
{
wait 10
if Pones_ in #SYSMSG
goto lotes
}
lotes:
wait 10
click 277 200 r
finditem %s_recompensas
set #LOBJECTID #FINDID
event macro 17
wait 20
click 80 170
wait 20
click 310 340
wait 10
target
finditem %pack_dagas C_ , #BACKPACKID
if #FINDCNT > 0
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
goto lotes
}
key esc
click 277 200 r
return

La macro no hace martillos, está configurada para los martillos de herrero, ahora se hacen con el tinker. Echaros todos los que podáis en la mochila, cuidado con el peso, xdd

Un saludo.

[ser robin]

Viva joseph !!!