[DR] 이기어검 [흑룡의분노 발동]

magic    이기어검    {
oncast:
    set @M_DEL, callfunc("m_delay");

    set @id, myid();
    callfunc("state_ck", @id);
    set @type, istype(@id);

    set @Magic_name$, "이기어검";
    set @target, obj_getfront(@id);

    if(@type == 1)
    {
        set @sd, mysd();
        set @damage, get_hp(@sd)*2;
        callfunc("Del_Sup", @sd, 2, 100);
        callfunc("Del_Power", @sd, 2, 100);
        callfunc("Del_Power", @sd, 3, get_hp(@sd) *4/10);
        message @sd, 3, @Magic_name$ + "을 외웠습니다";
        set @AC, #State[0];
        set @UP, #State[1];
        set @MH, #State[2];
        set @DH, #State[3];
        set @delay, callfunc("delay_dec", @id, 15);
        if(@delay > 0) magic_delay(@id, 0, name2magic_id(@Magic_name$), @delay);
        set @weapon$, get_equipname(@sd, 0);
    if(@weapon$ == "용천제십검"){
        if(rand(1, 100) <= 30){
        magic_cast(@id, name2magic_id("흑룡의분노"));
        }
    }
    }
    else if(@type == 4)
    {
        set @AC, callfunc("AC_Break", get_mobid(@id));
        set @MH, callfunc("Fatal", get_mobid(@id));
        set @DH, callfunc("DH", get_mobid(@id));
        set @damage, callfunc("Mob_dam", get_mobid(@id)) * 10;
    }

    callfunc("buff", @id);
    say(@id, 2, "이기어검!~!!");

    action(@id, 1, 20, 0);
    sound(@id, 91);

    if(@target > 0)
    {
        set @damage_, callfunc("rand_damage", @damage);
        effect(@target, 68);
        callfunc("attack", @id, @target, @damage_, @AC + callfunc("curse", @target), @UP, @MH, @DH, "이기어검술", 100, 10);
    }
}

magic    이기어검술    {
onuncast:
    set @sd, mysd();
    message @sd, 3, "이기어검술 해제";
}