;===========================
; 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