[euox] helpfull utilities for mellisande

[fnurov]

warriors with honor and disco wil like it

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

latest version of first script

set #lpc 1000
set %alarmhits 110
set %pet FPZD
ignoreitem NRBF
loop:
finditem EN
if ( #findcnt <> 0 ) && ( #hits > %alarmhits )
{
   event ExMsg #CHARID 3 50 DRIAD IS NEARBY
   set %driad #findid
   repeat
            finditem %driad
            event ExMsg %driad 3 50 KILL ME! KILL ME!
   until #finddist < 8 || #findcnt = 0
   if #findcnt = 0
   {
    goto loop
   }
   ;set #LTARGETID %driad
   ;event macro 22 0
   finditem %driad
   while ( #findcnt > 0 ) && ( #finddist > 6 )
   {
    event ExMsg %driad 3 50 KILL ME! KILL ME!
    finditem %driad
    set %dx #findx
    set %dy #findy
   }
   if #findcnt > 0
   {
       set #LOBJECTID #CHARID
       event macro 17 0
      finditem %pet
      while #findcnt <> 1
      {
       finditem %pet
      }
      wait 3
      event macro 1 0 all kill
      target 10
      set #LTARGETID %driad
      event macro 22 0
      finditem %driad
      while #findcnt <> 0
      {
         finditem %driad
      }
      event macro 6 0
       event macro 1 0 all follow me
       set #LOBJECTID %pet
       for %i 1 4
       {
       event macro 17 0

      }
      }
   }
}
wait 1
goto loop

[fnurov]

insert wait 1 before string goto loop, cause it kills cp without it