//--#Casts
function healfriend01()
{
    Orion.WaitTargetObject('friend');
    Orion.UseType('0x1F49');
}

function reflectfriend01()
{
    Orion.WaitTargetObject('friend');
    Orion.UseType('0x1F50');
}

function gaterune()
{
    Orion.WaitTargetObject('gaterune');
    Orion.Cast('Gate Travel');
}



function ff_gh()
{
    Orion.WaitTargetObject(self);
    Orion.Cast('Magic Arrow');
    Orion.Wait(1100);
    self_gh();
    Orion.Wait(1000);
    Orion.TargetObject(self);
}

function DispelField_when_look()
{
    var x = Player.X();
    var y = Player.Y();

    switch (Player.Direction() & 7)
    {
        case 0:
        {
            y--;
            break;
        }
        case 1:
        {
            x++;
            y--;
            break;
        }
        case 2:
        {
            x++;
            break;
        }
        case 3:
        {
            x++;
            y++;
            break;
        }
        case 4:
        {
            y++;
            break;
        }
        case 5:
        {
            x--;
            y++;
            break;
        }
        case 6:
        {
            x--;
            break;
        }
        case 7:
        {
            x--;
            y--;
            break;
        }
    }
    var field = Orion.FindType('0x0080|0x3947', '0', ground, 'item', 'xyz:' + x + ',' + y);
    if (field.length)
    {
        var  tDfield = '0x1F4E';
        if (Orion.Count(tDfield) <1)
        {
            Orion.Print("DField Scroll = 0");
        }
        if (Player.Mana()<10)
        {
            Orion.Print ("Loss Mana");
            return;
        }
        if (Orion.Count(tDfield) != 0)
            Orion.UseType(tDfield);
        else
        {
            Orion.Print ("Scrolls Not Found, cast from Book");
            Orion.Cast('Dispel Field');
        }
        Orion.WaitTargetObject(field[0]);
    }
}

