[EASYUO] caller of anit blood oath

[fnurov]

if u want it to work u need to place file ScanBuffBar.txt in your easyuo directory
this file is there EasyUO.com :: Log in
i recomend to look for latest version
also your baffbar should be orientaed with blue gem in right/down corner

setup
how often (in ms) to scan bafbar for bloodoath.
notice: too often scanning may cause lag
set %BloodOathScanDelay 200

;==================================
; Script Name: Anti Blood Oath
; Author: Felix
; Version: 4
; Client Tested with: 6.0.13
; EUO version tested with: 1.5.148
; Shard FS: UODreams
; Public Release: 27/07/2009
; Purpose: turns off war-mode, whan blood oath
; Requirments: ScanBuffBar
;===========================================

;;;;;;;;;;SETUP
set %BloodOathScanDelay 250


;;;;;;;DON'T EDIT
set %InOldOath #false
set %NextBloodOathScan #systime
set %EndTurningOffWar 0
set %OathId xxyyxx

loop:
     if %InOldOath && ( #systime <= %EndTurningOffWar || #enemyid = %OathId ) && G in #charstatus
     {
         if #enemyid = %OathId
         {
            finditem %OathId G
            if #findtype = IS && #findrep = 6
            {
               event property %OathId
               if revenant in #property
                  set %OathId xxyyxx
            }
            ;if #systime > %EndTurningOffWar && #enemyid = %OathId
            ;{
               ;event exmsg #charid 0 0 OATH2
               ;set %EndTurningOffWar #systime + 2000
            ;}
         }
         while #systime <= %EndTurningOffWar && G in #charstatus
         {
               event macro 6 0
               set %nexttoggle #systime + 300
               while #systime <= %nexttoggle && G in #charstatus
               {
                     sleep 10
               }
         }
     }
     if #systime >= %NextBloodOathScan
        gosub AntiBloodOath
     else
         sleep 20
goto loop


sub AntiBloodOath
    if G notin #charstatus && %InOldOath = #false
    {
       set %NextBloodOathScan #systime + %BloodOathScanDelay
       return
    }
    Call ScanBuffBar
    set %oathed _CurseBloodOath_ in %BuffBarIconNames
    if %oathed
    {
       if G in #charstatus
       {
          if %InOldOath = #false && #systime > %EndTurningOffWar
          {
             set %InOldOath #true
             set %EndTurningOffWar #systime + 2000
             if #enemyid <> n/a
                set %OathId #enemyid
             else
                 set %OathId xxyyxx
             event exmsg #charid 0 0 OATH
          }
       }
    }
    else
    {
        if %InOldOath
        {
           set %InOldOath #false
           if G notin #charstatus
              event macro 6 0
           event exmsg #charid 0 0 go go go
        }
    }
    set %NextBloodOathScan #systime + %BloodOathScanDelay
return

Anti Blood Oath

for users of Script Name: BadManiac's Automagic Looting 2

find strings in looter

ONHOTKEY *bml_hotkey
        {
           BREAK
        }

and change it to

        ONHOTKEY *bml_hotkey
        {
           while g in #charstatus
           {
              event macro 6 0
              set %waitforoffwar #systime + 300
              while g in #charstatus && #systime < %waitforoffwar
              {
                 sleep 10
              }
           }
           BREAK
        }

and use key-press looting, if u want this looter to work correctly with antibloodoath

[fnurov]

^)