[euox] mark runes, drop runes

[fnurov]

marking, renaming runes
change strings
msg This is powa rune $
if powa notin #property

set #lpc 1000
set %packtype HKF_UXM_CUD
set %runetype QWL
set %neededmanaformark 11
set %pack #findid
set #lobjectid %pack
event macro 17 0
loop:
set %q 0
wait 1
if #mana < %neededmanaformark
{
   set %scan_journal_line #jindex
   gosub med
}

heal:
if #hits < #maxhits - 10
{
   set #ltargetid #charid
       event macro 23 0
      event macro 15 3
       target 8
       event macro 23 0
       goto heal
}

ignoreitem reset
event macro 15 44
target
havemana:
finditem %runetype C_ , #backpackid
if #findcnt > 0 && #mana > %neededmanaformark
{
   for %i 1 #findcnt
   {
      set #findindex %i
      set %rune #findid
      property:
      event property %rune
      str count #property $
      if #strRes < 2
      {
         event macro 1 0 #property
         goto property
      }
      if powa notin #property
      {
        set #ltargetid %rune
        set   #LTARGETKIND 1
        target
        event macro 22 0
        wait 1
        if #mana < %neededmanaformark * 2
        {
           gosub med
        }
        set #lobjectid %rune
        event macro 17 0
        event macro 15 44
        wait 10
        msg This is powa rune  $
        wait 10
        set %q 1
      }
   sleep 1
   }
}
if %q = 0
   halt
goto loop

sub med
wait 5
med:
set %scan_journal_line #jindex
if #mana > #maxmana * 4 / 5
{
 set %scan_journal_line #jindex + 1
 return
}
event macro 13 46
wait 20
for %jrnl %scan_journal_line #jindex
{
    scanjournal %jrnl
    if ( use_another in #journal  || cannot_focus in #journal ) && : notin #journal && #mana > #maxmana * 4 / 5
    {
       return
    }
    if enter in #journal && : notin #journal
    {
                   while #mana < #maxmana * 4 / 5
                   {
                       wait 2
                   }
                   set %scan_journal_line #jindex + 1
                   return

    }
    if peace in #journal && notin #journal
    {
       set %scan_journal_line #jindex + 1
       return
    }
}
set %scan_journal_line #jindex + 1
goto med

[fnurov]

drop runes on ground, when u move

set #lpc 1000
set %runetype QWL
set %packtype HKF_UXM_CUD
set %nexthide #systime


set %lastx #CHARPOSX
set %lasty #charposy

set %pack #findid

loop:
       finditem %runetype C_ , #backpackid
               if #findcnt = 0
         {
           halt
         }
repeat
      if %lastx <> #CHARPOSX || %lasty <> #charposy
      {
         set #findindex %i
         exevent drag #findid
         wait 3
         exevent dropg #CHARPOSX #CHARPOSY #CHARPOSY
         wait 5
         set %lastx #CHARPOSX
         set %lasty #charposy
         set %i %i + 1
         if %i > #findcnt
         {
            set %i 1
            goto loop
         }
      }
      sleep 10
until #findcnt = 0
goto loop

[fnurov]

drag many runes on vendor

set #lpc 1000
set %_defaultWaitForTimeout 20
set %maxrunes 70

set %packtype HKF_UXM
set %runetype QWL
set %vendorid BMUD
set %vendorpack FGVWOMD
exevent Popup %vendorid 2
wait 10
finditem %packtype C_ , #backpackid
if #findcnt <> 1
{
halt
}
set %pack #findid
finditem %vendorpack
if #findcnt <> 1
{
halt
}
set #lobjectid %vendorpack
event macro 17 0
wait 20


loop:
ignoreitem reset
finditem %runetype C_ , %vendorpack
if #findcnt < %maxrunes
{
   set %q 0
   repeat
         finditem %runetype C_ , %pack
         if #findcnt > 0
         {
          event property #findid
          if bods in #property
          {
            Exevent Drag #findid 1
            wait 3
            Exevent Dropc %vendorpack 30 30  ;drops the mushroom at 80,80
            wait 10
            msg 0 Take rune and come whenever u need $
            set %q %q + 1
                
          }
          ignoreitem #findid
          if %q > 10
          {
          goto loop
          }
      
      }
    until #findcnt = 0
}
ignoreitem reset
repeat
      finditem %runetype C_ , %vendorpack
      if #findcnt > 0
      {
        event property #findid
        if free notin #property
        {
           Exevent Drag #findid 1
           wait 3
           Exevent Dropc %pack  ;drops the mushroom at 80,80
           wait 3
        }
        }
        if #findcnt > %maxrunes
        {
           Exevent Drag #findid 1
           wait 3
           Exevent Dropc %pack  ;drops the mushroom at 80,80
           wait 3
        }
        ignoreitem #findid


      }
until #findcnt = 0
goto loop


sub waitForContSizeToOpen
	if %0 < 2 || %2 = N/A
		set %2 %_defaultWaitForTimeout
	if %0 < 3
		set %3 return
	gosub waitForSysVar contSize = %1 %2 %3
return

**
;* Compares a system variable to a value; returning when the
;* comparison evaluates as true.
;*
;* @purpose  Compares a system variable to a value; returning when the comparison evaluates as true.
;* @author   Smertrios
;* @param    %1  sysvar   req  Name of the system variable without the preceeding '#'.
;*           %2  op       req  EasyUO operator like <, >, =, in, notIn.
;*           %3  value    req  A value to compare with EasyUO system variable %1.
;*           %4  timeout  opt  Timeout value (in .1 seconds)
;*           %5  return   opt  Name of return value ('return' by default)
;* @return   @%5 (#true or #false if timedout)
;* @see waitForSysVar2
sub waitForSysVar
	if %0 < 4 || %4 = N/A
		set %4 %_defaultWaitForTimeout
	if %0 < 5
		set %5 return
	set %4 #sysTime + %4 * 100
_waitForSysVar:
	set % . %5 # . %1 %2 %3
	if ! % . %5 && #sysTime < %4
	{
		wait 1
		goto _waitForSysVar
	}
return

[fnurov]

first and second scripts changed a lot