helpfull for killing dryads. lights dryads, when u'r close to it, dismounts u and allkills dryad, mounts when dryad is dead
warriors will like it
codice:
set %alarmhits 110
set %pet FUDG
ignoreitem NRBF
loop:
finditem EN
if ( #findcnt <> 0 ) && ( #hits > %alarmhits )
{
event ExMsg #CHARID 3 50 DRIAD IS NEARBY
set %driad #findid
event ExMsg %driad 3 50 KILL ME! KILL ME!
set #LTARGETID %driad
event macro 22 0
set #LOBJECTID %driad
event macro 27 0
finditem %driad
while ( #findcnt > 0 ) && ( #finddist > 4 )
{
event ExMsg %driad 3 50 KILL ME! KILL ME!
finditem %driad
}
if #findcnt > 0
{
finditem %pet
while #findcnt <> 1
{
set #LOBJECTID #CHARID
event macro 17 0
finditem %pet
}
set #LTARGETID %driad
event macro 1 0 all kill
target
event macro 22 0
finditem %driad
if #findcnt > 0
{
event macro 15 17
target
event macro 22 0
}
while #findcnt <> 0
{
finditem %driad
}
event macro 6 0
set #LOBJECTID %pet
finditem %pet
while #findcnt = 1
{
event macro 1 0 all follow me
event macro 17 0
finditem %pet
}
}
}
goto loop
codice:
set #lpc 1000
set %IUseDisco #false
set %IUseHonor #true
ignoreitem NRBF
loop:
finditem EN
if #findcnt > 0
{
event ExMsg #CHARID 3 50 DRIAD IS NEARBY
set %driad #findid
repeat
finditem %driad
event ExMsg %driad 3 50 KILL ME! KILL ME!
wait 1
until #finddist < 11 || #findcnt = 0
if #findcnt <> 0
{
set #ltargetid %driad
if %IUseHonor
{
event macro 49 1
target 10
event macro 22
wait 1
}
if %IUseDisco
{
event macro 13 15
target 10
event macro 22
wait 1
}
set #LOBJECTID %driad
event macro 27 0
}
repeat
event ExMsg %driad 3 50 KILL ME! KILL ME!
finditem %driad
wait 1
until #findcnt = 0
}
wait 2
goto loop







Commenta