function self_gh()
{
    Orion.Print('casting');
    var sGreatHeal = '0x1F49';
    if (Orion.Count(sGreatHeal) <1)
    {
        Orion.Print("GH Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    //Orion.WaitTargetObject(self);
    if (Orion.Count(sGreatHeal) != 0)
        Orion.UseType(sGreatHeal);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Greater Heal');
    }
    Orion.WaitForTarget();
    Orion.TargetObject(self);
}

function self_daemon()
{
    var  sDaemon = '0x1F69';
    if (Orion.Count(sDaemon) <1)
    {
        Orion.Print("sDaemon Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    if (Orion.Count(sDaemon) != 0)
        Orion.UseType(sDaemon);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Summon Daemon');
    }
    Orion.WaitForTarget();
    Orion.TargetObject(self);
}

function self_reflect()
{
    var sReflect = '0x1F50';
    if (Orion.Count(sReflect) <1)
    {
        Orion.Print("MR Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject(self);
    if (Orion.Count(sReflect) != 0)
        Orion.UseType(sReflect);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Magic Reflection');
    }
}

function self_BlessScroll()
{
    var sBless = '0x1F3D';
    if (Orion.Count(sBless) <1)
    {
        Orion.Print("Bless Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject(self);
    if (Orion.Count(sBless) != 0)
        Orion.UseType(sBless);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Bless');
    }
}

function self_strenght()
{
    Orion.Cast('Strength', self);
}

function self_protection()
{
    Orion.Cast('Protection', self);
}

function self_cure()
{
    Orion.Cast('Cure', self);
}

function self_energyfield()
{
    var  wEnergy = '0x1F5E';
    if (Orion.Count(wEnergy) <1)
    {
        Orion.Print("EF Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject(self);
    if (Orion.Count(wEnergy) != 0)
        Orion.UseType(wEnergy);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Energy Field');
    }
}

function self_firefield()
{
    var  wFirefield = '0x1F48';
    if (Orion.Count(wFirefield) <1)
    {
        Orion.Print("FF Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject(self);
    if (Orion.Count(wFirefield) != 0)
        Orion.UseType(wFirefield);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Fire Field');
    }
}

function self_RelativeStone()
{
    var  wStone = '0x1F44';
    if (Orion.Count(wStone) <1)
    {
        Orion.Print("WoS Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
      Orion.WaitTargetTileRelative('any', 0, 0, 0);
    if (Orion.Count(wStone) != 0)
        Orion.UseType(wStone);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Wall of Stone');
    }
}

function self_Stone()
{
    var  wStone = '0x1F44';
    if (Orion.Count(wStone) <1)
    {
        Orion.Print("WoS Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
      Orion.WaitTargetObject(self);
    if (Orion.Count(wStone) != 0)
        Orion.UseType(wStone);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Wall of Stone');
    }
}

function self_Airmelem()
{
    var  wAirelem = '0x1F68';
    if (Orion.Count(wAirelem) <1)
    {
        Orion.Print("Air Elem Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
      Orion.WaitTargetObject(self);
    if (Orion.Count(wAirelem) != 0)
        Orion.UseType(wAirelem);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Air Elemental');
    }
}

function self_serpent()
{
    Orion.WaitTargetObject(self);
    Orion.WaitMenu('What do you want to summon', 'Serpent');
    Orion.Cast('Summ. Creature');
}

function last_daemon()
{
    var  sDaemon = '0x1F69';
    if (Orion.Count(sDaemon) <1)
    {
        Orion.Print("sDaemon Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(sDaemon) != 0)
        Orion.UseType(sDaemon);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Summon Daemon');
    }
}

function last_manadrain()
{
    var run = Orion.GetGlobal('manadrain');
    if (run == 'yes')
    {
        Orion.Print('manadrain Deactivated');
        Orion.SetGlobal('manadrain', 'no');
        Orion.Terminate(ScriptName);
        return;
    }
    Orion.Print('manadrain Activated');
    Orion.SetGlobal('manadrain', 'yes');
    while (!Player.Dead())
    {
        var wManaDrain = '0x1F4B';
        if (Orion.Count(wManaDrain) <1)
        {
            Orion.Print("MD Scroll = 0");
        }
        if (Player.Mana()<10)
        {
            Orion.Print ("Loss Mana");
            return;
        }
        Orion.WaitTargetObject('enemy');
        if (Orion.Count(wManaDrain) != 0)
        {
            Orion.UseType(wManaDrain);
            Orion.Wait(1150);
        }
        else
        {
            Orion.Print ("Scrolls Not Found, cast from Book");
            Orion.Cast('Mana Drain');
            Orion.Wait(1550);
        }
    }
}

function last_fs()
{
    var wFlameStrike = '0x1F5F';
    if (Orion.Count(wFlameStrike) <1)
    {
        Orion.Print("FS Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(wFlameStrike) != 0)
        Orion.UseType(wFlameStrike);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Flame Strike');
    }
}

function last_light()
{
    var wLight = '0x1F4A';
    if (Orion.Count(wLight) <1)
    {
        Orion.Print("LT Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(wLight) != 0)
        Orion.UseType(wLight);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Lightning');
    }
}


function last_paralyze()
{
    var wParalyze = '0x1F52';
    if (Orion.Count(wParalyze) <1)
    {
        Orion.Print("Paralyze Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(wParalyze) != 0)
        Orion.UseType(wParalyze);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Paralyze');
    }
}

function last_wallofstone()
{
    var  wStone = '0x1F44';
    if (Orion.Count(wStone) <1)
    {
        Orion.Print("WoS Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(wStone) != 0)
        Orion.UseType(wStone);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Wall of Stone');
    }
}

function last_energyfield()
{
    var  wEnergy = '0x1F5E';
    if (Orion.Count(wEnergy) <1)
    {
        Orion.Print("EF Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(wEnergy) != 0)
        Orion.UseType(wEnergy);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Energy Field');
    }
}

function last_pfield()
{
    var  wPfield = '0x1F5B';
    if (Orion.Count(wPfield) <1)
    {
        Orion.Print("PF Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(wPfield) != 0)
        Orion.UseType(wPfield);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Paralyze Field');
    }
}

function last_firefield()
{
    var  wFirefield = '0x1F48';
    if (Orion.Count(wFirefield) <1)
    {
        Orion.Print("FF Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(wFirefield) != 0)
        Orion.UseType(wFirefield);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Fire Field');
    }
}

function last_dispel()
{
    var  wDispel= '0x1F55';
    if (Orion.Count(wDispel) <1)
    {
        Orion.Print("Dispel Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(wDispel) != 0)
        Orion.UseType(wDispel);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Dispel');
    }
}

function last_weaken()
{
    Orion.Cast('Weaken', 'enemy')
}

function last_teleport()
{
    var LTeleport = '0x1F42';
    if (Orion.Count(LTeleport) <1)
    {
        Orion.Print("TP Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    Orion.WaitTargetObject('enemy');
    if (Orion.Count(LTeleport) != 0)
        Orion.UseType(LTeleport);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Teleport');
    }
}

function o4ko_wallofstone()
{
    var  wStone = '0x1F44';
    if (Orion.Count(wStone) <1)
    {
        Orion.Print("WoS Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    if (Orion.Count(wStone) != 0)
        Orion.UseType(wStone);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Wall of Stone');
    }
}

function o4ko_energyfield()
{
    var  wEnergy = '0x1F5E';
    if (Orion.Count(wEnergy) <1)
    {
        Orion.Print("EF Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    if (Orion.Count(wEnergy) != 0)
        Orion.UseType(wEnergy);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Energy Field');
    }
}

function o4ko_pfield()
{
    var  wPfield = '0x1F5B';
    if (Orion.Count(wPfield) <1)
    {
        Orion.Print("PF Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    if (Orion.Count(wPfield) != 0)
        Orion.UseType(wPfield);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Paralyze Field');
    }
}

function o4ko_firefield()
{
    var  wFirefield = '0x1F48';
    if (Orion.Count(wFirefield) <1)
    {
        Orion.Print("FF Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    if (Orion.Count(wFirefield) != 0)
        Orion.UseType(wFirefield);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Fire Field');
    }
}

function o4ko_dispelfield()
{
    var  tDfield = '0x1F4E';
    if (Orion.Count(tDfield) <1)
    {
        Orion.Print("DField Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    if (Orion.Count(tDfield) != 0)
        Orion.UseType(tDfield);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Dispel Field');
    }
}

function o4ko_daemon()
{
    var  sDaemon = '0x1F69';
    if (Orion.Count(sDaemon) <1)
    {
        Orion.Print("sDaemon Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    if (Orion.Count(sDaemon) != 0)
        Orion.UseType(sDaemon);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Summon Daemon');
    }
}

function o4ko_teleport()
{
    var LTeleport = '0x1F42';
    if (Orion.Count(LTeleport) <1)
    {
        Orion.Print("TP Scroll = 0");
    }
    if (Player.Mana()<10)
    {
        Orion.Print ("Loss Mana");
        return;
    }
    if (Orion.Count(LTeleport) != 0)
        Orion.UseType(LTeleport);
    else
    {
        Orion.Print ("Scrolls Not Found, cast from Book");
        Orion.Cast('Teleport');
    }
}

function relative_pf_w()
{
    Orion.CancelWaitTarget();
    Orion.WaitTargetTileRelative('',-1,0,0);
    Orion.Wait(50);
    Orion.UseType('0x1F5B');
}

function relative_pf_n()
{
    Orion.CancelWaitTarget();
    Orion.WaitTargetTileRelative('',0,-1,0);
    Orion.Wait(50);
    Orion.UseType('0x1F5B');
}

function relative_pf_e()
{
    Orion.CancelWaitTarget();
    Orion.WaitTargetTileRelative('',+1,0,0);
    Orion.Wait(50);
    Orion.UseType('0x1F5B');
}

function relative_pf_s()
{
    Orion.CancelWaitTarget();
    Orion.WaitTargetTileRelative('',0,+1,0);
    Orion.Wait(50);
    Orion.UseType('0x1F5B');
}

function relative_ws_w()
{
    Orion.CancelWaitTarget();
    Orion.WaitTargetTileRelative('',-1,0,0);
    Orion.Wait(50);
    Orion.UseType('0x1F44');
}

function relative_ws_n()
{
    Orion.CancelWaitTarget();
    Orion.WaitTargetTileRelative('',0,-1,0);
    Orion.Wait(50);
    Orion.UseType('0x1F44');
}

function relative_ws_e()
{
    Orion.CancelWaitTarget();
    Orion.WaitTargetTileRelative('',+1,0,0);
    Orion.Wait(50);
    Orion.UseType('0x1F44');
}

function relative_ws_s()
{
    Orion.CancelWaitTarget();
    Orion.WaitTargetTileRelative('',0,+1,0);
    Orion.Wait(50);
    Orion.UseType('0x1F44');
}

function o4ko_mark()
{
    Orion.Cast('Mark');
}

function cast_horse()
{
    Orion.WaitTargetObject(self);
    Orion.WaitMenu('What do you want to summon', 'Horse');
    Orion.Cast('Summ. Creature');
}

function cast_harm_last_true()
{
    while(true)
    {
    if (Player.Mana() > 20)
    {
        Orion.Cast('Harm','enemy');
        Orion.Wait(1500);
    }
    else
        while (Player.Mana() < 100)
        {
            Orion.UseSkill('Meditation');
            Orion.Wait(100);
        }
    }
}