구버전 바람 주술사 고차승급 스킬 혹한

@혹한    {
    set @id, myid();
    set @sd, mysd();

    callfunc "SPELL_MOMENT";
    callfunc "MANA_DELAY", get_maxmp(@sd)*1/10, name2spellid("혹한"), @sd;

    set @plus, get_maxmp(@sd)*1/10;
    //set_mp @sd, get_mp(@sd)-@plus;

    effect @id, 175;
    sound @id, 702;
    action @id, 6, 30, 0;

    message @sd, 3, "혹한을 외웠습니다.";

    spellaether @sd, name2spellid("혹한"), 15;
}

@혹한지속    {
    set @id, myid();
    set @sd, mysd();

    if(spellaethered(@sd, name2spellid("혹한")) == 0) { spelluncast @sd, name2spellid("혹한"); end; }

    set @x1, get_x(@id)-1;
    set @x2, get_x(@id)+1;
    set @y1, get_y(@id)-1;
    set @y2, get_y(@id)+1;
    
    if(@x1 < 0) { set @x1, 0; }
    if(@x2 > get_mapwidth(@sd)-1) { set @x2, get_mapwidth(@sd)-1; }
    if(@y1 < 0) { set @y1, 0; }
    if(@y2 > get_mapheight(@sd)-1) { set @y2, get_mapheight(@sd)-1; }
    
    for(set @i, @x1; @i <= @x2; set @i, @i+1)
    {
        for(set @j, @y1; @j<=@y2; set @j, @j+1)
        {
            set @target_id, obj_getxy(@i, @j);

            if(@target_id > 0 && @target_id != @id)
            {
                effect @id, 175;
                sound @id, 702;

                if(istype(@target_id) == 1 && ismapoption(@sd, 6) == 1)
                {
                    set @next, 1;
                    set @target_sd, id2sd(@target_id);

                    if(spellaethered(@target_sd, name2spellid("저주")) == 0)
                    {
                        set @mes, 1;

                        if(callfunc("CURSE_CHECK", 1, @target_id) == 1 || spellaethered(@target_sd, name2spellid("빛의결계")) == 1) { continue; }
                        if(spellaethered(@target_sd, name2spellid("호체주술")) == 1)
                        {
                            if(get_puremp(@sd) < (get_puremp(@target_sd)/100*75)) { continue; }
                        }

                        effect @target_id, 13;
                        sound @target_id, 69;
                        action @id, 6, 30, 0;

                        set_ac @target_sd, get_ac(@target_sd)+30;
                        spellaether @target_sd, name2spellid("저주"), 3;
                    }
                    if(spellaethered(@target_sd, name2spellid("중독")) == 0 && spellaethered(@target_sd, name2spellid("노도성황")) == 0)
                    {
                        set @mes, 1;

                        action @id, 6, 30, 0;
                        spellaether @target_sd, name2spellid("중독"), 30;
                    }
                    if(spellaethered(@target_sd, name2spellid("절망")) == 0)
                    {
                        set @mes, 1;

                        effect @target_id, 14;
                        sound @target_id, 71;
                        action @id, 6, 30, 0;

                        set_siya @target_sd, 1, 0;
                        spellaether @target_sd, name2spellid("절망"), 1;
                    }
                    if(spellaethered(@target_sd, name2spellid("마비")) == 0 && spellaethered(@target_sd, name2spellid("만파지독")) == 0)
                    {
                        set @mes, 1;

                        effect @target_id, 1;
                        sound @target_id, 70;
                        action @id, 6, 30, 0;

                        set_siya @target_sd, 2, 0;
                        spellaether @target_sd, name2spellid("마비"), 3;
                    }

                    if(@mes == 1) { message @target_sd, 3, get_name(@sd)+"님께서 혹한을 가했습니다."; }
                }
                if(istype(@target_id) == 2)
                {
                    if(mobspellaethered(@target_id, name2spellid("저주")) == 0)
                    {
                        if(callfunc("CURSE_CHECK", 2, @target_id) == 1) { continue; }

                        effect @target_id, 13;
                        sound @target_id, 69;
                        action @id, 6, 30, 0;

                        set_mobac @target_id, get_mobac(@target_id)+30;
                        mobspellaether @target_id, name2spellid("몹저주"), 3;
                    }
                    if(mobspellaethered(@target_id, name2spellid("중독")) == 0 && mobspellaethered(@target_id, name2spellid("노도성황")) == 0)
                    {
                        if(get_mobid(@target_id) >= 1195 && get_mobid(@target_id) <= 1225 || get_mobid(@target_id) >= 2019 && get_mobid(@target_id) <= 2021) { continue; }

                        action @id, 6, 30, 0;
                        mobspellaether @target_id, name2spellid("중독"), 30;
                    }
                    if(mobspellaethered(@target_id, name2spellid("절망")) == 0)
                    {
                        effect @target_id, 14;
                        sound @target_id, 71;
                        action @id, 6, 30, 0;

                        set_siya @target_id, 3, 1;
                        mobspellaether @target_id, name2spellid("절망"), 3;
                    }
                    if(mobspellaethered(@target_id, name2spellid("마비")) == 0 && mobspellaethered(@target_id, name2spellid("만파지독")) == 0)
                    {
                        effect @target_id, 1;
                        sound @target_id, 70;
                        action @id, 6, 30, 0;

                        set_siya @target_id, 2, 1;
                        mobspellaether @target_id, name2spellid("마비"), 3;
                    }
                }
                effect @target_id, 174;
            }
        }
    }
}

@혹한해제    {
    spelldelay mysd(), name2spellid("혹한"), 215;
}